![]() |
【转帖】关于vb做cad二次开发的几个问题,想请教达人。
关于vb做cad二次开发的几个问题,想请教达人。
www.dimcax.com 关于vb做cad二次开发的几个问题,想请教达人。 这是我用vb连接cad的一段代码 private sub command1_click() dim acaddoc as acaddocument dim acadapp as acadapplication on error resume next set acadapp = getobject(, "autocad.application") if err then err.clear set acadapp = createobject("autocad.application") if err then msgbox err.description exit sub end if end if set acaddoc = acadapp.activedocument acadapp.visible = true end sub 我电脑中安装了cad2002与cad2009,所以程序中没有对cad版本号作指定。我想连接到cad2002,类型库用引用了cad2002的三个库,运行正常,可以连接到cad2002。在这里请教达人,有没有更好的连接方法,比如:可以任意移植到其他计算机上,计算机安装什么cad版本及连接什么版本的cad,不用修改代码,及所谓的万能连接? 还有,我想用vb打开一个指定路径的*.dwg文件,是不是用open,请达人给段代码看看。 这个问题我也想知道! 肯定是你的程序编写有错! y应该是有问题的 看原文, 我觉得不应该有问题。 技术员 |
所有的时间均为北京时间。 现在的时间是 04:52 PM. |