mycad 发表于 2009-11-10 07:58:00

[求助]关于vb引用acad问题

<p>[求助]关于vb引用acad问题:</p><p>我的电脑中装入了acad2002与acad2008两个版本,使用vb引用acad类型库时,在VB中菜单“工程\引用”对话框中只有“autocad 2008 type library”,怎么没有2002的呢?</p><p>我原来的代码如下也运行不了了,怎样解决?谢谢!!!</p><p>sub testcad()</p><p>Dim acadApp As AcadApplication<br/>&nbsp;&nbsp;&nbsp; Set acadApp = GetObject(, "AutoCAD.Application")&nbsp;&nbsp;&nbsp;&nbsp;</p><p>&nbsp;&nbsp;&nbsp; If Err Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Err.Clear<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set acadApp = CreateObject("AutoCAD.Application.14")<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; If Err Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; MsgBox Err.Description<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Exit Sub</p><p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If</p><p>&nbsp;&nbsp; end if</p><p>end sub</p>

mycad 发表于 2009-11-10 09:58:00

搞定:重新装一下cad2002,在vb中引用“acadcad 2000 type library”就可以了。
页: [1]
查看完整版本: [求助]关于vb引用acad问题