Hm evtl so:

StoreString ist ein String.

So "speichern":
Code:
StoreString = StoreString + Str(Tastenabfrage)
Tastenabfrage = 0
Und evtl so auslesen:
Code:
DIM laenge as byte
DIM Taste as String * 2
laenge = LEN(Storestring)
IF laenge > 0 THEN
  Taste = LEFT(StoreString, 1)
ENDIF
Wär mal eine der Möglichkeiten.