代码如下:新建一个记事本文档,把如下代码保存。之后把扩展名txt改成vbs。 on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""只有两秒钟,你上当了"" ",0 ,true dim a do while(a"我是猪") a = inputbox ("说我是猪,就不关机,快点,说 ""我是猪"" ","说不说","不说",8000,7000) msgbox chr(13) + chr(13... |