1,右键->新建文本文件

2,右键->编辑

3,粘贴下面代码

MsgBox"十年相遇"MsgBox"百年回眸"MsgBox"千年同船渡"MsgBox"我愿以万年的等待"MsgBox"百世的轮回"MsgBox"换你今朝一世情缘"MsgBox"可否"dima(5)a(0)="天大,地大,女友最大"a(1)="工资上交"a(2)="房写你名"a(3)="帮清购物车"a(4)="保大"a(5)="你就答应我把^o^"DimjDoSelectCasemsgbox("姑娘,做我女朋友吧",4)Case6MsgBox"--------"+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"youaremygirlfriend,"+Chr(13)+"fromthisdayuntiltomylastdays.",,""exitdoCase7msgboxa(i)i=i+1ifi>=6theni=0endifendSelectLoop

3,文件另存为(注意格式为ANSI)

3,运行

读到这里,这篇“vbs表白代码怎么写”文章已经介绍完毕,想要掌握这篇文章的知识点还需要大家自己动手实践使用过才能领会,如果想了解更多相关内容的文章,欢迎关注本站行业资讯频道。