HOla a todos, estaba intentando hacer un escaneador de puertos es bastante sencillo o eso creia hasta que tipee todo el codigo y despues veo que cuando le doi Winsock1.Close y Winsock1.Connect en un command, no llega al evento Winsock1.Connect, y queria saber si tengo algun error de escritura de codigo, aqui os lo dejo:
Private Sub Command1_Click()
Winsock1.Close
Winsock1.Connect Text1.Text, Port
End Sub
Private Sub Form_Load()
Port = Text2.Text
Text1.Text = Winsock1.LocalIP
End Sub
Private Sub Winsock1_Close()
Winsock1.Connect Text1.Text, Port
End Sub
Private Sub Winsock1_Connect()
Winsock1.Close
End Sub
Espero sus respuestas salu2 y sigan con este foro que nos sirve de ayuda para todos.