关于用VB 2012进行CAD2012二次开发的问题

shindo_ku · 发表于 2015-5-18 10:13:00

在不打开外部图形的情况下将图形中的块插入到当前文档中需要用到ObjectDBX技术，然而在输入如下代码：
Dim objDBX As AxDbDocument
objDBX = CreateObject("ObjectDBX.AxDbDocument.18")
调试时显示“无法创建ActiveX组件”
不知什么原因？
另外还有别的方法解决图块插入问题吗，谢谢各位~~
搜索
复制

zzyong00 · 发表于 2015-5-18 12:04:00

ObjectDBX不能这样调用，他不离开Autocad环境，所以得用GetInterfaceObject
Set objDbx = objCad.GetInterfaceObject("ObjectDBX.AxDbDocument.18"）
objCad是autocad的application对象实例

shindo_ku · 发表于 2015-5-18 14:05:00

呵呵~按照您的指点，问题解决啦~
非常感谢~

关于用VB 2012进行CAD2012二次开发的问题

发表回复

精选推荐