vb如何调用CMD命令

2024-11-27 06:10:44

推荐回答（4个）

回答1：

向窗体添加一个按钮：Command Button，Name(名称)属性：cmdOK，Caption属性为：确首蔽陪定(&O) 。
'并缺代码部分
Dim 命令者蠢 As String
Private Sub cmdOK_Click()
Shell "cmd.exe /c " & 命令 '就OK了
End Sub

回答2：

可孝雹以调用，自凳指己修改
Private Sub Command1_Click()
Shell "cmd.exe /c" & "ping www.sina.com>巧粗帆c:\abc.txt"
End Sub

回答3：

用个例子进行侍桥演示一下，比如在VB中调悔手用DOS命令，如何得知DOS命令是否已经执行完毕
方法如下：
Set wshl = CreateObject("wscript.shell")
wshl.Run "ping 9zp.com", 1, True 'true代表等待完成,1代表显示运行窗口
wshl.Run "sqlcmd -S 192.168.8.58 -U sa -P sa~!@# -d pubs -Q ""insert into test(MatNo) Values('" & Trim(Text1.Text) & "')""", 0, True 'true代表等待完成碧谈嫌,1代表显示运行窗口"
MsgBox "完成".

回答4：

shell "c:\\winnt\\system32\\cmd.exe /Q 你要裤键执行的命令"
c:\\胡滚巧winnt\\system32是备脊系统目录