PopupMenus & Shortcut Keys

[Arc]

I have a problem with using shortcut keys in a hidden menu.

I am using a label to popup up the menu when clicked. In the menu are shorcut keys for various things. They Don't work unless i make the menu Visible, which i don't want for esthetic reasons.

Anyway to make a non visible menu respond to Shortcut keys?

[DaoK]

What is the code you are using ?

[Joacim Andersson]

No you have to handle the Shortcuts through code.
You can do this in the KeyDown event of your Form if you set the KeyPreview property to True.
Let say, for example, that you have 3 menu items in the hidden popup menu and the items are called mnuPop1, mnuPop2 and mnuPop3.
To these menu items you've added Ctrl+A, Ctrl+B and Ctrl+C as the shortcuts.
Then add the following code in the KeyDown event of the Form (remember that KeyPreview must be True)

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If (Shift And vbCtrlMask) = vbCtrlMask Then
        Select Case KeyCode
            Case vbKeyA
                mnuPop1_Click
            Case vbKeyB
                mnuPop2_Click
            Case vbKeyC
                mnuPop3_Click
        End Select
    End If
End Sub

Best regards

[Arc]

Thanks alot. Any idea what the Keycode is for the F keys? I.e. F1 F2 F3 ect...

[DaoK]

vbkeyf1 ?

[Joacim Andersson]

Yes DaoK is correct. The function keys are simply vbKeyF1 to vbKeyF12

[Arc]

Thanks alot guys.. works perfectly.