Visual Basic - codigo direccion ip

necesito un programa en visual basic que detecte la direccion ip de almenos 400 maquinas espero que el codigo tenga comentarios para yo entenderlo.

gracias a quien ne de informacion

No se si te refieres a una red local o no, en ese caso lo puedes hacer enumerando las máquinas de la red, con Winsock es más complejo por el tipo de paquetes que se deben enviar.

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

puedes hacerlo con el winsock y una variable ke guarde las ip de la red en un archivo .txt