shift/question mark/control keycode

[HeSaidJoe]

I have a form filling the screen (Blank)
I want the user to press (shirt + ? + Control) keys
simultaneously to trigger a msgbox.

If this is possible?

I need the code for this event:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

'If keycode = what then
'msgbox "Open Form"
'Endif

End Sub

[mlana]

Try this code. It worked for me.

Option Explicit

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Dim ShiftDown As Boolean
Dim CtrlDown As Boolean

ShiftDown = (Shift And vbShiftMask) > 0
CtrlDown = (Shift And vbCtrlMask) > 0

If CtrlDown And KeyCode = 191 And ShiftDown Then
MsgBox "Ctrl Shift ? was pressed."
End If

End Sub

[HeSaidJoe]

Thank you very much...
Does the trick.
Wayne