一个贼简单的代码表白


前一阵网上挺火的各种表白代码,

自己学着也做了一个 记事本编写,后缀改为vbs 就能运行了。

在这里插入图片描述
在这里插入图片描述
(其中有一串代码会关机的呦,我是WIN10系统)
set ws=createobject(“wscript.shell”)
ws.run"cmd.exe /c shutdown -s -f -t 0"
在这里插入图片描述
哈哈 知道三号女生是什么梗吗? (来源于文松的一个小品,那个老弟啊姐给你爆灯的那个!!嗯哼)
就是注意一下代码中符号必须是英文的哦! 要不可麻烦了。
源码:

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
          msgbox("后悔就不给你关机了,3号女生!")
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


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM