Question

用VBS代码实现模拟键盘按键时,怎样从循环中退出.

用VBS代码实现模拟键盘按键时,怎样从循环中退出.

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 3000
for i=1 to 100
WshShell.SendKeys "hello, welcome to cfan"
WScript.Sleep 1000
next

例如,按下 ESC键 是,退出 循环..

Answer 1

注意，你当前使用的vbs，而不是vb.
程序执行的事件在VBS中只有一个，那就是双击运行程序。
而在vb中，程序执行是由许多丰富的事件来完成的，比如按键事件，鼠标移动事件。。等等。如果你要监视系统中的ESC键，那么你得向系统挂个键盘钩子才行，可是VBS不能怎么怎么做，除非你自己编写第三方控件来实现。

总之，没有编写第三方控件的情况下不能实现这个操作的。

Answer 2

用for 循环不好做，用timer控件做吧，可以在按下 ESC键事件里把timer控件停掉。

Answer 3

不行，vbs没有这个功能，不过用到具体的应用上也能实现退出。