ohohyo 发表于 2009-5-11 16:00:00

vba能不能不调出dos界面来运行dos命令啊

vba能不能不调出dos界面来运行dos命令啊
vba能不能不调出dos界面来运行dos命令啊
vba能不能不调出dos界面来运行dos命令啊

ohohyo 发表于 2009-5-11 17:06:00

跪求啊   跪求啊    跪求啊

ohohyo 发表于 2009-5-11 17:25:00

高手帮帮忙吧

mccad 发表于 2009-5-11 18:00:00

Private Sub Command1_Click()
On Error GoTo ts: '如果错误跳到ts:
       Set wshl = CreateObject("wscript.shell")
    wshl.run "arp -a", 0, True 'arp -a是要执行的DOS命令,0隐藏cmd窗口, 1显示cmd窗口
    MsgBox "命令执行完成!", vbInformation, "完成"
exit sub
ts:
   MsgBox "命令执行失败!", vbCritical, "失败"
End Sub

wuyunpeng888 发表于 2009-5-11 19:06:00

直接用shell函数，第二个参数用vbHide

wuyunpeng888 发表于 2009-5-11 19:21:00

Shell "CMD /C COPY c:\CONFIG.SYS D:\CONFIG.SYS", vbHide
执行DOS内命令将c:\CONFIG.SYS复制到D盘

ohohyo 发表于 2009-5-12 09:03:00

Shell "CMD /C 所以就是这里写要运行的dos程序就是了吧？", vbHide

ohohyo 发表于 2009-5-13 09:22:00

那如果我想要到一个路径名下==>在dos 界面下就输入cd c:\Document and Settings\Documents\New Folder就能变成c:\Document and Settings\Documents\New Folder》那在这里要怎么弄呢？

雪山飞狐_lzh 发表于 2009-5-13 09:41:00

编辑为Bat文件
然后shell

ohohyo 发表于 2009-5-13 10:21:00

请教怎么弄成bat啊？
页: [1]
查看完整版本: vba能不能不调出dos界面来运行dos命令啊