今天无奈改了段vbe[visual basic encoded script]代码,~~ 留下手记: 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) if a="- exit" then WSHshellA.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "竟然知道此预留操作,真聪明~~~" exit do end if loop if a<>"- exit" then msgbox chr(13) + chr(13) + chr(13) + "嗯,果然是猪,看在猪的份上,不关你机了~~~~~~ " WSHshellA.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "输入:- exit;就可以不做猪了~~ 哈哈哈哈 猪~~" end if