Question

VBA 调用批处理，如何保持cmd窗口不闪退

我尝试了如下代码，出现了cmd窗口，但是闪退。而且批处理的代码没有执行。
VBA代码：
Dim cmdStr As String
cmdStr = "cmd.exe /c TestStaTool.bat " + pn + " " + bv
Shell cmdStr, vbMaximizedFocus
批处理：TestStaTool.bat
set path=%~dp0%jre\bin
java -jar TestStaTool.jar %1 %2
作用就是执行 jar文件，同时把 批处理中的两个参数传递进去。

java的处理过程是个较长的过程，如何能保持cmd窗口，看到jar的执行过程？

Answer 1

cmdStr = "cmd.exe /k TestStaTool.bat " + pn + " " + bv
cmd /k表示 执行完后面的命令时,窗口保留,/c表示窗口关闭