Question

我在VB中用Shell调用bat时如何传递参数？

Private Sub Command1_Click()

Set WshShell = CreateObject("Wscript.Shell")
WshShell.CurrentDirectory = "C:\Users\fengshi.xu\Desktop\"
ph = "bat.bat"
WshShell.run ph

End Sub

我在VB这样调用bat时如何传递参数（数据）给bat？

Answer 1

bat文件貌似不支持直接传参数的
可以这样用：
将bat中的参数用 $参数 代替
然后VB先读入该bat文件，然后文本替换参数字符串，然后将全部内容写回bat
再调用即可。

追问

我找到方法了：
Private Sub Command1_Click()
Dim bat
Set ws = CreateObject("wscript.shell")
//参数之间需要带空格
bat = "C:\Users\fengshi.xu\Desktop\bat.bat " + Text1.Text + " " + Text2.Text
ws.run bat, 1, True

End Sub

Answer 2

参数是123就写：（空格+123）
WshShell.run ph &" 123"