基于solidworks的蜗轮蜗杆三维参数化

基于solidworks的蜗轮蜗杆三维参数化内容摘要：

True, 12, 12, , , True, , , False) (D1@草图 3).SystemValue = α True boolstatus = (Line4, SKETCHSEGMENT, , , , False, 0, Nothing, 0) boolstatus = (Line6, SKETCHSEGMENT, , , , True, 0, Nothing, 0) Set myDisplayDim = (0, , ) True boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) 优秀毕业设计，通过答辩 (D2@草图 3).SystemValue = Ha / 1000 True boolstatus = (Line6, SKETCHSEGMENT, , , , False, 0, Nothing, 0) boolstatus = (Line5, SKETCHSEGMENT, , , , True, 0, Nothing, 0) Set myDisplayDim = (0, , ) True boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) (D3@草图 3).SystemValue = Hf / 1000 True boolstatus = (Line6, SKETCHSEGMENT, , , , False, 0, Nothing, 0) Set myDisplayDim = (0, , ) True boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) (D4@草图 3).SystemValue = s / 1000 True boolstatus = (Line5, SKETCHSEGMENT, , , , False, 0, Nothing, 0) boolstatus = (Line7, SKETCHSEGMENT, , , , True, 0, Nothing, 0) Set myDisplayDim = (0, , ) True 优秀毕业设计，通过答辩 boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) boolstatus = (0, 0, 0, , , False, 7, 2, True, 12, 12, , , True, , , False) (D5@草图 3).SystemValue = Df / 2020 True‘ 以上是齿廓尺寸修改后，得到的齿廓截面 boolstatus = (Line1, SKETCHSEGMENT, , , , True, 0, Nothing, 0) boolstatus = (Line8, SKETCHSEGMENT, , , , True, 0, Nothing, 0) sgCOLINEAR ‘ 以上是添加线线重合的几何关系 True True 图 47 蜗杆的螺旋线和修正尺寸后的齿廓截面 如 上图 47 所示即为蜗杆齿廓截面的模型。 （ 4）扫描切除 优秀毕业设计，通过答辩 boolstatus = ( 螺旋线 / 涡状 线 1, REFERENCECURVES, , , , True, 0, Nothing, 0) True boolstatus = (草图 3, SKETCH, 0, 0, 0, False, 1, Nothing, 0) boolstatus = ( 螺旋线 / 涡 状 线 1, REFERENCECURVES, , , , True, 4, Nothing, 0) Set myFeature = (False, True, 0, False, False, 0, 0, False, 0, 0, 0, 0, True, True, 0, True, True, True, False) 以上是通过扫描切除这一特征命令获得的如下图 48所示的单头蜗杆最终建模模型，其中以螺旋线为扫描路径，以蜗杆的齿廓截面为扫描轮廓。 图 48 单头蜗杆建模造型 其中，多头蜗杆（图 49 为双头蜗杆的建模造型）的关键程序如下： boolstatus =(s, True) 优秀毕业设计，通过答辩 boolstatus = (, AXIS, , , , True, 0, Nothing, 0) True boolstatus = (切除 扫描 1, BODYFEATURE, 0, 0, 0, False, 4, Nothing, 0) boolstatus = (, AXIS, , , , True, 1, Nothing, 0) Set myFeature = (Z, β, False, NULL, False) ‘其中 Z 为蜗杆的头数， β = 2π/ Z 图 49 双头蜗杆建模造型 蜗轮的建模步骤 （ 1） 绘制蜗轮齿顶圆的草图，并拉伸获得基体，拉伸长度等于齿宽。 （ 2） 首先绘制齿顶圆和齿根圆草图，再通过蜗轮齿廓的渐开线参数方程，运用 SolidWorks2020 中“方程式驱动的曲线”这一功能，得到样条曲线拟合后的同一个齿槽中一侧的渐开线，再利用“镜像”功能获得另外一条渐开线，最后通过修剪得到蜗轮齿廓。 优秀毕业设计，通过答辩 （ 3） 在新的基准面上建立阿基米德螺旋线（螺旋线的基圆是蜗杆的分度圆，蜗轮的 螺旋角 β等于蜗杆螺旋角 γ，即 β = γ = arctan（ (mz1)/d1),螺距 p = (πd2） / tanβ,螺旋线圈数 n = B / p）。 （ 4）使用扫描切除特征来生成单个齿廓的蜗轮基体（齿廓作为扫描切除轮廓，阿基米德螺旋线为扫描切除路径）。 （ 5）建立一个通过基体轴心的基准轴。 （ 6）通过圆周阵列来生成全齿。 （ 7）最后再绘制轮毂，并通过倒角，键槽等功能，得到完整的蜗轮。 运用程序创建蜗轮实体 下面是蜗轮实体生成的主要实现过程及其主要程序。 （ 1） 蜗轮齿顶圆的 及其基体的拉伸 boolstatus = (前视基准面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) True True Dim skSegment As Object Set skSegment = (0, 0, 0, Ra / 1000) True True *上下二等角轴测 , 8 True boolstatus = (草图 1, SKETCH, 0, 0, 0, False, 0, Nothing, 0) Dim myFeature As Object Set myFeature = (True, False, False, 0, 0, B / 1000, , False, False, False, False, , , False, False, False, False, True, True, True, 0, 0, False) = False （ 2） 蜗轮齿廓的生 成 boolstatus = (前视基准面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) True True 优秀毕业设计，通过答辩 Set skSegment = (0, 0, 0, Rf / 1000) True Set skSegment = (0, 0, 0, Ra / 1000) True For N1 = 0 To N2 t = Rf + f * N1 φ = ArcCos(Rb / t) ε = K / (2 * Z2) Tan(α) + α θ = Tan(φ) φ u = t * Sin(ε + θ) w = t * Cos(ε + θ) N2 N1, u / 1000, w / 1000, 0 ‘样条曲线的生成 Next N1 True True boolstatus = (草图 2, SKETCH, 0, 0, 0, False, 0, Nothing, 0) True Set skSegment = (0, 0, 0, 0, , 0) True boolstatus = (Spline1, SKETCHSEGMENT, , , , True, 0, Nothing, 0) boolstatus = (Line1, SKETCHSEGMENT, , , , True, 0, Nothing, 0) True boolstatus = (圆弧 2, SKETCHSEGMENT, 0, 0, 0, False, 0, Nothing, 0) boolstatus = (0, , , 0) 优秀毕业设计，通过答辩 boolstatus = (圆弧 1, SKETCHSEGMENT, 0, 0, 0, False, 0, Nothing, 0) ‘齿廓的 修剪 boolstatus = (0, , , 0) True 以上主要是根据蜗轮的渐开线参数方程，并通过样条曲线拟合的方法生成蜗轮齿廓渐开线，再通过相应的修剪，最后获得蜗轮的齿廓截面，如图 410 所示。 图 410 蜗轮齿廓截面 （ 3） 蜗轮建模中螺旋线的生成 boolstatus = (前视基准面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) True True Set skSegment = (0, 0, 0, , , 0) False, False, False, True, 0, , p / 1000, n, 0, 0 ‘ p为螺距， n 为螺旋线圈数 True （ 4） 扫描切除生成单个轮齿 boolstatus = (前视基准面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) 优秀毕业设计，通过答辩 True True Set skSegment = (0, 0, 0, , , 0) False, False, False, True, 0, , p / 1000, n, 0, 0 True boolstatus = (草图 2, SKETCH, 0, 0, 0, True, 0, Nothing, 0) boolstatus = ( 螺旋线 / 涡 状 线 1, REFERENCECURVES, 0, 0, 0, True, 0, Nothing, 0) True boolstatus = (草图 2, SKETCH, 0, 0, 0, False, 1, Nothing, 0) boolstatus = ( 螺旋线 / 涡 状 线 1, REFERENCECURVES, 0, 0, 0, True, 4, Nothing, 0) Set myFeature = (False, True, 0, False, False, 0, 0, False, 0, 0, 0, 0, True, True, 0, True, True, True, False) 图 411 单个轮齿的造型 优秀毕业设计，通过答辩 （ 5）阵列得到蜗轮全齿 boolstatus = (上视基准面 , PLANE, 0, 0, 0, True, 0, Nothing, 0) boolstatus = (右视基准面 , PLANE, 0, 0, 0, True, 0, Nothing, 0) boolstatus = (True) boolstatus = (切除 扫 描 1, BODYFEATURE, 0, 0, 0, True, 0, Nothing, 0) True boolstatus = (切除 扫描 1, BODYFEATURE, 0, 0,。