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