大学机械专业电算实验V带设计说明书.docVIP

PAGE 14 - 设计说明书—— 普通V带传动ＣＡＤ 　 姓名：刘竹清 学号：１０４０８１０７１９ 班级：８１０７ 系别：机械设计制造及其自动化 日期：2006-11-7 一：普通V带传动设计内容和任务 1、普通V带传动设计内容 给定原始数据：传递的功率P，小带轮转速n，传动比i及工作条件。 设计内容：带型号，基准长度Ld，根数Z，传动中心距a，带轮基准直径dd1、dd2，带轮轮缘宽度B，初拉力F0，和压轴力Q。 2、CAD任务： （1）编制V带传动设计程序框图。 （2）编制V带传动设计原程序。 （3）按习题或作业中数据运行程序，要求对每一组数据各按三种V带型号计算，对每一种带型号选三种小带轮直径进行计算并输出所有结果。 二、变量标识符 序号 名称 代号 标识符 单位 1 名义功率 P p kw 2 设计功率 Pd pd kw 3 工作情况系数 KA KA 4 小带轮转速 n1 n r/min 5 工作机载荷特性 载荷情况.list 6 原动机类型 电机类型.list 7 工作时间 工作时间.list 8 带型号 带型.list 9 小带轮基准直径 dd1 tt mm 10 大带论基准直径 dd2 dd2 mm 11 带速 v v m/s 12 最大带速 vmax vmax m/s 13 预估中心距 a0 a0 mm 14 基准长度 Ld ld mm 15 实际中心距 a a mm 16 小带轮包角 α1 bao 度 17 V带根数 Z z 18 基本额定功率 P0 po kw 19 功率增量 ΔP0 ddp kw 20 传动比系数 Ki ki 21 长度系数 KL kl 22 包角系数 Kα kao 23 弯曲影响系数 Kb kb 24 初拉力 F0 fchu N 25 压轴力 Q fq N 26 轮缘宽度 B bmm mm 三、程序框图 开始 开始 输入原始数据 P,n,i并选择电机 计算设计功率 由带型号确定最大带速，小带轮直径系，带的相关参数m，f，e 相关系数Kb 确定带型号 选择小带轮直径 验算带速 vvmax? 计算大带轮直径 给定范围，预估中心距 A A 计算Ld并取标准值，计算实际中心距并圆整 计算小带轮包角 计算选择相关系数：Kα， Ki 。 插值计算P0 ，计算ΔP0 计算带根数Z Z10? 计算相关参数 结束 下一型号带 下一带轮直径 B B 四、部分源程序与其说明 Dim t As String t为带型（字符型） Dim tt As String tt为小带轮直径（文本） Dim a1 As Integer Dim a2 As Integer Dim kl As Double Dim KA As Double Dim kb As Double Dim ki As Double Dim kao As Double Dim m As Double Dim f As Double Dim e As Double m f e 为带与带轮的相关参数 Dim pnum() As Variant V带基本功率数组 Dim num() As Variant 小带轮直径数组 Dim kka As Variant 包角系数数组 Dim lld() As Variant 基准长度数组 Dim kkl() As Variant 长度系数数组 Private Sub Command1_Click() （此段为计算相关参数） fchu = Int(500 * Val(pd) * (2.5 - kao) / Val(z) / Val(v) / kao + m * Val(v) ^ 2) fq = Int(2 * Val(z) * Val(fchu) * Sin(Val(bao) * 3.1416 / 360)) bmm = (Val(z) - 1) * e + 2 * f End Sub Private Sub Command13_Click() （保存数据） O