【正文】 點法得到，而漸開線上的點通過上面的方程式求得。 漸開線示意圖 參數(shù)的輸入漸開線直齒圓柱齒輪的幾何尺寸取決于齒輪的6個重要參數(shù)：齒數(shù)z、模數(shù)m、壓力角α、齒頂高系數(shù)h*a、頂隙系數(shù)c*以及齒輪厚度b，圓柱齒輪標準齒頂高系數(shù)和頂隙系數(shù)按正常齒輪取1 [12]。 建模過程和具體操作（1）在CATIA菜單中點擊“工具”，再點擊“宏”中的“啟動錄制”。（2）進入CATIA“機械設計”模塊，點擊“Wireframe Surface Design”（線框曲線設計），進入曲面設計。（3）運用“智能”工具欄“f(x)”（formula）命令，定義參數(shù)及表達式[13]（）。 在f(x)中輸入的齒輪參數(shù)變量類型數(shù)值及公式模數(shù) /m實數(shù)3齒數(shù) /z整數(shù)21壓力角 /a角度 20176。分度圓半徑 /r長度=m*z/2*1mm基圓半徑 /rb長度=r*cos(a)齒頂圓半徑 /ra長度=r+m*1mm齒根圓半徑 /rf長度= *m*1mm齒輪厚度 /b長度20mm 公式編輯器截圖（4）在“智能”工具欄中的函數(shù)功能“fog”插入(X、Y)2 個函數(shù)，其中參數(shù)t 應為實數(shù)，并定義函數(shù)的表達式。將漸開線改寫為進行參數(shù)化設計的表達式：x=rb*sin(t*PI*1rad)rb*t*PI*cos(t*PI*1rad)y=rb*cos(t*PI*1rad)+rb*t*PI*sin(t*PI*1rad)（5）用平面“點”（Point）功能，選擇On Plane類型，在輸入欄中單擊鼠標右鍵，選擇“Edit formula”，在對話框中出現(xiàn)“Relations/（）”字樣，在（）中分別輸入值0，，， 等。同理，在對話框中出現(xiàn)“Relations/（）”字樣，在（）中分別輸入對應X 的值0，，， 等。這樣就在平面上出現(xiàn)對應的點。在CATIA 中“fox”命令中的參數(shù)t 是按0~1 的參數(shù)計算的。（6）用“樣條線”（Spline）功能依次將各點連成曲線。（7）用“圓”（Circle）功能，以坐標原點為中心以XY 平面為支持面，按照定義的尺寸分別畫出3 個圓，即基圓、齒頂圓和齒根圓， 所示。（8）用“對稱”、“修剪” 所示。 漸開線形狀截圖 獲得齒廓 單齒的平面圖 單個直齒（9）對于單齒的平面圖，由于“線框曲面設計”模塊中沒有圓陣列，把當前界面切換到“零件設計”（PartDesign）模塊中，對其進行“拉伸”（Pad），然后再挖出軸孔和鍵槽以及倒角、導圓，即可得到標準漸開線圓柱齒輪。 整個齒輪圖（10）到此就完成了直齒圓柱齒輪的參數(shù)化建模，再點擊“工具”，“宏”，“停止錄制”，再進入“宏編輯器”中就能得到我們剛才錄制齒輪后生成的VB程序。 宏編輯器中的VB程序（11）將CATIA生成的VB程序中重要參數(shù)化數(shù)據(jù)修改成VB界面的文本框的名字，這樣可以通過文本框的數(shù)據(jù)變化來控制齒輪的參數(shù)化，將改好的程序考到已經(jīng)設計好的VB界面的按鈕命令下，在運行VB程序，單擊“創(chuàng)建CATIA圖”后就可以實現(xiàn)VB與CATIA的連接。當我們設計的齒輪參數(shù)改變，通過VB連接CATIA所畫的三維圖也隨之改變，這樣就完成了基于VB和CATIA軟件的齒輪的參數(shù)化設計和開發(fā)[15]。第5章 總結及展望基于VB語言的參數(shù)化設計是在對齒輪傳統(tǒng)設計進行深入分析的基礎上，綜合運用VB可視化設計工具、界面與菜單設計技術、數(shù)據(jù)處理技術、數(shù)表和線圖的程序化方法等現(xiàn)代技術進行開發(fā)實現(xiàn)的。改程序不僅功能強大、易于擴展，而且界面友好，有效的縮短了設計周期，提高了設計精度，實現(xiàn)了齒輪參數(shù)設計的自動化。通過本文的研究，可以做出如下結論：（1）通過分析傳統(tǒng)齒輪設計特點及機械設計技術的發(fā)展趨勢，以VB語言為開發(fā)工具，開發(fā)出了齒輪的參數(shù)設計系統(tǒng)，克服了傳統(tǒng)設計的缺點，實現(xiàn)了參數(shù)的自動設計，大大提高了設計的質量和效率。（2）在參數(shù)設計中，利用條件語句實現(xiàn)了數(shù)表的程序化，做到了設計計算值規(guī)范化和標準化。（3）采用對工程編譯的方法，發(fā)布了在Windows平臺上就可使用的應用程序。（4）利用可視化工具，開發(fā)出了簡潔、友好的窗體界面，操作者只要按照提示點擊按鈕即可完成設計。（5）本系統(tǒng)通過對齒輪設計過程的程序化，大大節(jié)省了查閱手冊和計算的時間，避免了許多人為錯誤。 （6）對CATIA進行二次開發(fā)，以VB作為開發(fā)工具，用VB驅動CATIA畫出三維實體，這樣有利于零件快速設計與優(yōu)化，提高工作效率。 本文只做了開發(fā)方面的一些初步工作，由于時間和水平上的局限，還存在許多不足之處。在今后的學習中，還需要對圓錐齒輪、蝸輪蝸桿等的參數(shù)化作進一步的研究，使本程序功能更加完善。致 謝進過幾個月的努力，我的畢業(yè)設計終于圓滿完成。四年的大學生活似乎太短暫，只覺得要學的東西越來越多，可惜即將畢業(yè)，我又要奔赴新的生活征程。這四年的確是我人生中最難忘的經(jīng)歷，在這里我要感謝幫助過我的老師和朋友，特別是在完成畢業(yè)設計的大學最后階段里我最要感謝的是我的指導老師………………參考文獻［1］［J］.長春工程學院院報，2003，4（3）：7072［2］張文麗，《VB 二次開發(fā)Pro/ ENGINEER建立齒輪參數(shù)化模型系統(tǒng),機械設計》［J］.2010，5052［3］ 張繼春，《Pro/ ENGINEER 二次開發(fā)實用教程》[M].北京:北京大學出版社, 2003: 349 355.［4］ 姜美榮、黃愷、韓玉，《PRO／E環(huán)境下的的點線嚙合齒輪參數(shù)化建模. 遼寧工業(yè)大學學報(自然科學版)》［J］.第3l卷第1期:2225［5］ 李叢德、王得勝，《基于VB的SolidWorks漸開線齒輪二次開發(fā)方法研究》［J］.機電工程技術2008年第37卷第11期：2325［6］ 榮輝，付鐵，[M].，2010，77119［7］ 陳曉南、[M].，2007，202211［8］ 肖志信、[J].現(xiàn)代機械，2007，3436［9］ V5快速入門教程[M].，2008，118［10］ANG Xueye, GUO Yongkun. Parametric 3D Modeling of Worm and Worm Gear Based on AutoCAD [J]. CADDM，2010，914［11］顧勇，高一知. 基于CATIA的漸開線變位齒輪參數(shù)化建模與二次開發(fā)[J].機械，2009年增刊，6062［12］陳國定，陳曉楠，官的娟. 機械設計基礎[M]. 北京：機械工業(yè)出版社，2005.［13］Y. P. Li, “3D Modelling and Parametrized Design of Gears Based onPro/E,” Machine Design and Research, Shanghai, 2007(3), pp. 8486.［14］Bin Shen,Lianrong Ma ,Da Gong. Based on Pro/E’s Redevelop of parts parameterization designing technical[J].Mechanical design and manufacturing,2007(1):4042［15］胡挺，吳立軍. CATIA二次開發(fā)技術基礎[M]. 北京：電子工業(yè)出版社，2006.附 錄1. 齒輪參數(shù)化軟件源代碼Dim p As DoubleDim n1 As DoubleDim u As DoubleDim m As DoubleDim z1 As IntegerDim z2 As IntegerDim ψ As SingleDim T1 As DoubleDim Δ As DoubleDim K As DoubleDim a As DoubleDim b As DoubleDim b1 As IntegerDim b2 As IntegerDim YF1 As DoubleDim YF2 As DoubleDim σF1 As DoubleDim σF2 As DoubleDim σH1 As DoubleDim σH2 As DoubleDim σFf1 As DoubleDim σFf2 As DoubleDim σHlim1 As DoubleDim σHlim2 As DoubleDim σFlim1 As DoubleDim σFlim2 As DoubleDim ha As DoubleDim c As DoubleDim d1 As DoubleDim da1 As DoubleDim df1 As DoubleDim db1 As DoubleDim d2 As DoubleDim da2 As DoubleDim df2 As DoubleDim db2 As DoubleDim α As DoubleDim pi As DoubleDim t As DoubleDim g As IntegerDim SelXyd As DoubleDim SelDyd As DoublePrivate Sub C11_Click() = True = True = False = False = False = False = False = False = False = False = True = True = True = True = True = TrueEnd SubPrivate Sub C12_Click() = True = True = False = False = False = False = False = False = False = False = True = True = True = True = True = TrueEnd SubPrivate Sub C13_Click() = True = True = True = False = True = True = True = True = True = False = False = False = False = False = FalseEnd SubPrivate Sub Command1_Click()pi = α = 20ha = 1c = p = Val()n1 = Val()u = Val()39。初次設計DXyingduDXjiechuSelψSelt39。計算小齒輪接觸應力σH1 = σHlim1 / SH(SelXyd, SelDyd)39。計算大齒輪接觸應力σH2 = σHlim2 / SH(SelXyd, SelDyd)39。計算小齒輪彎曲應力σF1 = σFlim1 * t / SF(SelXyd, SelDyd)39。計算大齒輪彎曲應力σF2 = σFlim2 * t / SF(SelXyd, SelDyd)39。小齒輪傳遞的轉矩T1 = * 1000000 * p / n139。運行載荷系數(shù)子程序SelK39。初算計算中心距單位為NMa = (u + 1) * ((K * T1 * 335 / (u * ψ * σH(σH1, σH2)))) ^ (1 / 3)39。初定確定齒數(shù)z1z1 = 21If Thenz1 = Val()z2 = u * z1End IfCalΔIf Δ = Then 39。確定模數(shù) m = 2 * Int(a) / (z1 + z2) 39。選模數(shù) m = SelM(m) 39。齒寬 b = ψ * Int(D(m, z1)) b1 = Int(b) + 3 b2 = Int(b)Else Do z1 = z1 + 1 z2 = u * z1 CalΔ 39。確定模數(shù) m = 2 * Int(a) / (z1 + z2) 39。選模數(shù) m = SelM(m) 39。齒寬 b = ψ * Int(D(m, z1)) b1 = Int(b) + 3 b2 = Int(b) If Δ = Then Exit Do LoopEnd If39。運行選擇齒形系數(shù)子程序SelYF1239。校核運算σFf1 = 2 * K * T1 * YF1 / (Int(b) * (SelM(m) ^ 2) * z1)σFf2 = σF1 * YF2 / YF1If σFf1 σF1 And σFf2 σF2 Then 39。輸出設計結果 Text8 = m Text9 = z1 Text10 = D(m, z1) Text11 = Da(m, z1) Text12 = Df(m, z1) Text13 = Aa(m, z1, z2) Text14 = b1 Text15 = m Text16 = z2 Text17 = D(m, z2) Text18 = Da(m, z2)