vbs简单实现弹窗

直接新建txt文档，复制粘贴下面代码：

do
a =msgbox("你怕是个ZZ吧？",vbYesNoCancel,"一份认真的问卷调查")
if a =vbYes then
    msgbox "emmmm，还算有点自知之明",,"恭喜你，真正的认识了自己！"
exit do
elseif a =vbNo then
    b =msgbox("心里没点AC数吗？",vbYesNo,"不要想太多，你就是！")
    if b =vbYes then
    msgbox "没点数，自己照照镜子啊！",,"这就是你学习好的原因啊"
    else
    msgbox "能认识错误还是好的",,"MDZZ"
    end if
else
    d =msgbox("取消你吗呢",vbYesNo,"还想点取消？")
    if d =vbYes then
    msgbox "取消也没用",,"这是一个轮回"
    else
    msgbox "不取消就赶紧承认吧",,"ZZ"
    end if

end if
loop

保存，修改文件格式为vbs，确认，打开。

“”双引号里面可以随意修改内容，看别人很多都是写表白的，作为一名钢铁直男，我觉得还是现在这样比较好玩，试试发给妹子会不会被打死，如果没更新博客应该就是当场去世了~

注意：第五行的 exit do 表示退出就是说第一次点击yes之后可以点确定退出弹窗，否则无限循环。（把exit do这句去掉就是死循环了，但是可以通过结束进程来关闭，这个就不多说了，有问题多百度！）

vbs实现恶搞无限弹窗，复制粘贴就能用相关推荐

Python恶搞无限弹窗程序
最近闲着无聊,写了个简单的无限弹窗,给你们看看
windows大多数的弹窗提示内容是可以复制的（我们主要用于报错内容复制粘贴去百度）
现在以记事本保存时候的弹窗为例,用鼠标点击弹窗的任意位置,然后Ctrl+C,然后在新的记事本中可以粘贴这个提示内容了.如下图粘贴效果 1.大多数弹窗适用 2.主要用于把"报错内容" ...
iPhone苹果手机iOS16剪贴板复制粘贴确认弹窗怎么关闭清理剪切板提醒设置方法的教程？
iPhone苹果手机iOS16系统已推送更新,随着越来越多的苹果iPhone手机升级到iOS16系统,有不少值得称赞的功能,但也有不少重吐糟的功能. 其中吐糟最多的就是iPhone苹果手机iOS16系 ...
厌倦了“复制粘贴”，我辞去了年薪45万美元的开发工作
[CSDN 编者按]年薪45万美元,在很多普通人看来遥不可及.但本文作者却在工作四年后,毅然地辞去了在Netflix这份年薪45万美元的工作,一起来听听他的理由吧. 原文链接:https://medi ...
手机扫一扫，现实物体隔空「复制粘贴」进电脑！北大校友的AI新研究，现在变成AR酷炫应用...
十三白交发自凹非寺量子位报道 | 公众号 QbitAI 魔法变现实,酷炫又实用. 还记得两年前,Zach King(男巫)的爆红魔术吗? 不仅从纸直接蹦出一个手机,还直接扔进了电脑里形成虚 ...
解决网页不能复制粘贴的问题
不知道你有没有过这样的经历,我们在网上好不容易搜索到自己想要的内容,复制粘贴时,却被网站要求注册或者购买VIP会员,非常得令人生气和无奈.今天,我们就来介绍一个非常好用的方法来解决这一系列问题. 在网 ...
电脑复制粘贴_手机扫一扫，现实物体隔空复制粘贴进电脑！北大校友的AI新研究，现在变成AR酷炫应用...
本文经AI新媒体量子位(ID:QbitAI)授权转载,转载请联系出处十三白交发自凹非寺魔法变现实,酷炫又实用. 还记得两年前,Zach King(男巫)的爆红魔术吗? 不仅从纸直接蹦出一个 ...
11、jeecg 笔记之界面常用整理 - 方便复制粘贴
11.jeecg 笔记之界面常用整理 - 方便复制粘贴 1.datagrid 操作按钮(按钮样式) 操作按钮的显示主要依赖于 <t:dgCol title="操作" fie ...
清华大学上海交大，复制粘贴般的优秀！
周怡冰(左)与周怡清今年招生季,因突发"先天性峡部裂"引发腰椎滑脱,于2020年高考前休学,却又在2021年重新考入清华大学未央书院,自称以努力换幸运的"励志女孩&qu ...
易语言word模板复制粘贴_请给你的Word“打底妆”(让Word跑快些系列)
作者:发愤的草莓链接:https://www.jianshu.com/p/b48762d8b333 如果用Word写长文时,你是不是习惯直接打开一份空白页面,然后开始敲打键盘,等到写完调整格式时,发 ...

vbs实现恶搞无限弹窗，复制粘贴就能用

vbs简单实现弹窗

vbs实现恶搞无限弹窗，复制粘贴就能用相关推荐

最新文章

热门文章