如何用按键精灵鼠标改按键,同时点击左键和按键
我想实现点击鼠标左键同时点击键盘的T键,网上找了下,就试试按键精灵能不能做出来,于是对着教程试着做了下命令,结果当然不行啦,折腾了几次都不行,是不是这种命令不适用于鼠标呢...
我想实现点击鼠标左键同时点击键盘的T键,网上找了下,就试试按键精灵能不能做出来,
于是对着教程试着做了下命令,结果当然不行啦,折腾了几次都不行,是不是这种命令不适用于鼠标呢?
Rem start
key1 = WaitClick()
If key1 = 32769 Then
KeyPress "T", 1
End If
Goto start
求指导... 展开
于是对着教程试着做了下命令,结果当然不行啦,折腾了几次都不行,是不是这种命令不适用于鼠标呢?
Rem start
key1 = WaitClick()
If key1 = 32769 Then
KeyPress "T", 1
End If
Goto start
求指导... 展开
展开全部
key1 = WaitClick()这句检测鼠标动作(这句是废话)
对于你的程序来说,上面这句话只要你的鼠标在没有任何按键操作的情况下,首先都会检测到你的鼠标按下左键的动作,程序会立即执行你的IF结构,所以只要你一按鼠标左键程序就会直接按T.
Dim k,t
rem start
k = WaitClick()
Delay 600
//设置长按时间0.6s,按需设置
t = GetLastClick() //在600ms后检测上次按键的状态确认是否是长按
If k =t and k=32769 Then //加一个k=32769 判断两次按键同样都是按鼠标的左键
KeyPress "T",1
End If
Goto start
对于你的程序来说,上面这句话只要你的鼠标在没有任何按键操作的情况下,首先都会检测到你的鼠标按下左键的动作,程序会立即执行你的IF结构,所以只要你一按鼠标左键程序就会直接按T.
Dim k,t
rem start
k = WaitClick()
Delay 600
//设置长按时间0.6s,按需设置
t = GetLastClick() //在600ms后检测上次按键的状态确认是否是长按
If k =t and k=32769 Then //加一个k=32769 判断两次按键同样都是按鼠标的左键
KeyPress "T",1
End If
Goto start
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询