问AUTOCADR14是否支持VBA及其他
前段时间基于AUTOCAD2000开发了VBA工程,运用于客户的时候,发现客户使用的是R14,而里面好象没有支持VBA的选项,加载工程的菜单也只能加载LSP工程,或者运行SRC脚本,而我以前写的是DVB的程序,怎么用呢? 中文版的R14.01支持VBA。但R14的VBA对象模型与2000版有很大的差别,因为R14只是属性探索阶段,很不成熟。 不会吧,这么倒霉,那么求助以下情况:
1、基于VBA的块操作,从外部文件导入块、并修改相关属性;
2、调用COM,调用ADO组件,调用自己编写的COM;
3、创建对话框;
原来在R2000中通过VBA工程实现集成的项目(上述)在R14中能否实现? 这些内容在两个版本应该没有什么改变的 首先感谢回复;
但是在R14中的工具菜单中没有“宏”这一项,只有加载工程,后缀名是.LSP.exe.arx的没有.DVB的;
在运行脚本中,也只能运行.scr的,R2000中写的工程如何加载进来?是否直接
-VBLOAD?-VBRUN?这两个指令在2000中有而14中不存在! 你没看到我在二楼发的贴吗?R14不支持VBA。或者你必须使用VB来写。 你的意思是通过第三方开发软件调用AUTOCAD的COM?然后操作COM对象的属性和方法?
我用DELPHI和ASP调用过AUTOCADR2000的COM,DELPHI是成功的,ASP没有完成,但是R14是否提供COM接口? 最新测试,AUTOCADR14存在COM,AUTOCAD.APPLICATION,AUTOCAD.DRAWING,可是无论哪个,都没有暴露属性和方法接口,那么用VB怎么写呢? 你有没有引用其类型库,还有你的接口程序是怎么写的? Dim myApp as AcadApplication
Dim myDoc as AcadDocument
On Error Resume Next
Set myApp = GetObject(, "AutoCAD.Application")
If Err Then
Err.Clear
Set myApp = CreateObject("AutoCAD.Application")
If Err Then
MsgBox Err.Description
Exit Sub
End If
End If
Set myDoc = myApp.ActiveDocument
页:
[1]
2