DIM a PRINT "Press keys to see their key codes .. Press q to quit" WHILE a <> ASC("q") a = KEYPRESS PRINT a WEND
DIM
PRINT
"Press keys to see their key codes .. Press q to quit"
WHILE
ASC
(
"q"
)
=
KEYPRESS
WEND