求大神转个代码解决办法

求大神转个代码
求大神把下面的C#代码转为VB.NET代码。
用工具转下的不能用，里面有个委托。不太会转了。请高手帮忙！

private static void KengenMenu(string parent, List<Feature> table, int level, List<Kengen> list)
{
    foreach (Kengen mdl in list.FindAll(delegate(Kengen p)
                                        {
                                            return p.ParentD.Id == parent;
                                        }))
    {
            
    }
}
------解决方案--------------------
Private Shared Sub KengenMenu(parent As String, table As List(Of Feature), level As Integer, list As List(Of Kengen))

For Each mdl As Kengen In list.FindAll(Function(p As Kengen) p.ParentD.Id = parent)
Next
End Sub