查看单个帖子
旧 2009-04-28, 12:31 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】基于vb的cad二次开发问题

基于vb的cad二次开发问题
www.dimcax.com
基于vb的cad二次开发问题
我看论坛里面好多帖子都是针对lisp对cad二次开发,或者是在cad里面创建宏用vba进行开发,有没有谁有有关在vb中,创建cad对象,然后对cad进行二次开发的例子或者是资料呢?比如我下面写这个就是创建了一个cad对象的过程:
on error resume next
'连接到atuocad应用程序
dim acadapp as acadapplication
set acadapp = getobject(, "autocad.application")
if err then
err.clear
set acadapp = createobject("autocad.application")
if err then
msgbox "不能与autocad建立连接,请检查系统是否安装autocad绘图软件"
exit sub
end if
end if
'连接到autocad图形
dim acaddoc as acaddocument
set acaddoc = acadapp.activedocument
下面我想继续写,比如在cad里面引如一个我画好的零件图,然后对零件图进行标注,如何进行我就不太会了。

没有人知道么?我顶上去

和vba是一样的,只不过是把thisdrawing改为ducument
主要看cad的对象模型

该主题已被管理员屏蔽!

我也想请教

谢谢楼主普及信息!
正在学习中!
技术员
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)