【正文】 kz = / 10 * (i 10) + ElseIf (20 i And i = 30) Then kz = / 10 * (i 20) + ElseIf (30 i And i = 40) Then kz = / 10 * (i 30) + ElseIf (40 i And i = 50) Then kz = / 10 * (i 40) + ElseIf (50 i And i = 60) Then kz = / 10 * (i 50) + End If f = 17 w = f / 100 * j 39。（6）提高了查閱中外資料和閱讀資料并查找有效信息的能力。 應(yīng)用【工程】窗口功能的方法是在【工程】窗口上單擊鼠標(biāo)右鍵，比如想要將【工程】在軟盤上作一備份，可用鼠標(biāo)右鍵單擊【工程】窗口上的任一項(xiàng)，再在出現(xiàn)的菜單上選擇【另存為】命令，就可以將源程序作一備份了如圖 8。應(yīng)用程序之間的資源共享。 “Visual”是的指采用可視化的開發(fā)圖形用戶界面（GUI）的方法，一般不需要編寫大量代碼去描述界面元素的外觀和位置，而只要把需要的控件拖放到屏幕上的相應(yīng)位置既可方便設(shè)計(jì)圖形用戶界面：“Basic”指的是 BASIC 語言，因?yàn)?VB 是在原有的 BASIC 語言的基礎(chǔ)上發(fā)展起來的。 為中心 fK? 線與水平面夾角，本文取 =0176。從動(dòng)鏈輪的齒數(shù)。 中心距 a中心距過小，單位時(shí)間內(nèi)鏈條的繞轉(zhuǎn)次數(shù)增多，鏈條伸曲次數(shù)和應(yīng)力循環(huán)次數(shù)增多，因而加劇了鏈的磨損和疲勞。受到刀具限制maxd齒根圓直徑df df=dd1齒高 hahamin =(pd1)hamax =+(a+b)/2Ha 為節(jié)距多邊形以上部分的齒高，用于繪制放大尺寸的齒槽形狀（見表92）確定的最大軸凸緣直徑dg dg=pcot(1800/z)1,h2 為內(nèi)鏈板高度，見表 91注：da、dg 值取整數(shù)、其他尺寸精確到 。 主要研究內(nèi)容 機(jī)械優(yōu)化設(shè)計(jì)是把數(shù)學(xué)規(guī)劃理論和計(jì)算方法應(yīng)用于機(jī)械設(shè)計(jì)，按照預(yù)定的目標(biāo)，借助與電子計(jì)算機(jī)的運(yùn)算尋求最優(yōu)的設(shè)計(jì)方案的有關(guān)參數(shù)，從而獲得較好的技術(shù)經(jīng)濟(jì)效果，進(jìn)而對機(jī)械零件結(jié)構(gòu)參數(shù)的選擇進(jìn)行優(yōu)化，從而在滿足一定工作條件下，使工作零件結(jié)構(gòu)參數(shù)的選擇盡可能達(dá)到最優(yōu)。通過鏈輪輪齒與鏈條鏈節(jié)的嚙合來傳遞運(yùn)動(dòng)和動(dòng)力。本課題主要研究 A 系列滾子鏈的設(shè)計(jì)。因此，對鏈傳動(dòng)的設(shè)計(jì)是十分重要和必要的。本課題主要討論滾子鏈。鏈的磨損主要發(fā)生在銷軸與套筒的接觸面上。 鏈傳動(dòng)的主要缺點(diǎn)是：只能實(shí)現(xiàn)平行軸間鏈輪的同向傳動(dòng)；運(yùn)動(dòng)時(shí)不能保持恒定的瞬時(shí)傳動(dòng)比；磨損后易發(fā)生跳齒；工作時(shí)有噪聲；不易用在載荷變化很大、高速和急速反向的傳動(dòng)中。在國標(biāo) GB/T12341997 中沒有規(guī)定具體得鏈輪齒形，僅僅規(guī)定了最小和最大得齒槽形狀及其極限參數(shù)。從動(dòng)輪齒數(shù) z2=i*z1從動(dòng)輪轉(zhuǎn)速 n2=i*n1 傳動(dòng)比 i傳動(dòng)比過大，鏈條在小鏈輪上的包角就會(huì)過小，參與嚙合的齒數(shù)減小，每個(gè)輪承受的載荷增大，加速輪齒的磨損，且易出現(xiàn)跳齒和脫鏈現(xiàn)象。 = * * *???????? 式中： 為鏈板疲勞強(qiáng)度限定的額定功率（kw ）?0 Z1 為小鏈輪齒數(shù)； n1 為小鏈輪轉(zhuǎn)速（r/min）； P 為鏈條節(jié)距 (mm)。 離心力引起的拉應(yīng)力 Fc=qv2 式中：q 為鏈條單位長度的質(zhì)量 kg/m 。 關(guān)于 Visual Basic Microsoft Visual Basic（簡稱 VB）是在 Windows 操作平臺(tái)下設(shè)計(jì)應(yīng)用程序的最迅速、最簡捷的工具之一。結(jié)構(gòu)化程序設(shè)計(jì)；通過屬性窗口可以設(shè)置窗體、控件等對象的屬性值，這種方法稱為設(shè)計(jì)時(shí)改變對象的屬性值；若用程序代碼設(shè)置對象屬性，則稱為運(yùn)行時(shí)改變對象的屬性值如圖 5。圖 15 計(jì)算結(jié)果9 結(jié)束語通過本次畢業(yè)設(shè)計(jì)，使我對 Visual Basic 有了一定的了解和掌握，基本熟悉了 Visual Basic 語言和機(jī)械設(shè)計(jì)之間的聯(lián)系，基本掌握了用機(jī)械設(shè)計(jì)思想和運(yùn)用 Visual Basic 程序設(shè)計(jì)方法對鏈傳動(dòng)進(jìn)行簡單的參數(shù)化設(shè)計(jì)，使我對Visual Basic 這種計(jì)算機(jī)語言有了更進(jìn)一步的認(rèn)識(shí)，能夠運(yùn)用 Visual Basic 軟件按鏈傳動(dòng)的設(shè)計(jì)思想和鏈傳動(dòng)的幾個(gè)重要參數(shù)的約束條件建立目標(biāo)函數(shù)并進(jìn)行參數(shù)化設(shè)計(jì)，而且通過這次畢業(yè)設(shè)計(jì)中還使我具備了以下幾方面的能力：（1）使我對機(jī)械設(shè)計(jì)思想的認(rèn)識(shí)有了進(jìn)一步的提高，進(jìn)一步提高了嚴(yán)謹(jǐn)負(fù)責(zé)的工作態(tài)度?。?）鍛煉了用計(jì)算機(jī)語言 Visual Basic 軟件同機(jī)械設(shè)計(jì)過程有機(jī)結(jié)合的能力。確定計(jì)算功率39。圖 11 菜單欄窗口(8) 工具欄 工具欄上的圖標(biāo)，代表一些經(jīng)常使用的命令，單擊某圖標(biāo)，與單擊菜單命令或按下快捷鍵的效果一樣。標(biāo)準(zhǔn)工具箱共有包括圖片框、文本框、數(shù)據(jù)、對象鏈接和嵌入等在內(nèi)的 20 個(gè)控件，能夠?qū)崿F(xiàn)顯示或繪制圖像圖形、顯示可以編輯的文本、訪問數(shù)據(jù)庫中的數(shù)據(jù)、鏈接或嵌入其他程序到 VB 程序中等基本功能。它包括專業(yè)版的所有特性。7 鏈傳動(dòng)的優(yōu)化設(shè)計(jì)的方法 編程語言的選擇隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展，編程語言也隨之突飛猛進(jìn)地發(fā)生了變化。因?yàn)殒渹鲃?dòng)為嚙合傳動(dòng)，所以與帶傳動(dòng)相比，鏈傳動(dòng)所需的張緊力要小得多。如果從經(jīng)濟(jì)上考慮，當(dāng)中心距小、傳動(dòng)比大時(shí)，應(yīng)選小節(jié)距得多排鏈；中心距大、歘動(dòng)筆小時(shí)，應(yīng)選大節(jié)距的單排鏈。 1z小鏈輪的齒數(shù) z1 也不易過大。2）效率要高：算法的效率是指解題的效率，一般可用算法所用計(jì)算時(shí)間或計(jì)算函數(shù)的次數(shù)來衡量，最好選用不計(jì)算梯度與海色矩陣的優(yōu)化方法，盡可能選用計(jì)算過程中調(diào)用函數(shù)值次數(shù)少的優(yōu)化方法。滾子鏈和鏈輪嚙合得基本參數(shù)是節(jié)距 p,滾子外徑 d1, 內(nèi)鏈節(jié)內(nèi)寬 p 是主要參數(shù)，結(jié)距增大時(shí)，鏈條中各零件的尺寸也要相應(yīng)的增大，可傳遞功率也隨著增大。2 設(shè)計(jì)要求 根據(jù)鏈傳動(dòng)的設(shè)計(jì)理論，根據(jù)參數(shù)化設(shè)計(jì)的原理，建立起帶傳動(dòng)的參數(shù)化設(shè)計(jì)的數(shù)學(xué)模型，并采用一定的算法，編出程序來實(shí)現(xiàn)其參數(shù)化設(shè)計(jì)過程。按照用途的不同，鏈條可分為三種，傳動(dòng)鏈、輸送鏈、和起重鏈。鏈傳動(dòng)是一種撓性傳動(dòng)，其具有結(jié)構(gòu)簡單、傳動(dòng)平穩(wěn)、價(jià)格低廉、能緩沖吸振、能在較差的環(huán)境中工作等優(yōu)點(diǎn)。在開發(fā)完成之后，將會(huì)生成一個(gè)模塊，可在其上輸入相關(guān)參數(shù)，然后由程序自動(dòng)進(jìn)行計(jì)算，最終輸出一個(gè)最優(yōu)結(jié)果。由于過渡鏈節(jié)得鏈板要受附加彎矩得作用，所以在一般情況下最好不用奇數(shù)鏈節(jié)。 （4）在具體的設(shè)計(jì)中，會(huì)遇到某一優(yōu)化設(shè)計(jì)問題，可采用不同的算法求解，為提高設(shè)計(jì)和繪圖效率，實(shí)現(xiàn)人機(jī)對話，開發(fā)出鏈傳動(dòng)優(yōu)化設(shè)計(jì)與參數(shù)化自動(dòng)繪圖軟件包提出具體的實(shí)施方案，并遵循以下幾個(gè)原則：1）可靠性要好：在合理的精度要求下，在一定的計(jì)算時(shí)間內(nèi)，求解優(yōu)化問題的成功率越高，可靠性越好。一般 z1= 17,對于高速傳動(dòng)或承受沖擊載荷的鏈傳動(dòng)， 不少于 25，且連輪齒應(yīng)淬硬 。速度高、率大時(shí)，宜選用小節(jié)距的多排鏈。鏈傳動(dòng)張緊的目的主要是使松邊不致過松，以免出現(xiàn)鏈條的不正常嚙合、跳齒或脫鏈。優(yōu)化方法采用共軛方向法的改進(jìn)法———網(wǎng)格法,并用 VB 編寫了軸參數(shù)優(yōu)化設(shè)計(jì)源程序 [11]。企業(yè)版允許專業(yè)人員以小組的形式來創(chuàng)建強(qiáng)大的分布式應(yīng)用程序。 顯示標(biāo)準(zhǔn)的 VB 控件及已添加到工程中的任何 ActiveX 控件和可插入對象。有些菜單項(xiàng)以淺灰色顯示．表名在當(dāng)前狀態(tài)下不可用。 If ( = w And w = ) Then kf = 4 / * (w ) + 30 ElseIf ( w And w = 1) Then kf = 13 / * (w ) + 26 ElseIf (1 w And w = ) Then kf = 5 / * (w 1) + 13 ElseIf ( w And w = 3) Then kf = / * (w ) + 8 ElseIf (3 w And w = 5) Then kf = / 1 * (w 2) + ElseIf (5 w And w = 10) Then kf = / 2 * (w 3) + End If Pca = ka * kz * P1 39。（3）進(jìn)一步提高了實(shí)踐動(dòng)手能力（4）加強(qiáng)了論文格式及排版的能力，以及抓圖工具的使用。打開某一控件的屬性窗口，可以采用以下任意一種方法：1)先選定控件．比如在窗體上單擊該控件，然后按 F4 鍵；2)先選定控件，比如在窗體上單擊該控件，然后單擊工具欄上的屬性圖標(biāo)；3)選擇【視圖】/【屬性】命令，然后在【屬性】窗口上部的下拉列表框選擇某件。事件驅(qū)動(dòng)的程序設(shè)計(jì)；不論是初學(xué)者還是專業(yè)開發(fā)人員，VB 都為他們提供了一整套的工具，可以輕松地開發(fā)應(yīng)用程序。懸垂拉力 Ff 為 Ff=100Kfqa 式中：a ——鏈傳動(dòng)的中心距 mm 。 鏈速計(jì)算 因?yàn)殒準(zhǔn)怯袆傂枣湽?jié)通過銷軸鉸接而成，當(dāng)鏈繞在鏈輪上時(shí)，其鏈節(jié)與相應(yīng)的輪齒嚙合后，這一段鏈條即將曲折成正多邊形的一部分。一般鏈傳動(dòng)的傳動(dòng)比 i=6,常去 i= 之間，鏈條在小鏈輪上的包角不應(yīng)小于 120176。實(shí)際齒槽形狀取決于加工輪齒得刀具和加工方法，并應(yīng)使其位于最小和最大齒槽形狀之間。 鏈傳動(dòng)主要用在要求工作可靠，兩軸相距較遠(yuǎn)，低速重載，工作環(huán)境惡劣，以及其他不已采用齒輪傳動(dòng)的場合。因此，內(nèi)外鏈板間應(yīng)留少