通过vbs永久按键(按住键)

时间:2017-02-23 17:08:38

标签: vbscript

我写了这个小vbs脚本,在我的Chrome浏览器中按左箭头键:

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Google Chrome"
WshShell.SendKeys "{LEFT}"

但它模拟了即时发布的按键。是否还有一种方法可以在较长时间内解析按下的按键?

(我知道Keypress甚至可以在Javascript中轻松处理,但我正在尝试学习vbs。)

1 个答案:

答案 0 :(得分:1)

WshShell对象不提供发送KeyUp和KeyDown事件的方法。最接近你可以通过重复相同的键来达到你想要做的。这可以通过将.SendKeys放在循环中或通过在大括号内的键后面放一个数字来完成。

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Google Chrome"
WshShell.SendKeys "{LEFT 40}"