vb 如何判断键盘被按下了

千问 · 2011-3-5 06:33:21

<pre id=\"best-answer-content\" class=\"reply-text mb10\">是按下某个键吗？

<h4 class=\"ask\">追问

<pre class=\"replyask-text\" id=\"content-844920\">是的
任何键都可以
判断是不是按了望高手不吝赐教鄙人不胜感激

千问 · 2011-3-5 06:33:21

<pre class=\"replyask-text\" id=\"content-845068\">要全局的吗？还是只针对程序窗体

千问 · 2011-3-5 06:33:21

<pre class=\"replyask-text\" id=\"content-845366\">全局你按下了键盘就算

千问 · 2011-3-5 06:33:21

<pre class=\"replyask-text\" id=\"content-848013\">加一个timer
Private Declare Function GetAsyncKeyState Lib \"user32\" (ByVal vKey As Long) As Integer

Private Sub Form_Load()
Timer1.Interval = 1
End Sub

Private Sub Timer1_Timer()
For i = 1 To 256
If GetAsyncKeyState(i)0 And i49 And i104 Then MsgBox \"您已按下键盘\"
Next
End Sub

千问 · 2011-3-5 06:33:21

<pre class=\"replyask-text\" id=\"content-848712\">叫我如何表达对你的感激之情

千问 · 2011-3-5 06:33:21

<pre class=\"replyask-text\" id=\"content-848951\">sendkeys\"\"发送按键的，据我猜想应该是窗体捕捉到按键事件，发送给各个控件的，没试验过，