好玩的循环表白代码
1,右键->新建文本文件
2,右键->编辑
3,粘贴下面代码
MsgBox \” 十年相遇\”
MsgBox \” 百年回眸\”
MsgBox \” 千年同船渡\”
MsgBox \” 我愿以万年的等待\”
MsgBox \” 百世的轮回\”
MsgBox \” 换你今朝一世情缘\”
MsgBox \” 可否\”
dim a(5)
a(0)=\” 天大,地大,女友最大\”
a(1)=\” 工资上交\”
a(2)=\” 房写你名\”
a(3)=\” 帮清购物车\”
a(4)=\” 保大\”
a(5)=\” 你就答应我把^o^\”
Dim j
Do
Select Case msgbox (\”姑娘,做我女朋友吧\”,4)
Case 6
MsgBox \” —- —-\”+chr(10)+\” / \\ / \\\”+Chr(10)+\” / \\/ \\\”+Chr(10)+\” / I \\ \”+Chr(10)+\” \\ LOVE /\”+Chr(10)+\” \\ U /\”+Chr(10)+\” \\ xx /\” +Chr(10)+\” \\ xx / \”+Chr(10)+\” \\ xx /\”+Chr(10)+\” \\ /\”+Chr(10)+\” \\/\”,4096 ,\” 此心似我心\”
MsgBox \” you are my girlfriend,\” + Chr(13)+\” from this day until to my last days.\”,,\” \”
exit do
Case 7
msgbox a(i)
i=i+1
if i >= 6 then
i = 0
end if
end Select
Loop
3,文件另存为(注意格式为ANSI)
3,运行
总结
到此这篇关于vbs表白代码的文章就介绍到这了,更多相关vbs表白代码内容请搜索悠久资源网以前的文章或继续浏览下面的相关文章希望大家以后多多支持悠久资源网!
您可能感兴趣的文章:
- Java实现浪漫流星表白的示例代码
- 三个520专属Python表白代码分享
- 基于Python绘制520表白代码
- C语言实现烟花表白程序代码
- Python浪漫玫瑰盛开表白源代码
- python练习之曾经很火的小人画爱心表白代码
- 520必备!这些Python表白代码祝你脱单成功
- 程序员的七夕用30行代码让Python化身表白神器
- 程序猿表白妹子的代码神器