<<< 返回 access911.net 编程静态资料库索引页

如何检测以及设置键盘状态

 

作者:  摘自:  录入:cg1  时间:2003-11-12  浏览人次:2119


专题地址:http://access911.net/fixhtm/79FAB31E12DC.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:

 


问题:

如何检测以及设置键盘状态

 

方法一:

原本想说使用SendKeys來模拟按这三个Key,但是不会动,只好,再使用API來完成这些程序都用到两次keybd_event,第一次模拟键按下,第二次模拟放开键,而我查MSDN的文件,说SetNumLock只在NT上有效,95上沒有作用,还真的呢!不过有时会成功个一次,实在不了解为何如此。

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
Private Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long) As Long

Const KEYEVENTF_EXTENDEDKEY = &.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/79FAB31E12DC.htm

 


上一篇:如何动态定义数组大小?

下一篇:将你的Access数据库移植到SQLServer7.0 

2017年2月22日生成静态资料