The ON KEY(n) statement defines a line number or label to go to when a specified key is pressed. QB64 can reference a SUB.
- Predefined key numbers are shown below, where n is the number that represents that key.
- 1 - 10 for F1 - F10 function keys respectively
- 11, 12, 13 and 14 for UP, LEFT, RIGHT and DOWN numberpad arrows respectively.
- 15-25(29 in QB64) for user-defined keys. See: KEY n, Keyboard scancodes
- 30 - 31 for F11 - F12 function keys
Example 1: Using ON KEY with GOSUB to execute code.
Example 2: Setting multiple ON KEY statements to send different values to a SUB procedure.
FOR n = 1 TO 10 KEY n, STR$(n) ' assigns soft key as a numerical string ON KEY(n) Funct n 'designate SUB procedure and parameter value passed KEY(n) ON ' turns each key event monitor on NEXT KEY ON 'displays F1 to F10 soft key assignments at bottom of screen DO LOOP UNTIL INKEY$ = CHR$(27) END SUB Funct (num%) CLS' clears the screen and refreshes bottom soft key list PRINT "You pressed F"; LTRIM$(STR$(num%)) END SUB