用VB对指定窗口后台按键。
我是玩一个网页游戏(也有客户端)。我想在游戏里自动挂机捡钱。因为这个游戏按下空格键就可以捡了。所以我想帮我设一段完整的代码,能自动在游戏每1秒按一次空格键就行了。要后台运...
我是玩一个网页游戏(也有客户端)。我想在游戏里自动挂机捡钱。因为这个游戏按下空格键就可以捡了。所以我想帮我设一段完整的代码,能自动在游戏每1秒按一次空格键就行了。要后台运行,即,我打开游戏网页或客户端,再打开VB文件,就能自动捡钱,并且能最小化游戏窗口,让我聊QQ,看电影之类。有个人给我下面的代码:set ws=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
if not fso.fileexists("停止捡钱.bat") then
set file=fso.createtextfile("停止捡钱.bat")
file.writeline "@echo off"
file.writeline "taskkill /f /im WScript.exe"
file.close
end if
msgbox "捡钱每隔0.1妙按一次空格键,停止双击当前目录下的“停止捡钱.bat”文件。或按自己定义的快捷键",4096+48,"友情提示"
do
ws.sendkeys " "
wscript.sleep 100
loop
是可以自动捡钱。但不能最小化后台运行。
请高手帮改改或设一个。十分感谢!!!!!我是菜菜菜菜鸟,要完整的代码,我复制到记事本,再改成VBS扩展名就直接能用的。
最后可能改动的地方,如:窗口名称,或时间,帮我表明出来。 展开
set fso=createobject("scripting.filesystemobject")
if not fso.fileexists("停止捡钱.bat") then
set file=fso.createtextfile("停止捡钱.bat")
file.writeline "@echo off"
file.writeline "taskkill /f /im WScript.exe"
file.close
end if
msgbox "捡钱每隔0.1妙按一次空格键,停止双击当前目录下的“停止捡钱.bat”文件。或按自己定义的快捷键",4096+48,"友情提示"
do
ws.sendkeys " "
wscript.sleep 100
loop
是可以自动捡钱。但不能最小化后台运行。
请高手帮改改或设一个。十分感谢!!!!!我是菜菜菜菜鸟,要完整的代码,我复制到记事本,再改成VBS扩展名就直接能用的。
最后可能改动的地方,如:窗口名称,或时间,帮我表明出来。 展开
若以下回答无法解决问题,邀请你更新回答
3个回答
展开全部
直接用按键精灵编就可以了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
直接用按键精灵编就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询