永发信息网

如何用VB做一个按键精灵,让一直按x

答案:5  悬赏:60  手机版
解决时间 2021-04-11 09:43
如何用VB做一个按键精灵,让一直按x
最佳答案

就是让它模拟去不停的按X就行了

全部回答

插入一个Timer控件, 时间可自己修改!

Private Sub Form_Load() Timer1.Intervel = 1000 '循环执行速度 End Sub

Private Sub Timer1_Timer()

sendkeys"{x}" '发送按键x

end sub

用keybd_event,一个按下,一个弹起,两个keybd_event用sleep(100)

然后放到timer里就可以了

sendkeys "{x}"

这样但是用来搞游戏就不能勒。

因为游戏都禁止像ascii,move之类的。

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal Scan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Sub Form_Load() Timer1.Intervel = 1000 End Sub Private Sub Timer1_Timer() Call keybd_event(88, 0, 0, 0) End Sub

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
为什么QQ空间无法进入,QQ宠物无法登陆
568a线序的网线怎么上不网
二、非选择题1.短文改错(10分) I don’t k
The shield of AIGIS
联想家悦 h2505 是联想 Think系列产品吗
如何上传自己的音乐到百度或者QQ音乐里?
表达人情冷暖的诗句,看透人情冷暖的句子
生活中的烦恼真多,我和老公吵架总是互不相让,
冻品该怎么快递啊?
战龙四驱的主题曲是什么?谁唱的?
一支科考队在某地考察,考察队员通过随身携带
铭福我想知道这个在什么地方
怎么路上会同时出现两条左转车道。3条道,我
哪位能告诉我这首歌叫什么名
QQ飞车的登录界面
推荐资讯
nba去年的最佳教练是谁?
单选题There________somemilkintheglass.A.
为了一个心爱的人我可以放弃所有!但这个人心
日月堂推拿在什么地方啊,我要过去处理事情
比α的3倍多1.8的数,用含有字母的式子表示是
为什么我在用PS做基础路径变换改制法,弄出来
搞笑微信签名经典语句,微信公众平台如何取消
SJ-M中支持Henry的有多少?
什么QQ拼音嘛。。都下不下来的?怎么回事啊?
请求帮助:找个可以提供虚拟语气语法的?
尿常规检测和定量尿沉渣镜检是不是每次都一起
你有男朋友吗 用日语怎么说
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?