为直男癌患者写的VBScript表白程序

说明

你要真敢用这个跟小姐姐表白,我……………………
只能orz orz orz………………

代码

MsgBox("我只想说你是我一直以来想要找的那个人,茫茫人海中,相识了你,是一种缘份,只希望用我的真诚,换取你的真情。")
MsgBox("我的手愿放在你手里,握手深情甜如蜜;我的心愿靠在你心里,心中话永不渝;我的眼愿看在你眼里,望一眼柔情时空也停。")
MsgBox("在你孤独悲伤的日子里,请你悄悄地念一念我的名字。并且说:有人在怀念我,在世上我活在一个人的心里。")
MsgBox("有一种感觉,它没有开端也没有结果,但它却时时刻刻占据我,那就是想你的感觉。")
MsgBox("自从你出现后,我才知道原来有人爱是那么的美好。")
MsgBox("就这样陪你一直走,再久也不会累;陪你在夏日街头漫步,为你撑伞遮挡阳光;为你递上一杯凉茶,让你倍感清凉。这个夏日,有你更美。")
MsgBox("从看到你的那一刻起,我的心跳就告诉我你是我今生等待的人。你给了我勇气和动力,我会用一生的努力来呵护这份心动的。")
MsgBox("数不完的星星,数不完的记忆。弹起我心中的吉它,让心曲飞向远方,伴你进入甜甜的梦乡。")
MsgBox("正是因为爱才悄悄的躲开,躲开的是身影,躲不开的是默默的情怀;今天我终于鼓起勇气,向你表达我的爱。")
MsgBox("我行过许多地方的桥,看过许多次数的云,喝过许多种类的酒,却只爱过一个正当最好年龄的人。")
MsgBox("之前我不相信一见钟情,但是见到你的那一刻,我否定了我的看法。我的心为你沦陷,从此只为你跳动。")
MsgBox("想再躺在你怀里,想再让你为我擦干眼泪,想再让你抱紧我,想再吻你的脸,想要你说声爱我!")
MsgBox("当风不再追云,当冰不再化水,当火不再炽热,当石不再坚硬,当世上没有爱情,我才能停止爱你……")
MsgBox("我爱你的容貌,更爱你的心灵,即使我不能使你幸福,至少也要愿幸福与你同在。")
MsgBox("你的心就是我的海角和天涯,我不能去得更远。我们此生共赴天涯海角,不是游走半个地球,而是人间相伴。")
MsgBox("你的离去注定让我一辈子的孤单,没有你的日子里,我的生活失去了色彩和活力。")
MsgBox("最美好的事不过就是,你突如其来给我一个拥抱,人潮拥挤你自然而然的牵起我的手。")
MsgBox("你的犹豫期已经超过,不许三心二意了!从今天起,只许温柔体贴,不许横行霸道;只许爱,不许恨;只许笑,不许哭。")
MsgBox("你的浅笑印在月亮上,每夜升起散落我身边。窗外融融的夜色,已装不下我无尽的怀念!")
MsgBox("不论你去舍处,我的心追寻着你的踪影,你落在地上的每一个足印,都会使我激动不已。")
For i=0 To 100000000
    x = MsgBox("你爱我吗?", 1)
    If  x = 1 Then
        MsgBox("哈哈,我们在一起咯")
        Exit For
    End If
Next

使用方法

把文本复制在记事本里,保存为XX.vbs的文件名。
在这里插入图片描述
在Windows环境下双击文件即可运行~~
运行起来太过脑残,我就不演示了hhh。

结语

“情话”来自网络,idea是某朋友突发奇想想出来的,本程序纯属娱乐~~

对评论区部分问题的回复总结

  1. 28行“无效字符”的提示报错:
    在这里插入图片描述
    这是CSDN的版权声明,大家自行去掉就行~~(有的时候会出现,有的时候不会出现,自行处理)

  2. “未结束的字符串常量”:
    在这里插入图片描述
    这个是ANSI编码的,你用UTF-8或者GBK那些其他编码打开自然是报错的。

  3. 无法生成这样的logo:
    在这里插入图片描述
    而是记事本图标
    在这里插入图片描述
    你可能是后缀名未去掉,保留后缀名是对学习编程的人比较友好的~~
    自己调一下:
    在这里插入图片描述

  4. Windows10支持吗?
    我的就是Win10笔记本。

  5. 表白的神器有了,可是还没遇到那个ta,谁能送我一个?
    不能……不能……不能……
    另:用这个表白……拉黑准备

  6. 运行结果是啥?
    百闻不如一见……
    你不答应TA,程序就不结束……只不过任务管理器可以关掉进程而已,你手动点击X是没用的啊~~

  7. 做个文件吧,实在是运行不了?
    对不起啊,不能直接传,我琢磨着这个大家高兴一下,也别费下载积分了大家说是不是?

  8. 死循环一下…
    您真狠,还是我比较慈悲为怀,只需要一亿次小循环而已啦

  9. 用哪个编译器?
    为降低使用麻烦,直接用记事本编辑,双击运行即可。


先补充这么多吧,感谢大家的支持与鼓励。
这个本来就不是什么有技术含量的,不过是大家一起玩一下而已……
喷子远点,大家一起高兴点 (高兴地 9 9 6)

发布了341 篇原创文章 · 获赞 600 · 访问量 3万+
展开阅读全文

没有更多推荐了,返回首页

©️2019 CSDN 皮肤主题: 创作都市 设计师: CSDN官方博客

分享到微信朋友圈

×

扫一扫,手机浏览