Chiudere la finestra di un programma Gambas premendo i tasti Ctrl e 'c' della tastiera

Da Gambas-it.org - Wikipedia.

Per chiudere la finestra di un programma Gambas premendo i tasti Ctrl e 'c' della tastiera, può essere utilizzato il seguente codice:

Private i As Integer

Public Sub Form_KeyPress()
 
 If (Key.code == Key["c"]) Or (Key.code == Key.ControlKey) Then i += Key.code
 
 If i == (Key.ControlKey + Key["c"]) Then Me.Close
 
End