QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
本帖最后由 woaishuijia 于 2013-5-23 15:52 编辑 - H# |% ^9 Z5 u7 h8 E
* f$ m) w+ p/ c+ A9 l) \- z+ M
各位大虾
6 L2 Y  \+ {; Y- ~0 X0 `8 Q本人在用VB启动CAD时出现“类型不匹配”的现象,无法启动
  1. Public ACADApp As AcadApplication On Error Resume Next0 z6 e0 N5 v- N/ x3 ^( R, ?
  2. Set ACADApp = GetObject(, "autocad.application")& O1 f$ N. Y+ n6 k, j8 e, ~' Y$ Y
  3. If Err Then+ O& Y9 f- u$ B8 v3 b
  4. Err.Clear
    0 W) H% L3 R6 k  A% ?
  5. Set ACADApp = CreateObject("autocad.application")
    ! }5 d; |* {7 u# K0 |
  6. If Err Then/ C# g0 U6 }1 f; G% s$ D
  7. MsgBox ("不能运行Autocad,请检查是否安装了autocad")
    6 ?- M' Q* E6 Q8 ^# {
  8. Exit Sub* o0 }/ G6 m& i& ?5 v
  9. End If/ l6 S, S; U- U
  10. End If
    8 {3 }! q- g! U, }+ P' V
  11. ACADApp.Visible = True
复制代码
请求帮助!# m4 R) C; ?& f: _! T: n5 e
0 x6 ^! I. Z4 y7 Y
: U% k3 x, L' ^. E* z) z
 楼主| 发表于 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 )

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