CAD课程设计说明书—角接触球轴承设计系统.doc

CAD课程设计说明书 设计题目：角接触球轴承设计系统 设计任务：设计计算部分的程序设计 班 级： XXXXXX 姓 名： XXXXXX 学 号： XXXXXX 指导老师： XXXXXX 时 间： XXXXXX 目录 1.课程设计的任务和目的…………………………………………… 1.1 课程设计的任务……………………………………………… 1.2 课程设计的目的……………………………………………… 1.3 课程设计的规划……………………………………………… 2.课程设计的内容…………………………………………………… 2.1 系统结构框图………………………………………………… 2.2 程序流程图…………………………………………………… 2.3 关键技术分析………………………………………………… 2.4 程序界面展示………………………………………………… 3.课程设计总结……………………………………………………… 3.1 个人小结……………………………………………………… 3.2参考文献………………………………………………………. 1.课程设计的任务和目的： 1.1 课程设计的任务 完成“角接触球轴承设计系统”的开发，根据该设计系统能进行简单的角接触球轴承自动设计。 1.2 课程设计的目的 通过“角接触球轴承设计系统”的开发，进一步掌握和理解一般CAD系统的开发方法和流程。进一步熟悉工程数据的处理方法、自动绘图的实现方法以及软件的接口方法。 1.3 课程设计的规划 一．熟悉设计任务，查询、阅读资料。 二．系统总体设计，模块划分，程序框图设计，编写程序。 三．完成程序的上机调试。 四．编写有关文档。 五．审核、答辩。 注意：1.认真、细致，严格按CAD系统的开发步骤工作；程序编写时应加必要注释。 2.团队协作，互相帮助，共同完成小组的设计任务。 3.不得抄袭和复制其他同学的作业和程序。 2.课程设计的内容： 完成“角接触球轴承设计系统”设计计算部分的程序设计 2.1 系统结构框图 2.2 程序流程图 2.3 关键技术分析 一．VB主程序部分： (1) 对输入的已知条件轴径d，径向载荷fr,轴向载荷fa，转速n，预期寿命Lh’以及载荷冲击情况进行判断： If Option1.Value = False And Option2.Value = False And Option3.Value = False Then MsgBox 载荷情况未给出, 48 = vbOKOnly, 提示信息 Else If Text1.Text = Or Not IsNumeric(Text1.Text) Then MsgBox 轴的直径d未给出或不是数值, 48 = vbOKOnly, 提示信息 Text1.SetFocus ElseIf Text3.Text = Or Not IsNumeric(Text3.Text) Then MsgBox 径向载荷fr条件未给出或不是数值, 48 = vbOKOnly, 提示信息 Text3.SetFocus ElseIf Text4.Text = Or Not IsNumeric(Text4.Text) Then MsgBox 轴向载荷fa条件未给出或不是数值, 48 = vbOKOnly, 提示信息 Text4.SetFocus …… Else Command2.Enabled = True End If End If (2) 根据轴径d初选轴承型号： d = Val(Text1.Text) If d = 30 And d 35 Then Text1 = 30 List1.AddItem 7006C …… List1.AddItem 3306 ElseIf d = 35 And d 40 Then Text2 = 35 List1.AddItem 7007C …… List1.AddItem 3307 …… ElseIf d 30 Or d 70 Then