Visual Basic - Mscomm ayuda urgente

Hola a todos resulta que tengo una balanza de la que deseo recibir los datos para guardarlos en una base de datos, mi problema es:
tengo este Codigo

1. If Not MSComm1.PortOpen Then
MSComm1.PortOpen = True
End If
tempo = Timer

2. Do
buffer = MSComm1.Input
Loop Until (tempo + 0.5) < Timer

MSComm1.PortOpen = False

y lo que pasa es que si no interfiere el usuario entre los pasos 1 y 2 no realiza ninguna lectura del puerto es decir, si entre 1 y 2 pongo por ejemplo un msgbox o si realizo una traza de la ejecución, lo hace todo perfectamente, pero si lo dejo a su aire, ahi ya al señor pues no le apetece hacer nada.

POR FAVOR ME PUEDEN AYUDAR
ESTOY TOTALMENTE DESESPERADA

GRACIAS

Cuanto dura el Timer??????

El cilco DO UNTIL que usas siempre se termina cuando el TIMER se acaba...

Podrias usar mejor un CONTROL TIMER, asi efectuas la lectura de manera asincrona, o sea, como un proceso aparte de la ejecucion.

Prueba con un timer y me avisas

Yo de ti, si estas tan desesperada tirate por un puente (alto) o mejor te titas a un tios y disfrutas

Sos el novio de la Bea? Pos me la chupais los dos.