vbs整人合集

今天，我给大家出几个整蛊vbs

1.选择输入

  dim a
a=inputbox("如果仍要运行请输入：运行","来自作者的警告")
if a="运行" then
    msgbox"珍惜你电脑剩下的时间吧23333333!"
else
    msgbox "输入错误，请重新输入！"
end if

 双击会出现这个窗口，如果输入运行会这样 此时电脑并没有被破坏，因为第四行的后面并没有破坏性的代码

 如果输错了呢，则会出现以下窗口

ps：可以在msgbox"珍惜你电脑剩下的时间吧23333333!"的后面加上格式化代码让ta产生破坏力

2.关不掉的弹窗

while(1) 
msgbox "2333！" 
loop 

3.我以前就用这个程序放在学校图书馆查询书刊的机器上，好多人都那它没办法，哈哈

do 
msgbox "关不掉吧!" 
loop 

3.无限弹窗

:start
start cmd
goto start

ps：可以把cmd 换成指定exe，比如：explorer、notepad等

4.无限弹窗

while(1) 
msgbox "2333！" 
loop 

附件：vbs转exe工具以及ico

链接1：Vbs转exe工具下载_Vbs转exe工具官方版下载[转换工具]-下载之家

链接2：vbs转换exe工具-Vbs To Exe(vbs转换exe)下载 v3.0.9.0绿色版--pc6下载站

链接3：Vbs转Exe工具下载|Vbs To Exe v3.0.9.0绿色版下载-Win7系统之家

Windows11似乎不支持部分~

警告:部分为有害程序，请不要做非法行为，作者不承担任何责任！！

好了，今天就是全部的内容了！下期我们10年后再见，拜了个拜！

最后

以上就是炙热雨为你收集整理的vbs整人合集的全部内容，希望文章能够帮你解决vbs整人合集所遇到的程序开发问题。

如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。