抖音很火的vbs表白代碼(簡單實用!)
發(fā)布日期：2022-07-20 19:39 | 文章來源：源碼之家
好玩的循環(huán)表白代碼
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)=" 你就答應(yīng)我把^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
Loop3，文件另存為（注意格式為ANSI）
3，運行
總結(jié)
到此這篇關(guān)于vbs表白代碼的文章就介紹到這了,更多相關(guān)vbs表白代碼內(nèi)容請搜索本站以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持本站！
版權(quán)聲明：本站文章來源標(biāo)注為YINGSOO的內(nèi)容版權(quán)均為本站所有，歡迎引用、轉(zhuǎn)載，請保持原文完整并注明來源及原文鏈接。禁止復(fù)制或仿造本網(wǎng)站，禁止在非www.sddonglingsh.com所屬的服務(wù)器上建立鏡像，否則將依法追究法律責(zé)任。本站部分內(nèi)容來源于網(wǎng)友推薦、互聯(lián)網(wǎng)收集整理而來，僅供學(xué)習(xí)參考，不代表本站立場，如有內(nèi)容涉嫌侵權(quán)，請聯(lián)系alex-e#qq.com處理。
相關(guān)文章
關(guān)注官方微信