一个贼简单的代码表白

前一阵网上挺火的各种表白代码,
自己学着也做了一个 记事本编写,后缀改为vbs 就能运行了。

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

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

你可能感兴趣的:(一个贼简单的代码表白)