QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 2021|回复: 5
收起左侧

[已解决] VB启动CAD有问题

[复制链接]
发表于 2013-5-23 09:51:37 | 显示全部楼层 |阅读模式 来自: 中国浙江宁波

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
本帖最后由 woaishuijia 于 2013-5-23 15:52 编辑 % e, M8 G/ w* ]+ a8 n) ?, h* Z& I9 p
- |" f5 U& \8 N9 q
各位大虾- ]. X4 {1 h1 j2 \( A- @) O) Z
本人在用VB启动CAD时出现“类型不匹配”的现象,无法启动
  1. Public ACADApp As AcadApplication On Error Resume Next
    7 J. J9 D* D$ E# {7 i2 w3 L
  2. Set ACADApp = GetObject(, "autocad.application")
    % y" F+ `$ p. q
  3. If Err Then0 g+ }% i' O  p1 M8 g
  4. Err.Clear
    1 _/ b) |) f1 b; L& e3 p3 B6 r5 G
  5. Set ACADApp = CreateObject("autocad.application"), X& a8 k( U) O8 U6 b
  6. If Err Then
    " z, T) V3 |. E1 h$ v8 H3 Z
  7. MsgBox ("不能运行Autocad,请检查是否安装了autocad")
    + F  N2 L$ X2 J* y! {+ t# |  b
  8. Exit Sub
    2 d; A: x/ z0 ?2 G  X) x  N- M1 r) {/ @
  9. End If) g4 u- v# U8 J. w0 _" x
  10. End If# V5 l3 W5 k; O1 N
  11. ACADApp.Visible = True
复制代码
请求帮助!
* _! O" c; L/ n4 d5 n+ S1 K8 x9 _3 j; l4 p
8 l- q( {$ H2 Q
 楼主| 发表于 2013-5-23 09:53:44 | 显示全部楼层 来自: 中国浙江宁波
是不是本人装了两个版本的CAD的原因啊2004\2007
发表于 2013-5-23 15:54:53 | 显示全部楼层 来自: 中国辽宁营口
你引用AutoCAD类库了吗?
 楼主| 发表于 2013-5-26 14:54:08 | 显示全部楼层 来自: 中国浙江宁波
引用了,在只装2004时可以调用,但在两个CAD系统下就不能用了,
发表于 2013-5-27 15:11:18 | 显示全部楼层 来自: 中国辽宁营口
在 autocad.application 后面加上版本号,例如
  1. CreateObject("autocad.application.16")
复制代码
应该是打开2004的.或者
  1. CreateObject("autocad.application.16.0")
复制代码
,我手头没有这两个版本,也说不准.反正2004是R16.0版本,2007是R17.0版本,打开2007应该是
  1. CreateObject("autocad.application.17")
复制代码
或者
  1. CreateObject("autocad.application.17.0")
复制代码
,前提是和引用的类库一致
 楼主| 发表于 2013-5-28 12:23:23 | 显示全部楼层 来自: 中国浙江宁波
搞定了,多谢了
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表