vb.net winform ver en combobox los equipos conectados a la red

[damid3]

Hola ahora use este codigo

Código vb:

Public Sub GetPConNetWord()
        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
                    cbmac.Items.Add(c.Name)
                End If
            Next
        Next
    End Sub
 

Saludos