yang686526

autocad 二次开发毕业设计~~``! 用vba画齿轮。
www.dimcax.com
autocad 二次开发毕业设计~~``! 用vba画齿轮。
请大家帮个忙`````
autocad 二次开发毕业设计~~``! 用vba画齿轮。
谁能告诉我啊？

同病相怜呀，我也很痛苦呢。
re:autocad 二次开发毕业设计~~``! 用vba画齿轮。
我也是啊
你们有的给我发点资料
我的qq是641780736
re:autocad 二次开发毕业设计~~``! 用vba画齿轮。
请问现在有了吗
re:autocad 二次开发毕业设计~~``! 用vba画齿轮。
经验与技巧.. ●.. experiences & skills
、圆弧（.. arc）等；
☆样式对象：如线型（.. linetype）、文本样式
东南大学机械系于萌
经验与技巧.. ●.. experiences & skills
、圆弧（.. arc）等；
☆样式对象：如线型（.. linetype）、文本样式
东南大学机械系于萌
在autocad中
渐开线齿廓的精确绘制
在用autocad绘制机械零件过程中，有时需要
绘制渐开线齿轮的齿廓，但现有autocad系统不支
持直接绘出渐开线。目前，一般是用以下三种间接方
法绘制渐开线齿轮齿廓的。一种方法是用圆弧近似代
替渐开线。这样虽能近似画出齿轮轮廓，但存在如下
缺点：绘制过程复杂，费时并且容易出错；修改过程
困难，不能形成系列化修改；不能直接在图中得出渐
开线的相应数据。第二种方法是先调用绘制工程图形
的专用软件，然后把图形文件导入autocad系统。
如果只是为了绘制渐开线而花高价钱购买专用软件
显然不合算。第三种方法是利用autocad的二次开
发工具来实现渐开线齿轮齿廓的精确绘制，这也是
本文所介绍的方法。
目前，针对齿轮的二次开发大部分都只考虑各
个参数的值，即数值方面，而忽略实时显示，即图
形方面。其实，利用autocad 内嵌的vba ide可
以容易地实现渐开线齿轮齿廓的精确绘制。
一、 activex技术
autocad r14版以前主要是用autolisp语言
和c/c++语言（如ads、arx）作为二次开发工具。
随着面向对象编程技术的发展以及不同程序间相互
通信的要求，这些方法正逐步地被淘汰。autocad
从r14版开始支持activex技术。
activex使用户可以利用vb、vba等外部或内
部程序来操作autocad。activex是微软公司提出的
一个基于com(component object model，直译为
“部件对象模式”)的技术标准，以前称为ole（对象
与嵌入）。其宗旨是在windows系统的统一管理下，
协调不同的应用程序，允许这些应用程序之间相互
沟通、相互控制。每个应用程序可以决定将自己的哪
些信息暴露出来，这些暴露出来的信息可以被其他
程序操纵。这个暴露自己信息的应用程序称为服务程
序（sever），而操纵服务程序的程序称为客户程序
（client）。
应用autocad activex技术，可以从其他外部
应用程序（word、visual basic等）或autocad内部
（autocad vba）来操作autocad暴露的对象。这
些暴露的对象可以被任何采用了activex技术并可作
为客户程序的应用程序来操纵。
autocad 2000中，几乎对外暴露了所有对
象，例如：
☆图形实体对象：如直线（line）
（style）等；..
☆图形结构组织对象：如层（layer）、块
（block）等；..
☆图形显示对象：如视图（view）、视图区
（viewport）等。
二、 autocad 2000 vba
vba是visual basic for application的缩写，
由visual basic派生而来，现在已经成为microsoft产
品的标准语言。与vb一样，vba是面向对象的程序
设计语言，它继承了vb语法简单，功能强大的优点。
autocad 2000 vba是vba5.0程序开发环
境，它是一个内嵌式的控制器，共享autocad的内
存空间，可以更好地与autocad沟通。其运行速度
与objectarx应用程序非常接近，比其他开发方式
（如adsrx、ads、visuallisp和vb）要提高许多。
autocad 2000 vba提供了一个特殊的对象
—thisdrawing，它代表当前打开的autocad图形
文件。如图1所示，使用thisdrawing对象作为切入
点访问实体圆将十分简单：..
dim mycir as acadcircle
set mycir=thisdrawing.modelspace.item(10)
图1 用对象模型定位圆
可以用下面两种方法启动vba ide:
☆在autocad 命令行上键入“vbaide”并回车；
☆选择tools->macro->visual basic editor
菜单项。
三、渐开线分析
如图2所示，k 0为渐开线在基圆上的起点，k为
渐开线上任意点，其矢径为r k，渐开线k 0k段的展角
no.12.200159
经验与技巧.. ●.. experiences & skills
为θk。当此渐开线作为齿轮的齿廓在点.. k啮合时，点
k所受的正压力方向与点.. k绕.. o点的线速度方向所夹
的锐角为αk，αk称为渐开线在点.. k的压力角。显
然，渐开线齿廓上各点具有不同的压力角。
由图.. 2可见：..
rk=rb/cos(αk)
∵tan(αk)=nｋ.. /r b = /rb=rb (αk+θk)/rb
图.. 3 输入对话框
经验与技巧.. ●.. experiences & skills
为θk。当此渐开线作为齿轮的齿廓在点.. k啮合时，点
k所受的正压力方向与点.. k绕.. o点的线速度方向所夹
的锐角为αk，αk称为渐开线在点.. k的压力角。显
然，渐开线齿廓上各点具有不同的压力角。
由图.. 2可见：..
rk=rb/cos(αk)
∵tan(αk)=nｋ.. /r b = /rb=rb (αk+θk)/rb
图.. 3 输入对话框
=αk+θk
∴θk=tan(αk)-αk
由此得到渐开线直角坐标参数方程为：..
x=rsin(u)-rucos(u)
kbkbkk
y=rcos(u)+rusin(u)
kbkbkk
式中，u k为渐开线在k点的滚动角，u k=θk+αk
图2 渐开线的形成
四、渐开线齿轮齿廓的绘制
根据渐开线参数方程，可画出渐开线齿轮的齿
廓，步骤如下：
☆以r 为自变量，从r 到r （齿顶圆半径）均匀
kba
变化（步长可根据所需精度选取），相应得出θk；
☆以得到的一系列点为参数，画一段多义线
(addpolyline)，此多义线即一个轮齿齿廓的一半；
☆再对这一半齿廓进行镜射（mirror）操作，可
得另一半齿廓；
☆以输入的齿数为参数，对得到的轮齿进行圆
形阵列（arraypolar）操作。
根据上述步骤，利用vba ide开发的程序界面
如图3所示。在autocad平台下绘制渐开线齿轮齿廓
时，只需调用此程序，输入所需参数即可。
在输入对话框中给出了模数、齿数和压力角的
缺省值，以防止忘记输入参数时程序出错。另外，程
序里对参数值加入了数值约束，如模数必须是国家
标准规定的数值等。这个窗体的控件如表1所示。
表1 输入对话框的控件简介
五、具体示例
以下是当齿数为18，分度圆压力角为20，模数
分别为1、2、3、4时所绘制的四个渐开线齿轮齿廓
的程序运行界面。由图4可知，此程序可以方便地修
改模数、齿数和压力角，并准确、快速地绘出所需
齿轮的齿廓。
图4 运行时效果图
六、结束语
本文利用autocad 2000 内嵌的vba ide开发
环境精确地绘制了渐开线齿轮的齿廓。整个过程只需输
入齿轮的三个参数（模数、齿数和压力角），达到了快
速、准确的要求，比手工方法优越。实际应用时，将
“绘制齿轮”加入到autocad 2000标准工具栏中，将
更加方便操作。对所绘制的平面齿廓进行拉伸可得三维
模型，这表明此程序可扩展为齿轮cad系统。..
@本文索引号：.. 73
投稿信箱.. :cadic@icad.com.cn
60 no.12.2001
re:autocad 二次开发毕业设计~~``! 用vba画齿轮。
我还要惨·~~~我还要生产加工齿轮的刀具出来···``大家有什么相关资料多交流 我的qq 564547558 邮箱：
re:autocad 二次开发毕业设计~~``! 用vba画齿轮。
我更郁闷，要全部刀具的二次开发，刀具书厚的要死，什么时候能完啊

feng850 和我是一个类型！！！
可以加我qq不？ 我们一起做~~~~ 564547558 注明：刀具设计 谢谢