Vb中怎么把一个bat文件写到一个路径并运行

2025-03-19 09:06:39

推荐回答（2个）

回答1：

找不到MSango.bin,是你的dk.bat中代码提示的错误，不是vb的问题。
你的dk.bat中代码 start MSango.bin。这个文件在D:\梦三国\New\不存在。

回答2：

试试以下代码：
Private Sub dk_Click()
Dim x
Open "D:\梦三国\New\dk.bat" For Append As #1
Print #1, "D:\"
Print #1, "CD D:\梦三国\NEW\"
Print #1, "@echo off"
Print #1, "start MSango.bin "
Print #1, "exit"

Close #1
Shell ("D:\梦三国\New\dk.bat")
End Sub