vbs脚本程序 的sendkeys 命令在 游戏程序打开的情况 为什么不执行命令

2024-12-13 11:35:00
推荐回答(2个)
回答1:

我在星际争霸一(单机版)情况下,
输入“钱,人口,数度,视野”等命令时,
需要象楼上回答的一样加延时,
双击VBS后,切换到游戏程序界面(激活游戏),
此过程需要的时间,由延时提供
Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000 (1000代表一秒,以此类推,时间不够就加大数值),
如果程序有标题栏可以用楼上的方法
WshShell.AppActivate "这里要改成你游戏程序标题栏的内容,要完全一致"
如果没有(是全屏状态),则手动切换。
程序参照楼上的答案。

回答2:

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 200
WshShell.AppActivate "这里要改成你游戏程序标题栏的内容,要完全一致"
WScript.Sleep 200
for i = 1 to 30
WshShell.SendKeys "w"
next