Batch file 从VB宏（.vbs）运行批处理（.bat）文件

我在从vbs宏运行一个简单的批处理文件打开命令提示符时遇到问题，我知道这个问题经常被问到，我为此尝试了许多不同的建议解决方案，但都没有成功。我正在使用notepad++运行脚本/VB代码进行测试

我已经验证了.bat文件本身将正确执行，任何关于如何使其正确工作的建议都将不胜感激

下面是我为每个实例编写的代码

VB代码：

Sub CallBATCH()
    Dim argh As Double
    argh = Shell.Run "C:\Temp\cmdPrompt.bat"
End Sub

批处理文件：

start cmd.exe /k

编辑：以下是我实际打算调用的.bat文件：

@echo OFF
title AutoCAD DWG Duplicator 
color 0a
:start
set /P TemplateName=Please enter the template name you wish to copy:
set /P NumberOfCopies=Please enter how many copies you wish to make:
set Pathname="<filepath>"
cd /d %Pathname%
:init
for /L %%f in (1,1,%NumberOfCopies%) do copy %TemplateName%.dwg C:\Temp\%%f%TemplateName%.dwg 

您似乎正在调用一个.BAT文件，该文件依次打开一个带有START的命令提示符。我不清楚你为什么需要球棒

---

/K参数将打开命令提示窗口并使其保持打开状态。您没有为START提供任何参数，也没有在命令提示符打开时执行任何命令，因此这应该满足您的要求。更多信息请访问：

很抱歉，我使用命令提示符作为一个简单的.bat文件进行调用，然后我可以将其应用于需要调用.bat文件的任何实例。我继续编辑问题，以显示我要调用的.bat文件。注意：VBS和VBA不是一回事。

Dim oShell
Set oShell = WScript.CreateObject ("WScript.Shell")
oShell.run "cmd.exe /K"
Set oShell = Nothing