求一個(gè)vbs高級(jí)表白代碼？出現(xiàn)錯(cuò)誤時(shí)繼續(xù)下一步dm WSHshellAset WSHshellA=wscript.createobject(" wscript.shell") WSHshellA.ru

求一個(gè)vbs高級(jí)表白代碼？

出現(xiàn)錯(cuò)誤時(shí)繼續(xù)下一步dm WSHshellAset WSHshellA=wscript.createobject(" wscript.shell") WSHshellA.run文件" 命令行/C shutdown-R-t 180-C“三分鐘內(nèi)決定是否嫁給我，否則你將被關(guān)閉…”，0，truedim ADO while（A<> “我愿意”）A=InputBox（“你愿意嫁給我嗎”，“愛的告白”如果（a）&Lt>“我會(huì)”那么“我會(huì)”不？考慮“endifloopdim wshshellset WSHShell”=wscript.createobject(" wscript.shell") WSHshell.run運(yùn)行" 命令行/C關(guān)閉-a“，0，truemsgbox”