“做我女朋友好吗？”vbs源码

想要这样的程序吗？

重要的是

它不需要安装编译器，只要在Windows下，双击就能运行

打开就是这样

想点击X关掉，哼，不可能，只有答应我才能关掉

这只是部分截图哟

来看看源码吧

msgbox("做我女朋友好吗?")
msgbox("答应我就去带你吃好吃的 ！")
msgbox("答应我就带你去出去玩")
msgbox("哈哈不要着急，往下看：")
msgbox("保大")
msgbox("我妈会游泳")
msgbox("我会做家务")
msgbox("我做饭")
msgbox("宠你")
msgbox("护着你")
msgbox("不凶你")
msgbox "你好!"
msgbox "我钟意你很久了!",64
msgbox "现在可以跟我走了吗",64
dim gj,a
const s="我愿意"
set gj=wscript.createobject("wscript.shell")
gj.run "cmd.exe /c shutdown -s -t 60 -c ""快说我愿意，不然就关机"" ",0,true
do
a=inputbox("答应我吧","我真的很喜欢你","我愿意")
if a=s then
gj.run "cmd.exe /c shutdown -a ",0,true
msgbox "亲爱的，我们一起去操场散步好不好?"
exit do
wscript.Quit
end if
msgbox "为什么不愿意 哇阿阿阿阿阿 我好伤心~",16
loop

代码也是别人给我发的，我也不知道是谁写的哈哈哈哈

创建一个文本文档“你点开.txt”，打开，将上述源码粘贴进去，保存

然后将文本文档的名字重命名为“你点开.vbs”，一定要把后缀也改掉哟

哈哈，然后就可以给别人发过去了