【正文】 MPa End Select = amp。 MPa Case 6, 7, 8 = 198 + * amp。 MPa = 120 + * amp。 MPa = 335 + * amp。 End If End If zjj = If CInt() = 10 Or CInt() = 170 Then MsgBox 軸交角必須在 10176。 mm = Mn = Z1 21 = Z2 = D1 amp。代碼窗口包含如下元素： 對象列表框 :顯示所選對象的名稱 ,單 擊列表框右邊的箭頭，顯示和窗體有關的所有對象清單。如何來繪制控件呢 ?首先我們單擊工具箱中的文本框，然后將指針移到窗體上，大家看到窗體中的指針變成十字 (+)光標，拖動十字光標到你需要大小的位置 ，釋放鼠標按鈕，控件就出現(xiàn)在窗體中。同一功能菜單下又可以按照菜單項的功能分為若干組，這時就可以用分隔線實現(xiàn)菜單項的分組?！狈?，它用在菜單項的標題 (Caption)屬性里。本系統(tǒng)均利用菜單編輯器來實現(xiàn)。其它的后繼控件 Enabled屬性設置為 False，這些控件是灰白色的（不可見的），是無效的、不能操作的。界面設計時在窗口、對話框等對象上設立幫助菜單、幫助按鈕。在齒輪傳動參數(shù)設計系統(tǒng)用戶 界面設計中主要考慮了以下幾方面： 保持界面元素的一致性 一致性是界面設計中的一個重要問題。 齒輪齒面的接觸疲勞極限σ Hlim和齒根彎曲疲勞極限σ Flim與齒輪的材料和硬度有關，要求接觸疲勞極限σ Hlim和彎曲疲勞極限σ Flim必須根據(jù)齒輪的材料和硬度分別查取下面圖 2圖 24(共 10個圖表 )中的某一圖形。仿照式（ 15）得 : 1S = 11n iii x??? 系數(shù) 1S 及常數(shù)項 kT 的運算可用 for循環(huán)語句實現(xiàn)。為避免出現(xiàn)失真現(xiàn)象，采用下式控制在結點處的偏差： ? ?2 211nni m i iiiR P x y? ??? ? ??????? (12) 與式（ 11）聯(lián)立， 式（ 12）可記為 : ? ?1 2111nm jjiij xy??? ??????? (13) 上式的幾何解釋是曲線 ??mPx不嚴格過原曲線 f(x)各結點，但要控制在各結點處與原曲線的偏差最小，即擬合曲線 ??mPx較準確地反映原曲線 f(x)(各結點 )的變化趨勢。更進一步 ,甚至程序和程序之間也會有通訊和交戶 ,基本上用戶是通過鼠標、鍵 盤與應用程序進行交互的 ,這時那些對象就必須對鼠標和鍵盤操作所引發(fā)的事件做出響應。 5 在選擇所需要的應用程序開發(fā)工具時 ,不但要考慮開發(fā)工具的功能是否強大 ,還要考慮所花費的時間和效果。現(xiàn)代齒輪設計與制造尋找一種有效的技術方法。由于本人水平有限，時間倉促，說明書中錯誤或不足之處在所難免 , 懇請各位老師及同學提出寶貴意見和 建議 。 3）傳動比穩(wěn)定。 1 前 言 畢業(yè)設計是學生在校學習階段的最后一個教學環(huán)節(jié)，也是學生完成工程師基本訓練的重要環(huán)節(jié)。 在各類機械產(chǎn)品的零件中 ,齒輪占有相當大的比重 ,提高齒輪的設計質(zhì)量和效率已成為提高機械產(chǎn)品質(zhì)量和效率的關鍵。 3 1 參數(shù)設計技術 面向?qū)ο蟮某绦蛟O計技術代表了當今程序設計的發(fā)展方向，已逐漸成為程序設計的一個“熱門”技術?？梢哉f，它是齒輪快速設計技術的需要 ,亦是我國齒輪工業(yè)產(chǎn)業(yè)升級的需要 ,具有重大的現(xiàn)實意義。綜合考慮，在確定開發(fā)工具 時選擇 。響應就是指執(zhí)行一段應用程序 ,它不沿預定的路徑執(zhí)行 ,而是在響應不同事件時執(zhí)行不同的代碼。 由于 ix 和 iy 是已知的一組數(shù)據(jù)，因此式（ 13）的φ可看作是多項式樣 mP (x)待定系數(shù) α j(j=1,2,? ,m,m+1)的函數(shù)，可表示為： φ =φ (α 1,α 2,? ,α m,α m+1) 求出上式中φ為極小時的α 1,α 2 ,? ,α m ,α m+1值代入式（ 13）中，所得多項式 ??mPx 8 就是與原函數(shù)（曲線）各結點處偏差平方和極小時的擬合多項式（擬合曲線 ）。 建立和求解線性方程組的運算程序框圖如圖 22所示。人工查閱相當麻煩。缺乏一致性就會使界面混亂、無序、不協(xié)調(diào)，給用戶的使用帶來不便，甚至還會使用戶覺得應用程序不可靠。當用戶在使用應用軟件遇到問題時，不必翻閱參考手冊，通過聯(lián)機幫助系統(tǒng)就能隨時隨地獲得有效的幫助，迅速解決問題。這樣設置的目的是保證設計過程的連續(xù)性和嚴格先后順序。 常用菜單項快捷操作的設置 菜單項快捷操作的設置分 為快捷鍵和訪問鍵兩個部分。如將一頂層菜單的標題屬性設為“文件 (amp。 下拉式菜單的實現(xiàn) 下拉式菜單是用戶在任何時候都可以在頂端菜單條上選擇后拉出的菜單。 還有一個更簡單的方法來繪制控件，只 要雙擊工具箱中的控件，這樣會在窗體中央創(chuàng)建一個尺寸為缺省值的控件，然后再用 鼠標調(diào)整控件的大小，移動控件到窗體中的其它位置。 過程列表框 :列出對象的過程和事件 ,選取該框右邊的箭頭可以顯示這個對象的全部事件。 mm = D2 amp。與 170176。 MPa Case 6, 7, 8 = 198 + * amp。 MPa End Select = amp。 MPa 44 = 170 + * amp。 HBS If 10 And 10 Then MsgBox 小齒輪材料選擇有誤 Exit Sub End If If Then MsgBox 小齒輪硬度需 要大于大齒輪硬度 Exit Sub End If If = 5 Then If = 5 Then 45 AD = 1: ZE = ElseIf = 6 And = 9 Then AD = : ZE = ElseIf = 10 And = 11 Then AD = : ZE = ElseIf = 12 And = 15 Then AD = : ZE = End If ElseIf = 6 And = 9 Then If = 6 And = 9 Then AD = : ZE = 188 ElseIf = 10 And = 11 Then AD = : ZE = ElseIf = 12 And = 15 Then AD = : ZE = End If ElseIf = 10 And = 11 Then If = 10 And = 11 Then AD = : ZE = ElseIf = 12 And = 15 Then AD = : ZE = End If 46 ElseIf = 12 And = 15 And = 12 And = 15 Then AD = : ZE = End If End Sub Private Sub Command2_Click() Unload Me End Sub Private Sub Form_Load() 45正火（ 162217） HBS 45調(diào)質(zhì)（ 217255） HBS 42SiMn調(diào)質(zhì)（ 217269） HBS 40MnB調(diào)質(zhì)（ 241286） HBS 35CrMo調(diào)質(zhì)（ 207269） HBS 40Cr調(diào)質(zhì)（ 241286） HBS ZG310570正火（ 163197） HBS ZG340640正火（ 169229） HBS ZG35CrMnSi正火、回火（ 163217） HBS ZG35CrMnSi調(diào)質(zhì)（ 197269） HBS 47 HT300（ 190240） HBS HT350（ 210260） HBS QT5007（ 170230） HBS QT6003（ 190270） HBS KTZ55004（ 180250） HBS KTZ65002（ 210260） HBS 45正火（ 162217） HBS 45調(diào)質(zhì)（ 217255） HBS 42SiMn調(diào)質(zhì)（ 217269） HBS 40MnB調(diào)質(zhì)（ 241286） HBS 35CrMo調(diào)質(zhì) （ 207269） HBS 40Cr調(diào)質(zhì)（ 241286） HBS ZG310570正火（ 163197） HBS ZG340640正火（ 169229） HBS ZG35CrMnSi正火、回火（ 163217） HBS ZG35CrMnSi調(diào)質(zhì)（ 197269） HBS HT300（ 190240） HBS HT350（ 210260） HBS QT5007（ 170230） HBS QT6003（ 190270） HBS KTZ55004（ 180250） HBS KTZ65002（ 210260） HBS 48 = 0 = 0 = 圓錐齒輪傳動參數(shù)設計系統(tǒng) words = = 150 = True = End Sub Private Sub timer1_timer() lenth = Len(words) txtword = Left(words, ii) = txtword ii = ii + 1 If ii lenth Then ii = 0 End If End Sub Private Sub HScroll3_Change() = amp。 MPa = 120 + * amp。 MPa = 335 + * amp。 MPa Case 12, 13, 14, 15 = 272 + * amp。 MPa Case 2, 3, 4, 5 = 331 + * amp。 amp