js特效告白定制,求一个vbs高级表白代码？

关于“php_告白特效”的问题，小编就整理了【1】个相关介绍“php_告白特效”的解答：

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 "哈哈哈哈，好乖"

到此，以上就是小编对于“php_告白特效”的问题就介绍到这了，希望介绍关于“php_告白特效”的【1】点解答对大家有用。