Red de conocimiento informático - Conocimiento del nombre de dominio - ¿Cómo enviar una cadena usando VB winsock (protocolo UDP)? urgente

¿Cómo enviar una cadena usando VB winsock (protocolo UDP)? urgente

Caption = "Remitente"

Text1.Text = ""

Comando1.Caption = "Enviar"

Winsock1.LocalPort = 1000

Winsock1.RemotePort = 1001

Winsock1.RemoteHost = Dirección IP del mismo nivel

Winsock1.Protocol = sckUDPProtocol. Protocolo = sckUDPProtocol

Winsock1.Bind 1000, Winsock1.LocalIP

Subfinal

Receptor:

Sub privado Form_Load() p>

Form1.Caption = "Final de recepción"

Text2.Text = "Final de recepción"

End Sub