Also ich hab hier mal einen kleinen Programmausschnitt wo sowas passiert:
Code:
Dim InByte as Byte
Dim InString as String*24

Do
      InByte = inkey()                       'Zeichen aus Empfangspuffer abholen
      If InByte <> 0 then                    'wenn Zeichen vorhanden
         InString = InString + chr(InByte)   'Byte in entsprechenden Character umwandeln und an den String anfügen
      End if
Loop until InByte = 0
Das Beispiel geht davon aus, das ein String Zeichen für Zeichen (also Byte für Byte) seriell empfangen wird und die einzelnen Bytes dann wieder zu einem String zusammengesetzt werden. Das klappt bei mir wunderbar.
Vielleicht hilft es dir ja weiter.

Gruß, Cairol.