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

2025年03月19日 09:06

有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