Visual Basic - SOCKETS,Por favor necesito ayuda con los sockets

Necesito que alguien que controle de sockets en visual basic me ayude:
necesito realizar conexiones con otro pc, para lo que despues de definir los puertos y hosts, conecto con la orden :

--> socket.connect
e inmediatamente coloco la orden
--> socket.senddata
pero si la red no esta muy fina, el socket todavia no ha sido aceptado por lo que algunas veces da error. Mi posible solucion es encontrar una orden tipo 'sleep(n)' de C, que detenga la ejecucion del programa durante 'n' segundos, para dar tiempo a que el socket sea aceptado. No se si hay una funcion propia de Visual Basic o algun control, o algun metodo del winsock.ocx. Agradeceria mucho cualquier solucion, porque aunque mi programa esta terminado, solo funciona en funcion del estado de la red... GRACIAS

Javier. Esta es la solución que yo uso:

Private Sub Enviar(ByRef sckSocket as Winsock, ByVal Data As String)
Dim i
For i = 1 To 20
If sckSocket.State <> sckConnected Then
sckSocket.Close
sckSocket.Connect
End If
If sckSocket.State = sckConnected Then Exit For
Next i
If sckSocket.State = sckConnected Then sckSocket.SendData Data
End Sub

Saludos!