如何实现同时按下＂alt，shift和f5＂显示一个对话框＂成功＂？？？(注意是三个按键)

Question

我知道和按两个键原理是一样的，可当我运行如下语句时总是不成功：
　Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
　　　If KeyCode = 116 And Shift = 1 And Shift=4 Then 
　　　　　MsgBox "按了"
　End Sub

Answer 1

不懂，t字怎么同时按两次啊,呵呵If KeyCode = 116 And (Shift And 5) = 5 Then

Answer 2

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
      If KeyCode = 116 And Shift = 5 Then MsgBox "按了"
  End Sub

Answer 3

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
　　　If KeyCode = 116 And (Shift And vbShiftMask And VbAltMask) Then MsgBox "按了"
　End Sub

Answer 4

这个测试过：
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = vbKeyF5 Then
        If (Shift And (vbShiftMask Or vbAltMask)) Then MsgBox "按了"
    End If
End Sub