if schleife die usb abfragt.

hallo
will eine if verzweigung haben, die abfragt ob eine bestimmte taste gedruckt wird und dann etwas macht...
habe mir das so vorgestellt:

Code:

---

Dim Eingabe As Byte
Wait 1
Print #4 , "USB- eingabe ( a links d rechts w auf s zu)"
Do
If Chr(eingabe) = "a" Then
M_6_v = 1
M_6_e = 1
M_6_r = 0
Waitms 100
M_6_v = 0
M_6_v = 0
M_6_v = 0
Endif
Loop

---

was is daran falsch??
kann bis jetz nich so wirklich basic :)) danke shcon mal

opps ok, habs shcon gefunden... hab ja die iengabe gar nicht eingelesen :/ jetz gehts...