[求助]：用vb调用cad时，怎么打开一个已经存在的文件？

ghl_729 · 发表于 2005-6-21 16:38:03

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

'连结cad程序
Private Sub Command2_Click()
Dim acadApp As Object
Dim acadDoc As Object
Dim moSpace As Object

On Error Resume Next
Set acadApp = GetObject(, "AutoCAD.Application")
If Err Then
Err.Clear
Set acadApp = CreateObject("AutoCAD.Application")
If Err Then End
End If
acadApp.Visible = True
Set acadDoc = acadApp.ActiveDocument
End Sub
在这里我打开cad时，打开的是一个新的文件，那位知道怎么在这里直接打开一个已经存在的dwg文件阿？

雪山飞狐(lzh) · 发表于 2005-6-21 20:46:01

acadApp.Documents.Open sPath

ghl_729 · 发表于 2005-6-22 14:56:40

这句话应该加在那个位置阿？

雪山飞狐(lzh) · 发表于 2005-6-22 19:13:04

acadApp.Visible = True后面

账号		自动登录	找回密码
密码			立即注册

[求助]：用vb调用cad时，怎么打开一个已经存在的文件？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子