首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

100分,几分钟帮写一个小程序,多谢

2012-03-09 
100分,几分钟帮写一个小程序,谢谢。当按下shift时,单击鼠标左键,鼠标所在的位置,发生连续5次左键连击同样单

100分,几分钟帮写一个小程序,谢谢。
当按下shift时,
单击鼠标左键,鼠标所在的位置,发生连续5次左键连击
同样
单击鼠标右键,鼠标所在的位置,发生连续5次右键连击


打游戏用,这连击5次的时间应该控制在50毫秒左右吧?

谢谢,我还不太会,谁帮写个?

[解决办法]
这很简单啊,使用SetWindowsHookEx,为了节省资源,启动时先设置一个低级键盘钩子,在回调中检测发生SHIFT按下的事件的时候,注意是按下,这时设置一个布尔全局变量为True,然后立刻又设置一个低级鼠标钩子,然后,在低级键盘钩子的回调中检测鼠标左右键的弹起消息,然后使用mouse_event模拟点击事件,如果需要间隔就在每次mouse_event中使用Sleep。这时如果低级键盘钩子检测到SHIFT弹起消息,设置全局布尔变量为False,然后卸载低级鼠标钩子,再次监视SHIFT按下消息,以此循环。
不过几分钟写出来确实有难度。。。LZ你真想得美妙,你玩游戏的跑来CSDN叫这帮人帮你写程序。。。这有点不现实。。。这样的程序如果帮人定制的话也可以收一些钱的了,所以LZ这贴会太监的。。。
[解决办法]

探讨
老马赶紧改代码吧,如果三天内楼主不来结帖的话,我给你结也行:)

[解决办法]
你去用按键精灵吧
这是脚本:

//按左键的
LockMouse 
LeftDoubleClick 2
Delay 10
LeftClick 1

//按右键的
LockMouse 
RightDoubleClick 2
Delay 10
RightClick 1

然后启动热键一个设为1 另一个设为2
按1 鼠标就点左键5下 按2 鼠标右键按5下


唉 感觉做了件无聊的事
[解决办法]
探讨
................

你上传的漏了modCommon.bas不能运行.

……

热点排行