如何捕获键盘被敲击？

Question

keydown, keypress, keyup事件。
你要干什么？说详细些。

Answer 1

Private Sub Text8_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = 13 Then
        Command1.SetFocus
    End If
End Sub
其中“13”表示回车键

Answer 2

比如在一个窗口中我放置了一个Command按钮，它的Caption为 退出(Q) Q下有一横线， 按常规在WINDOWS操作系统中只需按Alt+Q即可激发此按钮事件，现在我需要实现这样的功能：进入窗口后，只需点击键盘上的Q键就可激发此事件。现在就是怎样才能实现？

Answer 3

API过程:
private form_load()
Keydb_events 18,0,0,0     '18 为ALT键!
end sub
Private Sub form_KeyCode(KeyCode As Integer, Shift As Integer)
    keydb_events 18,0,TRUE,0     '放开ALT键!
End Sub
或者:
private sub form_keyDown(KeyCode as integer,shift as integer)
if ucase(chr(KeyCode))="Q" then command1_click
end sub

Answer 4

我看楼主是才学编程吧，表述一点都不专业你要实现的功能的代码很简单：private sub form_keyDown(KeyCode as integer,shift as integer)
    if KeyCode = 81 then command1_click
end sub

Answer 5

如果你想捕获FORM中的键盘事件的话，用KEYPRESS，KEYDOWN,KEYUP事件

Answer 6

楼上的朋友，我就是想捕获Form的键盘事件，但是用用KEYPRESS，KEYDOWN,KEYUP事件无法捕获到。我在窗口内敲击键盘，可它并没有激发窗口内的KEYPRESS，KEYDOWN,KEYUP事件。

Answer 7

如果想要窗体先获得键盘时间,则必须将窗体的keypreview设为true,然后就可以了.

Answer 8

keydown,keyup,keypress没错的,找本书看看就知道了.