vbs程序中添加按ESC键关闭

楼主，这个问题是很多vbs狂热份子的疑问，vbs不是vb，它能接受程序执行的事件在VBS中只有一个，那就是双击运行程序，虽然在程序运行过程中可以d出msgbox选择框，但是根据楼主的初衷不符，事实上，在没有编写第三方控件的情况下，vbs是不可能实现这个 *** 作的。

其实要结束运行vbs的话也很简单，就是ctrl+alt+deld出任务管理器，然后把里面的wscriptexe进程结束掉就可以了，没必要那么麻烦。

希望能对你有帮助！

首先，找到你这个进程的进程名字，比如qq是qqexe，360是360xxxexe。好了，记下这个名字备用。

然后修改以下vbs代码，其实也就只是自定义下进程名字而已。

Set obj = GetObject("winmgmts:")

Set match = objexecquery("select from win32_process where name = '<name>'") '<name>代表程序运行时的进程名，要自定义，也就是这里改成你的qq或者360

For Each m In match

mterminate '执行关掉进程的命令，如果进程中有多个同名进程（譬如你登陆了3个qq号），也会一并关掉。如果你只想关掉你打开的那个进程，就要找到那个进程的process Identifier，然后在sql语句那里加个条件- and processid = '1234'就可以了

Next

msgbox "关闭进程成功！"

Set obj = Nothing

就这样，很简单，呵呵，求采纳！

以上就是关于vbs程序中添加按ESC键关闭全部的内容，包括:vbs程序中添加按ESC键关闭、怎么用vbs脚本关闭单个进程呢例如关闭后台运行的QQ或360，请大侠指点！、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！