一段很有意思的vbs表白代码,爱情测试VBS

2018-11-28 作者: GZ资源网 浏览: 107

在桌面新建文本文档。然后打开输入如下代码:

const title = "爱情测试"

const yourname = "范冰冰"

const question = "你最喜欢的人是谁?请在下面的方框中输入他(她)的名字。"

const info = "你在说谎!不要逃避,实话实说。"

const scend = "你说出了你的心扉,那就向他(她)表白吧。"

dim youranswer

do

youranswer = inputbox(question, title)

if youranswer <> yourname then msgbox info, vbinformation+vbokonly, title

loop until youranswer = yourname

msgbox scend, vbinformation+vbokonly, title

输入完成以后,单击文件-另存为

  文件名:重要信息.vbs

  保存类型:所有文件

单击,桌面上的文件试试。(∩_∩)O哈哈~

你必须输入“范冰冰”才能关闭这个窗口。当然,里面的代码“范冰冰”可以根据你的需要修改。

大功告成,赶快将这个文件发给你的好友试试吧!她(他)一定会被你整哭的~!


    选择打赏方式

版权免责声明 1、本网站名称:GZ资源网
2、本站永久网址:https://www.jasboke.com
3、本网站的资源部分来源于网络,如有侵权,请联系站长进行删除处理。
4、会员发帖仅代表会员个人观点,并不代表本站赞同其观点和对其真实性负责。
5、本站一律禁止以任何方式发布或转载任何违法的相关信息,访客发现请向站长举报
6、本站资源大多存储在云盘,如发现链接失效  请联系我们 我们会第一时间更新。

评论
本文作者 阅读排行 文章推荐

首页
最新
投稿
精选
我的

欢迎您来到GZ资源网

点击用QQ号码登录 点击进入登录界面 点击注册

我知道了...