UC知道VBS中循环如何停止？
来源：百度知道 编辑：UC知道 时间：2024/07/05 22:49:22
我玩游戏时，需要长期按组合键ALT + 2
我想让他一直按，但是又不知道如何停止。本人菜鸟，只是从网上找的代码：
Dim objws
Set objws=WScript.CreateObject("wscript.shell")
WScript.Sleep 1000
objws.SendKeys "%2"
如果做成死循环，比如REM S .....GOTO S...这样一旦开始我怎么停止VBS运行？还有这个命令会不会违反游戏的规定，把我号封掉？
我想让他一直按，但是又不知道如何停止。本人菜鸟，只是从网上找的代码：
Dim objws
Set objws=WScript.CreateObject("wscript.shell")
WScript.Sleep 1000
objws.SendKeys "%2"
如果做成死循环，比如REM S .....GOTO S...这样一旦开始我怎么停止VBS运行？还有这个命令会不会违反游戏的规定，把我号封掉？
不会违反游戏的规定的，sendkeys的作用跟你自己按ALT+2键是一样的。
单纯用VBS来Hook键盘读入按键，目前还做不到。
Dim objws
Set objws=WScript.CreateObject("wscript.shell")
for i = 1 to 1000
WScript.Sleep 1000
objws.SendKeys "%2"
next
上面这个是循环1000次停止。
Dim objws
Set objws=WScript.CreateObject("wscript.shell")
do while 1
WScript.Sleep 1000
objws.SendKeys "%2"
loop
这是一直循环
你可用事先定义好按的次数，如用for 循环或加一记数器。
用Exit