vb怎么打开CAD

1.我想用VB实现象dialog控件那样选择文件夹然后打开选定的.dwg文件该怎么做
2.能不能把窗体里的标签Caption内容或是Text内容保存进Word,怎么实现？
3.打包的时候一直不成功，提示找不到文件，怎么处理？
请大家帮忙指点下~~~

举报该问题

其他回答

第1个回答推荐于2016-06-16

.dwg用什么打开啊 ,他只能用cad才能打开呢
Private Sub Command1_Click()
CommonDialog1.DialogTitle = "请打开一个CAD文件"
CommonDialog1.Filter = "CAD文件(*.dwg)|*.dwg|CAD文件(*.dxf)|*.dxf"
CommonDialog1.ShowOpen
wenjinname = CommonDialog1.FileName

Shell "路径\acad.exe " & wenjinname

End Sub本回答被提问者采纳

第2个回答 2007-08-27

用 ShellExecute.

相似回答

vb怎样与AUTO CAD连接的!答：打开CAD，点击“工具”/“宏”/VB管理器，再在里面写程序，运行时，要先加载VB，再点击“宏”里面的“加载工程”，再把你的程序加载进去就可以运行了。如果你的程序不能运行，说明你是用VB编写的，不是用VBA编写的，虽然语法相同，但也运行不了，你自己试试吧！其实只要你会VB，VBA就很简单，只是...

如何使用vb.net调用cad进行绘图答："AutoCAD.Application") If Err.Number Then Err.Clear() AcadApp = CreateObject("AutoCAD.Application") If Err.Number Then MsgBox("不能运行AutoCAD,请检查是否安装了AutoCAD") Exit Sub End If End If AcadApp.Visible = True '界面可视 ...

如何在VB里加载CAD文件答：Set tmCAD = GetObject _(, "AutoCAD.Application.16")If Err Then Err.Clear Set tmCAD = CreateObject _("AutoCAD.Application.16")If Err Then MsgBox Err.Descri ption Exit Sub End If End If ’ 连接至 AutoCAD 图形 tmCAD.Visible = True ’ 隐式地打开 tmCAD.Documents.Open "c:\123...

vb 中调用 cad答：If Err <> 0 Then '没有打开 Err.Clear Set myAcadApp = CreateObject("Autocad.Application") '打开CAD If Err Then MsgBox Err.Number & ":" & Err.Description '打开失败 Exit Sub End If End If On Error GoTo prcERR myAcadApp.Visible = True '显示CAD Set activeDoc = myAcadApp....

启动CAD时显示VBA不再随AUTOCAD一同安装,是怎么回事,以前都不是这样,要...答：一。如何在 VB 中连接 AutoCAD。启动 VB ，引用 AutoCAD 类型库。操作步骤：从“工程”菜单中选择“引用”选项，启动“引用”对话框。在“引用”对话框中，选择 AutoCAD 类型库，然后单击“确定”。定义模块级变量 AutoCAD 应用程序 (acadApp) 和当前的文档 (acadDoc)。如果 AutoCAD 正在运行，使用 ...

VB怎么调用CAD和PDF文件答：1,你安装pdf阅读器或adobe acrobat后，会有一个控件adobe acrobat browser control type library 1.0，应该可以下载到这个控件AcroPDF.DLL2,dwg用什么打开啊 ,他只能用cad才能打开呢 Private Sub Command1_Click()CommonDialog1.DialogTitle = "请打开一个CAD文件"CommonDialog1.Filter = "CAD文件(*....

vb怎么打开CAD答：,他只能用cad才能打开呢 Private Sub Command1_Click()CommonDialog1.DialogTitle = "请打开一个CAD文件"CommonDialog1.Filter = "CAD文件(*.dwg)|*.dwg|CAD文件(*.dxf)|*.dxf"CommonDialog1.ShowOpen wenjinname = CommonDialog1.FileName Shell "路径\acad.exe " & wenjinname End Sub ...

大家正在搜

vb怎么打开怎么打开vb文件 vb怎么打开一个程序 cad文件怎么打开 cad怎么打开工具栏 cad怎么打开命令窗口 CAD打开 CAD打开加载缓慢打开CAD看图