Visual Basic - ocx para implementar findComputer

Alguien sabe si existe un ocx o una Api , para implementar, el FindComputer de windows, gracias

Fijate con esto:

Private Declare Function NetServerEnum Lib "netapi32.dll" ( _
ByVal servername As String, _
ByVal Level As Long, _
BUFFER As Long, _
ByVal prefmaxlen As Long, _
entriesread As Long, _
totalentries As Long, _
ByVal ServerType As Long, _
ByVal domain As String, _
resumehandle As Long) As Long

o con:

Dim objShell As Shell
Set objShell = New Shell
objShell.FindComputer
Set objShell = Nothing