Custom hotkey

hvilket program?

Jeg programmerer i VB6. Comboen skal bruges i et login program jeg laver.

Sæt egenskaben "KeyPreview" på formen til True

Læg denne kode på formularens KeyUp Eller KeyDown-event:

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
    Const ALT_MASK = 4
    If KeyCode = vbKeyQ And Shift = ALT_MASK Then
        cmdMyButton.Visible = True
    End If
End Sub