正文

抖音很火的vbs表白代码(简单实用!)

︶ㄣSDDLL学院 メ
SDDLL学院V管理员 / 阅读
0927
这篇文章主要给大家介绍了关于抖音很火的vbs表白代码的相关资料,教你用vbs表白女朋友,包含多个弹窗绝对实在,保管实用,内容可以自己修改,需要的朋友可以参考下

好玩的循环表白代码

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表白代码内容请搜索米米素材网以前的文章或继续浏览下面的相关文章希望大家以后多多支持米米素材网！