xnn2004 发表于 2007-3-14 10:47:00

[求助]如何通过编制VB程序获取CAD图中对象的句柄

我想通过编制VB程序，获取CAD图中对象的句柄，应该如何实现呢？请各位高手指点一下，谢谢！

jkbanana 发表于 2007-3-14 12:30:00

<p>可以用 Handle 属性</p><p>object.Handle</p>

xnn2004 发表于 2007-3-15 11:18:00

这个我知道阿，在vba里我能实现获取对象的句柄，可是我想通过现启动vb程序，然后切换到cad界面中去选择对象获取对象的句柄。

wyj7485 发表于 2007-3-15 14:41:00

先了解一下vb操作cad的例子

lxyflr 发表于 2007-3-19 20:00:00

<p>On Error Resume Next<br/>Form3.Label1.Caption = "正在调用cad"<br/>Form3.Visible = True<br/>Set acadapp = GetObject(, "autocad.application")&nbsp; '若AutoCad已启动 , 则直接得到<br/>If Err Then<br/>&nbsp; Err.Clear<br/>&nbsp; Form3.Label1.Caption = "无cad实例，正在启动"<br/>&nbsp; Form3.Refresh</p><p>&nbsp; Set acadapp = CreateObject("autocad.application")&nbsp;&nbsp; '若AutoCad未启动，则运行它<br/>&nbsp;' If Err Then<br/>&nbsp;'&nbsp; MsgBox Err.Description<br/>&nbsp;'&nbsp; Exit Sub<br/>&nbsp;' End If<br/>End If<br/>上述代码就可获得控制cad了，acadapp就是cad的一个实例了，调用他的属性和方法就可以了</p>

weianhui 发表于 2007-3-20 09:51:00

支持楼上的,不过是不是还要在工程中包含CAD类型库
页: [1]
查看完整版本: [求助]如何通过编制VB程序获取CAD图中对象的句柄