社区 › VB › vb调用cad的问题!!

ZKSJLL 发表于 2007-9-25 19:06:00

vb调用cad的问题!!

各位高手,最近在用VB连接CAD2006的时候,遇到一个问题: 在模块内声明一个通用函数,用于连接cad:
public acadApp As object
public function ConnectToAcad(filename as string) as object
On Error Resume Next
Set acadApp = GetObject(, ".Application")
If Err Then
Err.Clear
Set acadApp = CreateObject("AutoCAD.Application")
If Err Then
MsgBox Err.Description
Exit Sub
End If
End If
MsgBox "Now running " + acadApp.Name + _ " version " + acadApp.Version
End Sub
问题:在调用函数的内部过程未结束时,acadApp对象有值,但在函数调用完成后返回主程序时acadApp被清空了!!请教一下这是为什么??

ZKSJLL 发表于 2007-10-3 18:20:00

问题找到了，谢谢各位！！！

dgw 发表于 2007-10-14 15:01:00

什么问题，怎样解决的，搂住发上来学学阿，

查看完整版本: vb调用cad的问题!!