求一个vbs高级表白代码

拜托不要走 2个月前 已收到1个回答 举报

尖尖尖尖叫 1星

共回答了164个问题采纳率:99.5% 评论

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

12小时前

3
可能相似的问题

热门问题推荐

Copyright © 2024 微短问答 All rights reserved. 粤ICP备2021119249号 站务邮箱 service@wdace.com