MyKBHFunc = 1
‘加入自己的代码,用于表明响应
form1.text1.text=”Hook成功!”
End If
End Function
4.在Form中的代码很简单:
Private Sub Form_Load()
Call EnableKBDHook
End Sub
Private Sub Form_Unload(Cancel As Integer)
Call UnHookKBD
End Sub
打完收工!现在在form窗体状态下,敲空格键,就会响应你在MyKBHFunc
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




