Visual Basic - winsock.connect "libres.irc-hispano.org","6667"

Me gustaria que me facilitaseis algo de codigo sobre la conexion.
Al conectar que es lo que le tengo que enviar?.
El servidor me envia interrogaciones. ???????????????

Ablo del I.R.C (CHAT)


Os lo agradeceria.

Al fin lo encontre.
Aki teneis el codigo de una conexion cliente servidor.


Private Sub Command1_Click()
Winsock1.RemotePort = "6667"
Winsock1.RemoteHost = "libres.irc-hispano.org"
Winsock1.Connect
End Sub

Private Sub Command2_Click()
Dim DAT
DAT = Text2
Winsock1.SendData DAT & vbCrLf
End Sub

Private Sub Winsock1_Connect()
Winsock1.SendData "NICK toni12883" & vbCrLf
Winsock1.SendData "USER antonio antonio antonio antonio antonio" & vbCrLf
End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
On Error Resume Next
Dim data As String

Winsock1.GetData data

If InStr(data, "PING") = 1 Then
Winsock1.SendData "PONG " & Split(data, " ")(1)

End If
Text1.Text = data
End Sub