Yeah, that's not nice.
I use it in software, like:

Code:
Dim S as String
'...
S=""
While (MSComm1.InBufferCount > 0)
  S = S & MSComm1.Input 'if MSComm1.InputLen=1 ...
Wend
Debug.Print S
'...