方法一：
Set WshShell=WScript.CreateObject("Wscript.shell")While(1)WshShell.run("calc")Wend
方法二：
每隔一秒钟，打开计算器，（做人还是厚道点好）Set Ws=WScript.CreateObject("Wscript.shell")doWs.run "calc"WScript.Sleep 1000loop
