如何让键盘上按page up时响应事件

Question

KeyPress(KeyAscii As Integer) 事件对键盘上好多键都不响应
具体一些应该是键盘中间的功能键区，以及f1到f12的功能键
有谁知道如何触发呢？

Answer 1

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 33 Then End
End SubPrivate Sub Form_Load()
    Me.KeyPreview = True
End Sub

Answer 2

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 33 Then End
End SubPrivate Sub Form_Load()
    Me.KeyPreview = True
End Sub

Answer 3

此事件当按下和松开一个ANSI键时发生,具有焦点的对象可以接收该事件，一个窗体仅在它没有可视和有效的控件或KeyPreview属性被设置为True时才能接收该事件可以使用 KeyDown和KeyUP事件过程来处理任何不被KeyPress识别的击键，诸如：功能键、编辑键、定位键以及任何这些键和键盘换档键的组合等e.g.   Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
           If KeyCode=vbKeyPageUp Then
               DoEvents
           End If
       End Sub其他键对应的KeyCode你可以在对象浏览器中查找，都是以vbKey开头的:)

Answer 4

这个作用的典型用途为“俄罗斯方块游戏”。利用窗体的KeyPreview = True来响应按键事件！哈哈，楼上几位都说得很对，顶！！随便蹭点分哦