on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""三分钟内决定是否嫁给我，否则会被关机......"" ",0 ,truedim ado while (a <> "我愿意")a = inputbox ("你愿意嫁给我么","爱的表白","",8000,7000)if ( a <> "我愿意" ) thenmsgbox "不愿意么？再考虑一下哦"end ifloopdim WSHshellset WSHshell = wscript.createobject("wscript.shell")WSHshell.run "cmd.exe /c shutdown -a",0 ,truemsgbox "哈哈哈哈，好乖"
如何利用最简单的代码表白方法：
1、首先，我们现在桌面创建一个新建文本文档.txt。
2、然后我们打开，在里面输入 msgbox("你想要说的话") 。这里的 msgbox（……） 可以有很多个，一个代表一句话且一个占用一个段落，括号引号必须是英文状态下的，引号内就是你想要说的话。之后保存（快捷键：ctrl+s）
3、保存好之后把新建文档重命名，名字可以随便，但扩展名一定要改成 .vbs
4、这样就完成了，可以发给心仪的ta了。这个打开之后的窗口是不能关闭的，必须强制性的看完才能关闭。
