请问我使用vee程序中获得网络计算机列表的方法哪里出错了？

尝试我可能无法获得我希望在VEE中工作的.NET代码。
我试图在一个vee程序中获得一个网络计算机列表，我尝试了两种方法，1）导入Netapi32.dll并使用NetserverEnum方法和2）.NET System.DirectoryServices.DirectoryEntry方法。
问题是虽然我对Vee合情合理，但我不是C＃/ .NET / C ++等程序员。
我已经尝试了很多方法让这个工作，并试图研究答案，但我找不到我做错了什么。
所以，我只是直接问，可以为我提供指针，提示/提示或更好的样本Vee程序，将实现与以下代码相同。
Sub Main（）Dim root As New DirectoryEntry（“WinNT：”）Dim parent As DirectoryServices.DirectoryEntries parent = root.Children Dim d As DirectoryEntries = parent for Each complist As DirectoryEntry In parent For Each c As DirectoryEntry in complist.Children If（
c.Name“Schema”）然后Console.WriteLine（c.Name）结束如果下一个下一个结束SubMany提前感谢，Harvey



     以下为原文

  Try as I might I am not able to get the .NET code I want working in VEE. I am trying to get a list of network computers in a vee program, I have tried 2 methods, 1) importing  Netapi32.dll and using  NetserverEnum method  and 2) the .NET System.DirectoryServices.DirectoryEntry method.
The problem is that whilst I'm reasonably OK with Vee, I'm not a C# / .NET / C++ etc programmer. I have tried many ways to get this working and have tried to research the answer but I cannot find what I am doing wrong.
So, I am just going to ask straight out, can any provide me with pointers, hints / tips or better still a sample Vee program that will achieve the same as the following code.

Sub Main()
        Dim root As New DirectoryEntry("WinNT:")
        Dim parent As DirectoryServices.DirectoryEntries
        parent = root.Children
        Dim d As DirectoryEntries = parent
        For Each complist As DirectoryEntry In parent
            For Each c As DirectoryEntry In complist.Children
                If (c.Name "Schema") Then
                    Console.WriteLine(c.Name)
                End If
            Next
        Next
    End Sub

Many thanks in advance,

Harvey