考虑到这个东西比较常用，所以单独开一贴来写

方法是：直接在.bat脚本中的最后一行，加cmd，即可。

例如：

脚本为（来自window(doc)系统的批处理脚本(.bat)学习）：

%1 start "" mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit cd /d "%~dp0" pnputil /add-driver driver\PGRUsb\*.inf /install pnputil /add-driver driver\PGRUsb3\*.inf /install

若想执行完后保持显示窗口，改为：

%1 start "" mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit cd /d "%~dp0" pnputil /add-driver driver\PGRUsb\*.inf /install pnputil /add-driver driver\PGRUsb3\*.inf /install

cmd

感谢匿名网友的指教。