VB6如何运行多行CMD命令？

Posted 2023-04-09

VB6如何运行多行CMD命令？我想用VB制作一个EXE文件，点击按钮自动执行CMD代码，应该如何操作？
不使用VB调用外部CMD文件，执行多行CMD命令。

Private Sub Form_Load()
Shell "cmd /c msg %username% /time:5 你好，这是一个成功的实验"
end
End Sub

——————————————————
如果需要命令提示符执行完命令后不退出，则可用下面这个：
Private Sub Form_Load()
Shell "cmd /k msg %username% /time:5 你好，这是一个成功的实验"
end
End Sub

下面这个用函数解决：
Private Function cmd(str As String)
str = "cmd /k " & str & Chr(34)
Shell str
End Function

Private Sub Form_Load()
Dim str As String
str = "start c:\\&dir c:\\"
cmd (str)
End Sub 参考技术A shell语句追问

shell智能单句，多的不会

windows命令提示符中如何输入多行命令

防火墙进行IP和MAC地址绑定时要输入set arp 192.168.5.71 0014823e9d00 eth1
set arp always-on-dest
save如何在CMD命令提示符下完成，求高手解答
(我小白啊，不知道怎么一次输入3行命令，求详细解答）

参考技术A windows的命令行是不支持换行的如果要实现这个效果，可以先用记事本编辑，然后把后缀名由“txt”改成“bat”，双击即可运行 参考技术B 先复制需要运行的命令，然后在【命令提示符】窗口右键----粘贴