‘下面是启动后,关闭计算器的VBS代码
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "calc"
WScript.Sleep 1000
WshShell.AppActivate "Calculator"
WScript.Sleep 1000
WshShell.SendKeys "%{F4}"
'你需要的代码
set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
WshShell.AppActivate "指定窗口的标题栏上的文字"
WScript.Sleep 1000
WshShell.SendKeys "%{F4}"
把任何运行着的程序最小化到系统托盘图标位置上,网上有这个小程序你可以搜一下,VBS的不知道能不能做到,你可以上官网查一下。