Hallo
Kann mir gerne jemand sagen, wie ich es mache, dass mein Programm auf irgendeinen Tastendruck reagiert ?
a$ = inkey$
if a$ = „“ Then
…
Dies habe ich schon ausprobiert, hat aber nicht gefunzt. Kann mir gerne jemand weiterhelfen
Gruss
Flo
Benutze die Funktion Keypressed.
repeat
.
.
.
until keypressed
Mario
Hallo Mario
Danke für deine Antwort !
Gruss
Flo
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
a$="":while a$ = "":a$ = inkey$:wend
if a$ = "" Then
holli
a$ = inkey$
if a$ = „“ Then
Ist schon richtig so, NUR: das Inkey prüft genau in dem Moment die Tastatur wenn diese Zeile Quellcode durchlaufen wird. d.h. Du weist nicht wann Du die Tasten drücken mußt. DEswegen mußt du eine Schleifen programmieren bis das Inkey (a$) einen Wert hat und diesen dann auswerten.
Do
a$ = inkey$
loop while a$ = „“
Diese Schleife wird solange durchlaufen bis a$ eine Wert hat, d.h. eine Taste gedrückt wurde. Verwendest Du mehrmals inkey$ dann soltest Du vor diese Schleife ein
a$=""
setzen um so evt. vorherige Tastendrücke zu „löschen“
mfg Slick
Noch ein Beispiel:
Soll nur auf ENTER gewartet werden und alle anderen ignoriert:
Do
a$ = inkey$
loop while a$ chr$(13)