不知道是谁

@echo off
setlocal enabledelayedexpansion
set ms=mshta vbscript:CreateObject("Scripting.FileSystemObject").GetStandardStream(1).Write(msgbox("是否立即关闭？",4132,"提示"))(window.close)
for /f %%i in ('!ms!') do if %%i EQU 6 exit
pause
复制代码

参考资料：