CAD课程设计圆柱螺旋拉伸弹簧.doc

南通大学CAD课程设计说明书-设计计算部分的程序设计设计题目：圆柱螺旋拉伸弹簧学院：机械工程学院班级：机092学生姓名：李宁学号：0910012048设计日期：2013年1月16日目录一、课题名称和要求-3二、系统结构框图-3三、程序流程图-4四、程序设计关键技术的阐述-5五、设计举例-9六、课程设计的体会和建议-8七、参考文献-8一、 设计课题题目：圆柱螺旋拉伸弹簧设计系统。目的：通过“圆柱螺旋拉伸弹簧设计系统”的开发，进一步掌握和理解一般CAD系统的开发方法和流程。进一步熟悉工程数据的处理方法、自动绘图的实现方法以及软件的接口方法。任务：完成“圆柱螺旋拉伸弹簧设计系统”的开发，根据该系 统能进行简单的圆柱螺旋拉伸弹簧自动设计。要求：1、完成所有设计资料的程序处理，建立有关设计参数数据文件。 2、完成圆柱螺旋拉伸弹簧设计系统的设计、计算、分析程序。 3、完成系统界面设计、文档设计。 4、完成课程设计说明书。二、 系统结构框图 圆柱螺旋拉伸弹簧设计系统系统设计VB编程绘图AutoLisp编程开始界面计算界面帮助界面输入已知条件计算绘图参数及设计参数（输出）校核弹簧校验合格校验不合格接口技术返回计算界面CAD绘制弹簧系统可以根据弹簧的不同旋向情况，选择不同形式拉伸弹簧，通过计算得出选用的标准件的参数，并对弹簧进行校核，选择合适的值，利用script脚本文件，自动加载Autolisp文件到AUTOCAD中，绘制出所选择的图形，实现了一键操作。三、 程序流程图：输入已知条件最大拉力Pn、最小拉力P1、工作行程h和最大中径d根据条件选择合适的材料从而确定弹性切边模量G，根据循环作用次数选择合适的弹簧类型以及弹簧旋向。点击计算，算出弹簧的基本的参数计算失败：1）弹簧材料不合适。2）最小拉力小于初拉力计算成功，进行校核校验合格校验不合格CAD出图重新计算四、程序设计关键技术（1）通过VB或者Access建立数据库通过VB建立数据库 打开VB，进入“外接程序（A）”，打开“可视化数据管理（V）”，单击左上方“文件”，选择新建Access数据库，选择新建表可进入如下图所示界面，进行数据输入。2.（2）VB程序开发部分（1）通过预估的工作极限载荷对数据库进行查询，比对，取到与预估值最接近的值作为标准的工作极限载荷Pj方法：载荷载入Microsoft DAO 3.6 Object LibraryPj0 = Pn / 0.8（Pj0为预估值）Dim Source As String 数据库文件名Source = TH.mdbDim conn1 As ADODB.ConnectionSet conn1 = New ADODB.Connectionconn1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Sourceconn1.OpenSet rst1 = New ADODB.RecordsetDim mysql As Stringmysql = select * from Arst1.Open mysql, conn1, 3, 2rst1.MoveFirst Do Until rst1!工作极限载荷Pj = Pj0 直到找到比插入数据小的数当中最小的数 rst1.MoveNextLoopPj = Pj1（比较得出的最接近工作极限载荷值）（2）通过索引Pj获得其他弹簧参数值（工作极限载荷下的单圈变形量fj，单圈刚度Pd，初拉力Po，材料直径d，弹簧中径D） D = rst1!弹簧中径D F = rst1!工作极限载荷下的单圈变形量fj Pd = rst1!单圈刚度Pd Po = rst1!初拉力Po D0 = rst1!材料直径d Pj1 = rst1!工作极限载荷Pj（3）模块接口技术1VB、Access接口技术Dim Source As StringSource = .mdbDim conn1 As ADODB.ConnectionSet conn1 = New ADODB.Connectionconn1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & Sourceconn1.OpenSet rst1 = New ADODB.RecordsetDim mysql As Stringmysql = select * from Arst1.Open mysql, conn1, 3, 2rst1.MoveFirst Do Until rst1! rst1.MoveNextLoop = rst1! = rst1! = rst1! = rst1! 2VB、CAD接口技术 th = Shell(C:Program FilesAutoCAD 2004acad.exe /b e:spring.scr, 1) “C:Program FilesAutoCAD 2004acad.exe” ：本电脑上CAD安装位置 “e:spring.scr” ：脚本位置 五、设计举例1确定所要求设计螺旋拉伸弹簧的相关参数最大拉力Pn=600N最小拉力P1=500N工作行程h=12mm最大中径d60mm旋向：右旋2.运行程序3.输入参数最大拉力Pn=600N最小拉力P1=500N工作行程h=12mm最大中径d60mm旋向：右旋弹簧材料切变模量：一般钢丝04油淬火碳素弹簧钢丝TB/T5103弹簧类型：类弹簧端部钩型：L1型，半圆钩环3.得到计算结果4.校验5.用AutoCAD绘制弹簧六、课程设计的体会和建议为期两周的“圆柱螺旋拉伸弹簧设计系统”的设计已经步入尾声，我从中学到了很多课堂以外的知识，也加深了对以前知识的理解和对团队合作重要性的认识。这次我主要是完成“圆柱螺旋拉伸弹簧设计系统”设计计算部分的程序设计。通过此次对VB程序有了一个更加深刻的理解，对于如何建立数据库、如何从数据库中调用数据、怎样才能有一个友好的用户界面以及对弹簧的工作原理、计算校核都有了更深入的理解，为以后的发展打下了坚实的基础。通过课程设计，使我深深体会到，对于团队合作的项目，一个人无法胜任，合作显得非常重要。通过此次课程设计，我对二次开发有了一个整体的理解，达到了预期目标，也相信会对我以后的事业发展会有很大的帮助