关于vb的若干问题

mikewolf2k

1.连接cad的代码: Sub linkacad(acadapp)
On Error Resume Next
Set acadapp = GetObject(, "AutoCAD.application")
If err Then
err.Clear
Set acadapp = CreateObject("AutoCAD.application")
If err Then
MsgBox ("不能运行AutoCAD 2000，请检查是否安装了AutoCAD 2000")
Exit Sub
End If
End If
acadapp.Visible = True
End Sub 经我测试,好像在装有多个版本的cad时,连接的是R14的cad,而R14不支持vba(编译成dll调用也不行),因此会出错,请问有办法能让它连接其它版本的cad么(2000及以上) 2.用vb5编译成dll,cad2000和2002下工作正常,2004下不正常,请问该如何修改? 3.office2000的宏,在office2000和office xp下运行正常,office97下需要做些什么修改? 4.开发好的软件如何制作安装包?只需完成拷贝文件到指定目录和注册dll文件功能. 谢谢

efan2000

1、指定版本号：R2000，AutoCAD.application.15；R2004，AutoCAD.application.16。


2、可能是VB的支持库存在版本不一致的问题，最好在R2004下跟踪调试。


3、使用Office97支持的函数，它是向前兼容的。


4、有专门的第三方安装制作工具，可以用它来打包发布。

mikewolf2k

多谢多谢.继续发问:


1.2000和2002都是application.15吗?如果用户装了多个版本,怎样判断用户已经打开的是那个版本?这段代码能否改为连接到当前打开了的cad?


2.3,通过在其它版本上运行源程序,看什么地方出错的方法可行吧?源代码应该不需大变吧?


4.有没有用过的,推荐一下.


谢谢.

hitlelq

1、指定版本号：R2000，AutoCAD.application.15；R2004，AutoCAD.application.16


好象加了.15，.16也不行！

y1982_0

顶，这个问题解决了吗？我也遇到这个问题了？