【正文】 齒頂高系數(shù) Const c = 39。螺距 Dim n As Double 39。蝸輪齒根圓半徑 Dim R As Double 39。蝸桿直徑系數(shù) Dim d2 As Double 39。模數(shù) Dim D As Double 39。螺距 Dim s As Double 39。齒頂高 Dim Rb As Double 39。多頭蝸桿陣列起始角度 Dim Da As Double 39。蝸桿拉伸長(zhǎng)度 Dim Z As Double 39。同時(shí)，經(jīng)過(guò)這次畢業(yè)設(shè)計(jì)，也讓自己深切了解到了一種新的研究方法。 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 參考文獻(xiàn) [1] 江洪，單莉，李春表，等 . SolidWorks 機(jī)械設(shè)計(jì)實(shí)例解析 [M].2 版 .北京 :機(jī)械工業(yè)出版社， 2020. [2] 宋愛(ài)平，等 .CAD/CAM 技術(shù)綜合實(shí)訓(xùn)指導(dǎo)書(shū) [M].北京：機(jī)械工業(yè)出版社， 2020. [3] 崔鳳奎，等 .SolidWorks 機(jī)械設(shè)計(jì) [M].北京：機(jī)械工業(yè)出版社， 2020. [4] 陸利鋒，江洪，伍錦輝，等 .SolidWorks 工程師高級(jí)教程 [M].北京：化學(xué)工業(yè)出版社， 2020. [5] SolidWorks 公司 .SolidWorks 基本零件建模 [M].北京：機(jī)械工 業(yè)出版社，2020. [6] 王東．等．基于 SolidWorks的機(jī)械零件參數(shù)化設(shè)計(jì) [J]．機(jī)械制造與研究． 2020. [7] 殷國(guó)富，徐蕾，胡曉兵 .SolidWorks 二次開(kāi)發(fā)實(shí)例精解 （ 1） 蝸輪齒頂圓的 及其基體的拉伸 boolstatus = (前視基準(zhǔn)面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) True True Dim skSegment As Object Set skSegment = (0, 0, 0, Ra / 1000) True True *上下二等角軸測(cè) , 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 = (前視基準(zhǔn)面 , PLANE, 0, 0, 0, False, 0, Nothing, 0) True True 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 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 ‘樣條曲線(xiàn)的生成 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) 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 boolstatus = (圓弧 1, SKETCHSEGMENT, 0, 0, 0, False, 0, Nothing, 0) ‘齒廓的 修剪 boolstatus = (0, , , 0) True 以上主要是根據(jù)蝸輪的漸開(kāi)線(xiàn)參數(shù)方程，并通過(guò)樣條曲線(xiàn)擬合的方法生成蝸輪齒廓漸開(kāi)線(xiàn)，再通過(guò)相應(yīng)的修剪，最后獲得蝸輪的齒廓截面，如圖 410 所示。 （ 5）建立一個(gè)通過(guò)基體軸心的基準(zhǔn)軸。 圖 48 單頭蝸桿建模造型 其中，多頭蝸桿（圖 49 為雙頭蝸桿的建模造型）的關(guān)鍵程序如下： boolstatus =(s, True) 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 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 為蝸桿的頭數(shù)， β = 2π/ Z 圖 49 雙頭蝸桿建模造型 蝸輪的建模步驟 （ 1） 繪制蝸輪齒頂圓的草圖，并拉伸獲得基體，拉伸長(zhǎng)度等于齒寬。 運(yùn)用程序創(chuàng)建蝸桿實(shí)體 下面主要以單頭蝸桿為例來(lái)說(shuō)明蝸桿實(shí)體生成的主要實(shí)現(xiàn)過(guò)程及其主要程序。）。 漸開(kāi)線(xiàn)參數(shù)方程如下： x1(rk) = rk sin(? + θk) y1(rk) = rk cos(? + θk) x2 = x1(rk) y1 = r1 + r2 + y1 ? = π/(2z2) – tanα + α αk = arccos (rb / rk) θk = tanαk +αk (其中， r1 、 r2 分別是蝸桿、蝸輪的分度圓半徑， θk 是漸開(kāi)線(xiàn)上 K 點(diǎn)的展角， rk為漸開(kāi)線(xiàn)在任意點(diǎn) K 的向徑，且有 rf ≤ rk ≤ ra) 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 圖 43 蝸輪數(shù)學(xué)模型 利用上述漸開(kāi)線(xiàn)參數(shù)方程繪制出漸開(kāi)線(xiàn) ，再進(jìn)一步修剪為齒廓后，使用掃描這一特征就可以得到一個(gè)齒槽（掃描時(shí)，以蝸桿的螺旋線(xiàn)為導(dǎo)線(xiàn)），最后再使用圓周陣列便可以得到一個(gè)完整的蝸輪。過(guò)蝸桿的軸線(xiàn)作一平面垂直于蝸輪的軸線(xiàn)，該平面對(duì)于蝸桿是軸面，對(duì)于蝸輪是端面，這個(gè)平面稱(chēng)為蝸桿傳動(dòng)的中間平面。 數(shù)學(xué)模型 在三維建模過(guò)程中，數(shù)學(xué)模型顯得至關(guān)重要，它是我們進(jìn)行圖形繪制的關(guān)鍵，只有熟悉了解零件產(chǎn)品的數(shù)學(xué)模型，才能比較精確的繪制出我們所需要的零件圖，才能進(jìn)一步去分析零件其它方面的性能。確定 第四章 蝸輪蝸桿參數(shù)化建模的實(shí)現(xiàn) 本文以最常 見(jiàn)的阿基米德圓柱蝸桿為研究對(duì)象來(lái)簡(jiǎn)述參數(shù)化建模過(guò)程的基本思路和其建模原理，包括建模約束參數(shù)的提取，蝸輪蝸桿的數(shù)學(xué)模型的簡(jiǎn)單介紹，蝸桿建模和蝸輪建模的基本步驟及其建模過(guò)程中 SolidWorks 二次開(kāi)發(fā)功能的詳細(xì)分析。對(duì)于動(dòng)力傳動(dòng)，一般推薦 z2 = 29 ~ 70。 表 32 蝸桿分度圓直徑與模數(shù)的匹配標(biāo)準(zhǔn)系列 m 1 2 d1 18 20 20 28 28 45 m 4 5 8 d1 56 40 71 50 90 63 112 80 140 （ 3）齒數(shù) 蝸桿的齒數(shù)又叫做蝸桿的頭數(shù)，用 z1表示。蝸桿和蝸輪嚙合 時(shí)，在中間平面上，蝸桿的軸面模數(shù)、壓力角應(yīng)與蝸輪的端面模數(shù)、壓力角相等，即 ma1 = ma2 = m aa1 = at2 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 阿基米德蝸桿的軸向壓力角 αa為標(biāo)準(zhǔn)值 20176。 圖 24 調(diào)試后的程序 在通用區(qū)寫(xiě)入下面的代碼來(lái)定義變量： Dim swApp As Object Dim part As Object Dim boolstatus As Boolean Dim D As Double Dim L As Double 在 Command1控件下寫(xiě)入下面的代碼： Set swApp = CreateObject() 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 Set part = () = True 在 Command2 控件下寫(xiě)入主要代碼如上圖 24 中所示。 優(yōu)秀畢業(yè)設(shè)計(jì)，通過(guò)答辯 圖 21 宏工具條 宏錄制及其源代碼的簡(jiǎn)單調(diào)試 （ 1） 利用宏工具錄制的圓柱體源代碼如圖 22所示。用這種方法也可以快速得到 SolidWorks的操作命令，這比檢索全英文的 API文檔方便快捷，所以 SolidWorks提供的宏命令對(duì)于初學(xué)者來(lái)說(shuō)顯得非常重要。另一種是程序驅(qū)動(dòng)法，它是通過(guò)完全運(yùn)用程序調(diào)用 API函數(shù)對(duì)象來(lái)繪制圖形，產(chǎn)生的代碼量很大，而且每次生成零件時(shí)都需運(yùn)行一次程序，運(yùn)行速度相對(duì)較慢。 SolidWorks 的二次開(kāi)發(fā)功能 目前主流的 CAD軟件都為用戶(hù)提供了一定的二次開(kāi)發(fā)功能，通過(guò) CAD軟件的二次開(kāi)發(fā)工具，可以極大提高產(chǎn)品的設(shè)計(jì)研發(fā)效率，同時(shí)也 促進(jìn) CAD系統(tǒng)的用戶(hù)化、本地化。本文以應(yīng)用最廣泛的阿基米德螺旋線(xiàn)圓柱蝸桿傳動(dòng)為例，利用 Visual Basic 編程語(yǔ)言來(lái)實(shí)現(xiàn) SolidWorks2020 的二次開(kāi)發(fā)，對(duì) 蝸輪蝸桿進(jìn)行三維參數(shù)化建模設(shè)計(jì)，提高產(chǎn)品的開(kāi)發(fā)效率和質(zhì)量，同時(shí)也為產(chǎn)品所要進(jìn)一步進(jìn)行的有限元分析、動(dòng)力學(xué)分析和機(jī)構(gòu)仿真等奠定一定基礎(chǔ)。與其他傳齒輪動(dòng)相比，蝸輪蝸桿傳動(dòng)具有傳動(dòng)比大、沖擊載荷小、傳動(dòng)平穩(wěn)、噪聲小、結(jié)構(gòu)緊湊、可實(shí)現(xiàn)反向自鎖等優(yōu)點(diǎn)，所以被廣泛運(yùn)用到各類(lèi)機(jī)械設(shè)備的傳動(dòng)系統(tǒng)中 。通過(guò)錄制宏、編輯宏的方法，獲得參數(shù)化設(shè)計(jì)的源程序，在 Visual Basic ，最后制作成簡(jiǎn)單的程序，并添加控件和窗體來(lái)實(shí)現(xiàn)蝸輪蝸桿的三維參數(shù)化實(shí)體設(shè)計(jì)建模。通過(guò)對(duì)蝸輪蝸桿的參數(shù)化設(shè)計(jì)，詳細(xì)說(shuō)明了基于 Visual Basic語(yǔ)言進(jìn)行的SolidWorks二次開(kāi)發(fā)方法，為初學(xué)者提供一個(gè)便利的參考，提高了編程效率，可以避免走一些不必要的彎路，也對(duì)類(lèi)似的復(fù)雜曲面形狀的零部件三維參數(shù)化設(shè)計(jì)提供了借鑒。 SolidWorks 二次開(kāi)發(fā)的研究背景和意義 由于現(xiàn)實(shí)中部分產(chǎn)品的結(jié)構(gòu)比較復(fù)雜，特別是其外形曲面， 一般的手工三維建模方法效率低下，而且繪圖精度較低。 第二章 SolidWorks 軟件的簡(jiǎn)介 SolidWorks 軟件的特點(diǎn) SolidWorks 是一套智能型的高級(jí) CAD/CAE/CAM 組合軟件，自 1995 年問(wèn)世以來(lái)，憑借其具有強(qiáng)大的零件設(shè)計(jì)、鈑金設(shè)計(jì)、管理設(shè)計(jì)、繪制二維工程圖、支持異地協(xié)同工作等功能，同時(shí)也擁有結(jié)構(gòu)分析、運(yùn)動(dòng)分析、動(dòng)態(tài)模擬仿真、高級(jí)渲染等專(zhuān)業(yè)功能，特別是它完全基于 Windows 的圖形界面和特征的參 數(shù)化、變量化設(shè)計(jì)技術(shù)，使其操作方便，易學(xué)易懂，贏得了廣大用戶(hù)的青睞。 SolidWorks為用戶(hù)了提供強(qiáng)大的 API(Application Programming Inter face )應(yīng)用編程接口，它是一個(gè)基于 OLE Automation的編程接口，此接口為用戶(hù)提供了自由、開(kāi)放、功能完整的開(kāi)發(fā)工具，其中包含了數(shù)以百計(jì)的功能函數(shù)，這些函數(shù)為人們提供了直接訪(fǎng)問(wèn) SolidWorks的能力。但由于它可以處理非設(shè)計(jì)變量的參數(shù)，具備變型設(shè)計(jì)的能力，所以人們常常把它作為尺寸驅(qū)動(dòng)法的一個(gè)輔助手段來(lái)使用。 Visual Basic 對(duì) SolidWorks 的簡(jiǎn)單開(kāi)發(fā)過(guò)程 宏工具條 SolidWorks軟件中的宏工具條如圖 21所示，主要包括宏操作的命令按鈕，同時(shí)也可以單擊菜單欄中的工具來(lái)調(diào)用宏命令。 圖 22 圓柱體源代碼 （ 2）在 VB程序開(kāi)發(fā)環(huán)境中建立標(biāo)準(zhǔn) EXE文件，引用 SolidWorks類(lèi)型庫(kù)，單擊菜單欄中“工程”→ “引用”命令，選擇“ SolidWorks 2020 Type Libray”、“ SolidWorks 2020 Consant Type library”和“ SolidWorks 2020 exposed Type Libraries For addin Use”。 （ 5）單擊 VB 中的啟動(dòng)按鈕 ，程序調(diào)試結(jié)果如下圖 25 所示： 圖 2