vbs表白文件

待我称王封你为后i 2022-05-21 02:57 209阅读 0赞

看抖音上什么vbs停火，就自己稍微看了看，万一以后又用了。。。。。，都知道怎么用吧，把下面代码粘贴复制到新建的txt文件里，然后更改后缀名为vbs，之后点击就可以了，效果自己试（表白必备）

> MsgBox "            十年相遇"  
> MsgBox "            百年回眸"  
> MsgBox "          千年同船渡"  
> MsgBox "       我愿以万年的等待"  
> MsgBox "          百世的轮回"  
> MsgBox "       换你今朝一世情缘"  
> MsgBox "              可否"  
> dim a(5)  
> a(0)="    天大，地大，女友最大"  
> a(1)="          工资上交"  
> a(2)="           房写你名"  
> a(3)="          帮清购物车"  
> a(4)="   其他附加条件可以告诉我，一定牢牢铭记"  
> a(5)="        真的可以说^\_^"  
> Dim j  
> Do  
> j = inputbox("姑娘，做我女朋友吧")  
> if j = "我同意" Or j = "同意" Or j = "好" Or j = "嗯" Or j = "ok" Or j = "没问题" then    
> 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  
> else  
>   
> msgbox a(i)  
> i=i+1  
> if i >= 6 then  
> i = 5  
> end if  
>   
> end If  
> Loop
> 
> ![20190613133756775.png][]![20190613133818379.png][]![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L1BldGVyX1M_size_16_color_FFFFFF_t_70][]
> 
> ![20190613133837683.png][]![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L1BldGVyX1M_size_16_color_FFFFFF_t_70 1][]

[20190613133756775.png]: https://img-blog.csdnimg.cn/20190613133756775.png
[20190613133818379.png]: https://img-blog.csdnimg.cn/20190613133818379.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L1BldGVyX1M_size_16_color_FFFFFF_t_70]: /images/20220521/cc1460a4b4a14f43a8b27057deb00e63.png
[20190613133837683.png]: https://img-blog.csdnimg.cn/20190613133837683.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L1BldGVyX1M_size_16_color_FFFFFF_t_70 1]: /images/20220521/0697aba040aa4504bbc425e05488328f.png