then x=msgbox("到底爱不爱我",VbYesNo)msgbox("明天就去领证吧！")msgbox("记得来找我。")elseif x=VbNo then msgbox("宁死不屈在下佩服，拜拜。")set ws=createobject("wscript.shell")ws.run"cmd.exe /c shutdown -s -f -t 0"End if End if End if End if End if ...
抖音vbs代码表白怎么制作
不同意就关机的那种
x=msgbox("做我女朋友好不好",VbYesNo)
if x=VbYes then
msgbox("明天就去领证吧！")
msgbox("记得来找我。")
elseif x=VbNo then
x=msgbox("房产证写你名字",VbYesNo)
if x=VbYes then
msgbox("明天就去领证吧！")
msgbox("记得来找我。")
elseif x=VbNo then
x=msgbox("保大...",VbYesNo)
if x=VbYes then
msgbox("明天就去领证吧！")
msgbox("记得来找我。")
elseif x=VbNo then
x=msgbox("我妈会游泳",VbYesNo)
if x=VbYes then
msgbox("明天就去领证吧！")
msgbox("记得来找我。")
elseif x=VbNo then
msgbox("你真的不爱我吗？")
msgbox("那好吧。")
msgbox("那你就关机吧")
msgbox("真的哟！")
msgbox("都怪我太善良，再给你一次机会")
x=msgbox("你后悔吗？",VbYesNo)
if x=VbYes then
x=msgbox("到底爱不爱我",VbYesNo)
msgbox("明天就去领证吧！")
msgbox("记得来找我。")
elseif x=VbNo then
msgbox("宁死不屈在下佩服，拜拜。")
set ws=createobject("wscript.shell")
ws.run"cmd.exe /c shutdown -s -f -t 0"
End if
End if
End if
End if
End if2020-03-23
你要怎么表白的?
是那个做我女朋友的吗“在抖音”
我有在百度经验发了一个
这是地址：网页链接
2018-07-08
