Visual Basic 6 - Problemi winsock

Ciao a tutti..avrei bisogno di una mano con i winsock.
Ho bisogno di trasportare diversi valori da un programma client a uno server.
Precisamente,ho 3 label,i cui valori in caption devo inviarle tramite winsock al server che dovrà riprodurli in altri 3 label.
Ho provato con
client

Private Sub Command5_Click()
Dim a As String
Dim b As String
a = Label4,Caption
b = Label5.Caption
c = Label6.Caption
WskClient.SendData a
WskClient.SendData b
WskClient.SendData c
End Sub

server

Private Sub wskServer_DataArrival(ByVal bytesTotal As Long)
Dim a As String
Dim b As String
Dim c As String
WskServer.GetData a
WskServer.GetData b
WskServer.GetData c
Label2.Caption = a
Label3.Caption = b
Label4.Caption = c
End Sub

Invece mi scrive tutti i valori solo nella prima label.
Ovviamente usandolo cosi sbaglio...come dovrei fare? Usare + di un winsock?
Illuminatemi voi.
Grazie in anticipo

visual-basic.it/articoli/…
visual-basic.it/articoli/…
visual-basic.it/articoli/…