Question

求高手帮我写个简单的vbs程序

为实现解放双手，我想写一个按键程序，要求用keydown和keyup写vbs，请给我源代码，谢谢！
最后配按完一次后间隔一段时间自动循环的！

Answer 1

vbs程序想要keydown和keyup分开来发送比较困难，一般来说，是用sendkeys发送按键一次的效果(即键按下到弹起的过程）。如果想要达到这个功能，要调用sendmessage、要知道窗口句柄，既然这样，还不如直接用按键精灵写脚本。

以下是sendkeys模拟按键的示例。

set WshShell = WScript.CreateObject("WScript.Shell")
wscript.sleep(1000)
WshShell.SendKeys "{UP}"
wscript.sleep(1000)
WshShell.SendKeys "{ENTER}"
wscript.sleep(1000)
WshShell.SendKeys "1"
wscript.sleep(1000)
WshShell.SendKeys "n"
wscript.sleep(1000)
====================
这个是vbs写的，以1秒间隔按键。如果不要间隔。删除sleep那些行。

追问

为什么我觉得用"sendkey”做不到按键精灵的效果？这个好像只是命令输入，不能达到按键的效果。

追答

从原理上说，按键精灵普通的模拟方式与vbs的差不多，但按键精灵是专门用来完成类似这种工作的，对这方面的功能进行了优化，比如，按键精灵专门针对游戏开发了硬件模拟方式，不能达到按键效果也是有可能的。