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

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

VBS框架：

msgbox"   "                     弹窗

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

inputbox("   ")                   输入

dim                                定义变量

1.

if MsgBox("这里是弹窗内容",vbYesNo,"这里是弹窗内容")=vbyes then

msgbox "这里是弹窗内容",64,"这里是弹窗内容"

else

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