孙运平 高玉春 安徽新闻出版职业技术学院
[摘 要]计算机辅助制图是现代企业生产和设计的重要工具，但不可能解决用户在产品设计与制造中的全部问题，必须使用到AutoCAD二次开发技术。本文结合实例讲述了如何利用VBA编程进行AutoCAD的二次开发。
[关键词]AutoCAD VBA 二次开发
目前AutoCAD是应用[来自www.lW5u.coM]最为广泛的通用交互式计算机辅助绘图与设计软件包，AutoCAD的强大生命力在于它的通用性、多种工业标准和开放的体系结构，其通用性使得它在机械、电子、航空、船舶、建筑、包装、服装等领域得到了极为广泛的应用。但是由于AutoCAD软件都不可能解决某行业用户在产品设计与制造中的全部问题，所以[来自wWW.lw5u.coM]在AutoCAD应用领域，更多的用户和技术人员要在基于AUTOCAD的基础上，针对企业或行业的特殊需要进行二次开发，以满足本企业或某行业在产品设计、制造上的特殊要求，或者针对AutoCAD的某个应用领域进行专门软件开发，以完成特殊的造型、计算、分析等专业应用要求。
一、AutoCAD VBA简介
Microsoft VBA是一个面向对象的编程环境，可提供类似Visual Basic(VB)的丰富开发功能。VBA和VB的主要差别是VBA和AutoCAD在同一进程空间中运行，提供的是具有AutoCAD智能的、非常快速的编程环境。VBA可提供强大的窗体创建功能，为应用程序建立对话框及其他屏幕界面，可建立功能强大的模块级宏指令，提供类模块创建功能，利于组件重用，具备完善的数据访问与管理能力。
在AutoCAD中实现VBA有四大优点：
1.Visual Basic编程环境易于学习和使用。
2.VBA可与AutoCAD在同一进程空间中运行，这使程序执行得非常快。
3.对话框的构造快速而有效。这使开发人员可以构造原型应用程序并迅速收到设计的反馈。
4.工程可以是独立的，也可以嵌入到图形中。这样就为开发人员提供了非常灵活的方式来发布他们的应用程序。
二、获取VB对AutoCAD的控制权
首先要获取对AutoCAD的控制权，然后才能有效地运用VB编程方式进行AutoCAD的基本绘图操作，否则，接下来的各种对AutoCAD的操作将无法得以实现。
先定义变量acadApp,acadDoc
三、应用VBA编写输入基圆半径和展角上限绘制渐开线的参数化程序
渐开线为常用工程曲线，在VBA中可采用样条曲线拟合的方法绘制渐开线。
在如图1所示的直角坐标系Oxy中，
应用VBA程序绘制样条曲线的方法为：AddSpline(PointsArray, StartTangent, EndTangent)，其中，PointsArray为样条曲线（渐开线）拟合点的3维坐标组成的列表（即数组，必须为3的倍数），StartTangent，EndTangent为样条曲线的起点和终点切向向量（必需为3元素列表，切向必需与曲线的走向一致）。起点的切向竖直向上，可取(0, 1, 0)；根据式(1-2)可知终点的切向为 。
可根据精度要求将所绘渐开线的展角上限 等分为J个区间（程序中取J=10），应用For…Next循环计算拟合点的坐标。首先按下式计算展角：
再用式(1)计算点K的坐标(xKj, yKj)。
绘制渐开线及基圆的窗体如图2所示，程序如下：
四、结语
基于VBA的AutoCAD二次开发技术，可以实现AUTOCAD功能的拓展及参数化没计，可以更好d地满足机械、电子等行业系列化产品的专业设计，能最大限度地满足用户的特殊要求，更方便、更规范、更专业的实现设计和绘图中的应用。
参考文献：
[1]谢安俊,乔韡韡.计算机辅助设计二次开发案例教程[M].北京:北京大学出版社,2009
[2]刘言松,贺炜.AutoCAD2009中文版二次开发实例教程[M].北京:化学工业出版社,2009