前一阵网上挺火的各种表白代码,
自己学着也做了一个 记事本编写,后缀改为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
链接:https://pan.baidu/s/1r8UemUbkRaFxIdSbVaRYRg
提取码:8qd4
复制这段内容后打开百度网盘手机App,操作更方便哦
更多推荐
一个贼简单的代码表白
发布评论