代码

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

使用方法

把文本复制在记事本里，保存为XX.vbs的文件名。

在Windows环境下双击文件即可运行，不附截图。

结语

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

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

28行“无效字符”的提示报错：

这是CSDN的版权声明，大家自行去掉就行（有的时候会出现，有的时候不会出现，自行处理）。
“未结束的字符串常量”：

这个是ANSI编码的，你用UTF-8或者GBK那些其他编码打开自然是报错的。
无法生成这样的logo：

而是记事本图标

你可能是后缀名未去掉，保留后缀名是对学习编程的人比较友好的~~
自己调一下：
Windows10支持吗？
我的就是Win10笔记本。
表白的神器有了，可是还没遇到那个ta，谁能送我一个？
不能……不能……不能……
另：用这个表白……拉黑准备……
运行结果是啥？
百闻不如一见……
你不答应TA，程序就不结束……只不过任务管理器可以关掉进程而已，你手动点击X是没用的啊

【VBS】一款无聊的 Visual Basic Script 表白程序相关推荐
1. 【VBS】IE11如何运行 Visual Basic Script 程序
  网页源码 <html><body><script type="text/vbscript">document.write("Hello ...
2. vbs(Visual Basic Script) 笔记
  vbs(Visual Basic Script) 笔记 VBS是基于微软公司可视化Visual Basic的脚本语言,不编译成二进制文件, 直接由宿主(host)解释源代码并执行. vbsVisual ...
3. VBS是基于Visual Basic的脚本语言，全称是：Microsoft Visual Basic Script Edition
  VBS是基于Visual Basic的脚本语言.VBS的全称是:Microsoft Visual Basic Script Edition.(微软公司可视化BASIC脚本版). 其语言类似Visual ...
4. 消息发送 C语言版和 Visual Basic Script版
  目录用C语言实现用 Visual Basic Script实现用C语言实现 //使用之前要复制的内容 #include<stdio.h> #include<Windows.h& ...
5. Visual Basic Script 程序参考手册-学习第4天：数组列表及Msgbox函数
  VBS(Visual Basic Script)初识及入门 - 数组及 msgbox函数一. 数组列表 (一) 静态的数组列表 Dim astrPhoneList(2,4) '从这里就知道了该列表 ...
6. VBS--Microsoft Visual Basic Script Edition（一）
  VBS是基于Visual Basic的脚本语言. 开发工具:记事本(Notepad).(是的!你没有看错!)其实任何一种文本编辑器都可以用来开发VBS, 只不过记事本是由系统自带的, 比较方便好找(建 ...
7. 【VBS】归纳 Visual Basic Script 内置函数
  Date/Time 函数函数描述 CDate 把一个有效的日期或时间表达式转换为日期类型 Date 返回当前的系统日期 DateAdd 返回已添加指定时间间隔的日期 DateDiff 返回两个日期 ...
8. Visual Basic Script 程序参考手册-学习第3天：更系统的深入研究数据类型和数据转换
  目录一. VBS中的数据类型二. VBS中的数据类型转换三. 几个例子来看看应用情况 (一) 第一个例子 (二) 第二个例子 (三) 第三个例子 (四) 第四个例子 (五) 第五个例子 (六) ...
9. Visual Basic 桌面小程序
  目录 1. 基本格式 2. 实现步骤 a. 文件名 b. 改变图标 3. 实例集 a. QQ.vbs b. 搭讪.vbs c. 表白.vbs 1. 基本格式 dim 指定一个存储空间: 必须有loop ...
最新文章
热门文章

【VBS】一款无聊的 Visual Basic Script 表白程序

代码

使用方法

结语

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

【VBS】一款无聊的 Visual Basic Script 表白程序相关推荐

最新文章

热门文章