?? 如何判斷多個鍵同時按下.txt
字號:
可 以 使 用 GetKeyboardState獲 得 所 有 按 鍵 的 狀 態(tài) , 參 考 :
Private Declare Function GetKeyboardState Lib "user32" _
(pbKeyState As Byte) As Long
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Dim keys(0 To 255) As Byte
GetKeyboardState keys(0)
If keys(vbKeyA) >= 128 And keys(vbKeyRight) >= 128 Then
Print "OK"
End If
End Sub
<END>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -