En primer lugar El Servidor es el que se conecta(Connect), mientras que el Cliente espera la conexión(Listen), verifica bien en Port Fowarding del Router es donde se configuran las redirecciones
Servidor
If Winsock1.State <> 7 Then
Winsock1.Close
Winsock1.Connect Text3.Text, Text4.Text
End If
Cliente
Winsock1.LocalPort = Text6.Text
Winsock1.Listen
Asi no debe haber ningun problema, ademas si no estas usando no-ip.com, pues deberias estar unsando el DNS del mismo Router, no se si sabes lo que es DNS