Visual Basic - prblemas con el puerto serie

Hola
Estoy haciendo un programa en el que estoy utlizando el puerto serie con el mscomm. El problema que tengo es que el buffer de entrada se llena pero a la hora de mostrar el codigo del buffer por pantalla, no aparece nada. el codigo es el siguiente:

Private Sub Command1_Click()
MSComm1.RThreshold = 7
MSComm1.InputLen = 0
MSComm1.Settings = \"9600,N,8,1\"
MSComm1.Interval = 150
MSComm1.PortOpen = True
End Sub

Private Sub Command2_Click()
MSComm1.PortOpen = False
End
End Sub

Private Sub MSComm1_OnComm()
Dim variable As String
If MSComm1.CommEvent = comEvReceive Then
variable = MSComm1.Input
Text2.Text = variable
End If
End Sub

Private Sub Text1_Change()
MSComm1.CommPort = Text1.Text
End Sub

A ver si me podeis hechar una mano
gracias