信息轰炸代码vbs

有人管VBS叫“老年黑客工具”，信息我倒觉得它是轰炸Windows用户的第一堂社会工程课。写这个《信息轰炸代码vbs》的代码人，多半不是信息想攻击谁，就是轰炸单纯想看看屏幕弹窗能有多烦人。 先看代码本体。代码三行就能起事： ```vbs Do MsgBox "你被轰炸了",信息 vbExclamation, "警告" Loop ``` 保存成`.vbs`，双击，轰炸噩梦开始。代码弹窗像打地鼠一样，信息你点“确定”，轰炸它立刻再生一个。代码关不掉，信息除非调出任务管理器强杀进程。轰炸我试过，代码手速快的话能连点十几个，但手一停，弹窗又堆成山。 真正狠的版本会加延时和随机位置： ```vbs Do x = Int(Rnd * 8000) y = Int(Rnd * 8000) MsgBox "再点一次试试？", 64, "第" & i & "次" i = i + 1 WScript.Sleep 500 Loop ``` 弹窗会满屏乱飞，鼠标刚挪过去，它又跳走。这代码不碰文件、不碰注册表，纯靠系统对话框刷存在感。杀伤力全在“心理层面”——你明知道它无害，但就是烦得想砸键盘。 我见过最损的用法是在同事午休时，把这段代码设为开机启动。那人回来一碰电脑，屏幕瞬间被“你被轰炸了”淹没，鼠标点哪都是新弹窗。他以为是中了勒索病毒，脸都白了，最后靠强制重启才脱身。事后知道真相，追着那哥们跑了三层楼。 这代码有个技术死角：`MsgBox`是模态的，同一时间只能弹一个。所以轰炸的实际效果是“排队弹”，不是“同时弹”。真正的高手会用`WScript.Shell`的`Popup`方法配合多线程，但VBS单线程，得靠`CreateObject("WScript.Shell")`开多个进程。网上流传的“超级轰炸版”其实就是同时启动几个脚本，每个脚本不停弹窗，那才叫真轰炸——CPU占用率直接飙到80%，风扇狂转，鼠标卡成PPT。 写这代码的人，技术门槛几乎为零。但它的存在恰恰说明一件事：Windows的交互设计里，弹窗拥有“最高优先级”，用户没有全局的“忽略所有弹窗”按钮。这是设计漏洞，也是人性漏洞——我们对“不断打断”的耐心，远比想象中低。 我自己试过一版带倒计时的： ```vbs For i = 10 To 1 Step -1 MsgBox "还有" & i & "秒关机，骗你的", vbInformation, "倒计时" Next ``` 结果第3秒我就烦了，直接结束进程。那种“知道是假的，但依然烦躁”的感觉，比真正的威胁更让人恼火。 这代码没技术含量，但用好了能让人记住一辈子——不是因为你有多牛，而是因为你有多烦。如果你真想搞恶作剧，建议控制在10个弹窗以内，多了容易挨揍。毕竟，代码能删，同事的记仇本删不掉。