Necesitas 2 programas.
Un Servidor que se instala en cada PC que desees controlar.
Un Cliente que es el que Observa a los Otros.
Tanto el Cliente como el servidor usan un Control Winsock que es el que permite conectar por el Protocolo TC/IP.
Como veo que estas "Crudo" en el tema deberias iniciar primero con el protocolo UDP ( el control Winsock permite conectarse mediante 2 procolos distintos TCP - UDP)
el protocolo TCP es directo teniendo la necesidad de un servidor, a diferencia del UDP en donde cualquier PC puede ser cliente o servidor.
mira este ejemplo aunque solo usa un formulario, un Timer , un ListBox, y dos Winsock te dara idea.
El SOck 1 Envia datos y el 2 solo escucha.
Private Sub Form_Load()
On Error Resume Next
Winsock2.Protocol = sckUDPProtocol
Winsock2.RemoteHost = "255.255.255.255"
Winsock2.RemotePort = 999
Winsock2.LocalPort = 1000
Winsock2.Bind
End Sub
Private Sub Timer1_Timer()
On Error Resume Next
If Winsock1.State = sckOpen Then Winsock1.Close
Winsock1.Protocol = sckUDPProtocol
Winsock1.RemoteHost = "255.255.255.255"
Winsock1.RemotePort = 1000
Winsock1.LocalPort = 999
Winsock1.Connect
Winsock1.SendData "Hola desde " & Winsock1.LocalHostName
End Sub
Private Sub Winsock2_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim Msg As String
Call Winsock2.GetData(Msg)
List1.AddItem Msg
End Sub
