VBS整人代碼

記得剛開始學VB腳本語言的時候，寫了一段調用系統進程的代碼，挺好的：

dim wsh
if msgbox("笑笑很帥",vbyesno,"請回答是或否")=vbyes then
msgbox"你真聰明！"
elseif msgbox("你確定？",vbyesno,"請慎重")=vbyes then
msgbox"請抓緊保存未保存文件!30s后關機！！！"
set wsh=createobject("wscript.shell")
wsh.run "shutdown -s -t 30"
else msgbox"你真聰明！"
end if

編輯成為VBE格式，發給他，搞他一下！