如何获取多个CAD实例中的任意一个呢?
本机开启了多个CAD实例,如何获取多个实例中的任意一个实例对象呢?使用了GetObject函数,但这个函数只能获取CAD程序的第一个实例对象。
Dim doc As AcadDocument
For Each doc In ThisDrawing.Application.Documents
If doc.name = "PEGGYLAO.dwg" Then
doc.Activate
doc.SendCommand "_zoom" & vbCr & "E" & vbCr
doc.Regen acAllViewport
end if
next
我的意思是本机开启了多个CAD程序进程,访问需要从CAD外部,如在VB6中使用GetObject等方法获取启动的CAD程序对象。如果本机启动了多个CAD程序进程,那个通过GetObject获取到的只是第一个启动的程序实例,我想获取当前激活的实例或者是任意一个实例,有办法实现吗???
正在困扰中呀。
页:
[1]