Das kann man mit dem Inkey () Befehl machen.
Syntax dazu:
Dim A as byte
Do
A = Inkey()
If a = XXX Then
mach was
end if
loop
end
Ist ein einfaches Beispiel in dem die Variable A den (Byte)Wert annimmt der per RS 232 gesendet wurde.
MfG
Neutro
Lesezeichen