使用VBS打开程序和关闭程序（隐藏CMD批处理运行窗口）

富士山下

自由职业

有时候，需要用cmd执行命令，且不能关闭，又不想这个命令窗口一直显示。这时，我们可以用vbs命令，调用bat,把以下代码保存为后缀为vbs的文件，如start.vbs

例子：我们想用run.bat运行test.exe，当然bat里是带有参数的，这里省略

启动bat

Dim Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
'下行是设置延时启动时间 1000等于1秒
WScript.Sleep(1000)
‘提示程序运行成功
Wsh.Popup("Loading Success!")
'下行引号内填写服务器上批处理文件的共享路径,下面的bat文件是和vbs文件在同一个文件夹
Wsh.Run "run.bat",0,True
Set Wsh=NoThing
WScript.quit

关闭bat，注意结束的进程是为上面的test.exe文件，而非bat文件

Dim Wsh
Set Wsh = WScript.CreateObject("WScript.Shell")
'下行是设置延时清除时间 1000等于1秒
WScript.Sleep(1000)
‘提示程序结束成功