I'm trying to use VB5 to write a program thats talks to an 8052. I have been able to send and recieve data, but only in blocks, but I need to recieve it in byte form. But I mainly need the program(vb5) to know when data has arrived. I am using mscomm.ocx as the control. Here is my code

Do
DoEvents
Buffer$ = Buffer$ + Comm1.Input
Loop Until InStr(Buffer$, vbCrLf) And Len(Buffer$) >= 1

How do I keep the buffer from going over 1 byte?

Thanks,
Ben