Como recojo palabras en un cliente realizado con winsock solo puedo recoger letras

Estoy realizando un pequeño programa en visual 6.0; un portatil a traves de un hyperterminal envía palabras las cuales en un cliente con winsock son comparadas y animan

shapes; todo funciona bien, desde el cliente al portatil no tengo problemas pero del portatil al cliente cuando envio por ejemlo "ON" solo soy capaz de recoger la O, se ve que cada caracter que llega se borra el buffer de recepción.

Tengo una tarjeta que convierte de ethernet a RS232

Programa que funciona:

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim buffer As String
Winsock1.GetData buffer, vbString
Text1.SelStart = Len(Text1.Text)
Text1.Text = buffer
If buffer = "h" Then
Shape55(0).FillColor = &HFF&
Shape57(0).FillColor = &HFF&
End If
End Sub

Programa que no funciona:

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim buffer As String
Winsock1.GetData buffer, vbString
Text1.SelStart = Len(Text1.Text)
Text1.Text = buffer
If buffer = "hola" Then
Shape55(0).FillColor = &HFF&
Shape57(0).FillColor = &HFF&
End If
End Sub

Muchas gracias José