【導(dǎo)讀】在隨著科學(xué)技術(shù)的發(fā)展，機(jī)械制造業(yè)的應(yīng)用十分廣泛。特別是在農(nóng)業(yè)機(jī)械、工程機(jī)械、軍事應(yīng)用當(dāng)中占據(jù)著重要位置。在進(jìn)入工業(yè)時代以來，機(jī)械制造始。終是創(chuàng)造社會財富的主要來源，是衡量國家綜合國力的重要指標(biāo)。械傳動中V帶傳動式最傳統(tǒng)也是現(xiàn)在最為廣泛的機(jī)械傳動。因此，掌握V帶傳。本篇文章應(yīng)用機(jī)械設(shè)計方法，通過vb軟件強(qiáng)大。提高工作效率，減少了大量的工作時間?？偟膩砜?，本次設(shè)計包含了數(shù)學(xué)模型的。建立和程序的編制。當(dāng)設(shè)計的系統(tǒng)完成時，我們可以得到一個可視化的操作界面，得到相應(yīng)的結(jié)果。此外，vb上手比較容易，且能建立友好的界面，其功能比較。實用，便于理解面向?qū)ο缶幊蹋@也是此次設(shè)計選取vb的原因。

　　

【正文】 8） 工程的保存及生成 EXE 在設(shè)計的過程中，為防止出現(xiàn)意外狀況，經(jīng)常要對剛做完的窗體界面進(jìn)行保存，通過點擊文件中的保存工程，即對當(dāng)前的設(shè)計進(jìn)行保存。設(shè)計完全部的界面之后，點擊菜單中“生成新建工程”（一般保存在桌面上），則會生成專門 的運(yùn)行程序，點擊新生成的圖標(biāo)， 則 會出現(xiàn)界面的演示。 23 第 4 章 設(shè)計示例 在第 3 章 最后提到了生成的“ EXE”工程程序，點擊之后將進(jìn)入前邊所設(shè)計的界面，在演示的過程中，由于第一個界面只有本次畢業(yè)設(shè)計課題，指導(dǎo)老師及姓名，所以，在下邊的演示過程中就不附加了，直接從第二個界面進(jìn)行介紹以及操作。 計算一鼓風(fēng)機(jī)用普通 v 帶傳動。動力機(jī)為 Y 系列三相異步電動機(jī)，功率P=，轉(zhuǎn)速 n1=1440r/min。鼓風(fēng)機(jī)轉(zhuǎn)速 n2=630r/min，每天工作 16h。希 望中心距不超過 700mm。 界面顯示及操作過程 圖 41 參數(shù)的選取 該設(shè)計界面的主要任務(wù)是通過輸入已知的數(shù)據(jù)（有的根據(jù)查表的得到），繼而計算出 v 帶傳動的計算功率 PC，其計算的結(jié)果為 9kw，點擊“顯示參數(shù)”這 24 一命令按鈕，在右邊的文本框里會顯示出之前所輸入的各個參數(shù)。在這一過程前，命令按鈕“下一步”的 Enabled 的屬性值始終是 false，也就是不能點擊，只有計算得到 PC 的之后，它的屬性值才更改為 true，點擊它，進(jìn)入到下一個界面。如果想結(jié)束本次的設(shè)計，可以直接點擊右下角的“結(jié)束”命令按鈕，則本次 設(shè)計結(jié)束，界面將會關(guān)閉。后邊的每個界面都有相似的“結(jié)束”按鈕，和“參數(shù)選取”界面的作用相同，在介紹后邊的操作界面就不多加介紹。 圖 42 帶速的計算 進(jìn)入到“帶速的計算”界面之后，右上方的文本框通過編輯，將自動出現(xiàn)第一個界面所顯示出來的參數(shù)，通過這些參數(shù)可以從左邊的表中選取出適合小帶輪基準(zhǔn)直徑的值，然后計算出大輪轉(zhuǎn)速、大輪直徑以及帶的傳動速度 V，其中，由 25 于普通 v 帶的傳動速度一般是在 5～ 25（ m/s）要對其進(jìn)行驗算，根據(jù)例題數(shù)據(jù)所計算得出的帶速為 ,符合普通 v 帶的帶速范圍。如上圖所示，點擊確定 之后，才能進(jìn)行到下一步的操作之中。如果不符合這一范圍，則是由于選擇小帶輪的基準(zhǔn)直徑不符合本次設(shè)計的設(shè)計要求，需再次查表選取適當(dāng)?shù)男л喕鶞?zhǔn)直徑。當(dāng)完成全部的步驟之后，計算出相應(yīng)的傳動比，界面之內(nèi)給出的數(shù)據(jù)滿足其要求，為了顯示校核的菜單框，所以截取的界面沒有計算傳動比的值，本次設(shè)計的傳動比為 。點擊命令按鈕“下一步”進(jìn)入到下一界面，如果覺得有些界面 2的參數(shù)需要進(jìn)行修改，則點擊命令按鈕“上一步”則會進(jìn)入到上一界面，同“結(jié)束”按鈕一樣，在后面的每個界面都涉及到“上一步”命令按鈕，在后邊的操作界面介紹時，也不 多加介紹。 圖 43 中心距選取及包角的計算 進(jìn)入到 “中心距選取及包角的計算”界面之后，根據(jù)中心距的初選的范圍（公式（ 26）提到）選出初取中心距 a0，為 650mm，根據(jù)公式（ 27）計算得到初 26 選的基準(zhǔn)長度為 1949mm，根據(jù)界面 3 中的插圖選擇標(biāo)準(zhǔn)的基準(zhǔn)長度為 2021mm，在此文本框里按照公式（ 28）編寫計算計算實際中心距的程序，當(dāng)輸入選擇的基準(zhǔn)長度，則下一個文本框直接顯示出計算出來的實際中心距 a，在下一個計算包角的命令按鈕中，按照公式（ 29）編輯計算小帶輪包角的計算公式，計算出小帶輪的包角為 166，大于 120，滿足設(shè)計的要求。如果不符合該范圍，則根據(jù)編寫的程序，自動返回到初取中心距的文本框，進(jìn)行重新選取中心距，如果小帶輪包角滿足這一范圍，即會出現(xiàn)如界面 3 中的一個校核菜單框，單擊確定，將會是命令按鈕“下一步”的屬性里邊的 Enabled 值更改為“ true”，點擊次命令按鈕，則會進(jìn)入到 “帶根數(shù)的運(yùn)算”界面。 圖 44 帶根數(shù)的運(yùn)算 進(jìn)入到“帶根數(shù)的運(yùn)算”界面之后，由于該界面所涉及的圖片較多，如果放到一塊，不僅難以查找，還要進(jìn)行必要的下拉式圖片框，其編輯的程序較為繁瑣， 27 為了提高設(shè)計的效率，界面中插圖的 選擇編入到命令按鈕里邊，需要選取的參數(shù)，直接點擊該參數(shù)的命令按鈕，則下邊的圖片框就會顯示出相應(yīng)的插圖，例如“中心距選取及包角的計算”界面中所顯示的圖片就是通過點擊命令按鈕“單根 v帶的基本額定功率 P”后顯示出來的插圖，后邊的幾個插圖是根據(jù)相同的原理編輯出來的。 按照上述的方法得到相應(yīng)的參數(shù)，根據(jù)公式（ 210）對命令按鈕“根數(shù) Z”進(jìn)行編輯，又因為是帶根數(shù)的數(shù)值，所以在編寫程序時，應(yīng)該 把 數(shù)值取為整數(shù)。點擊該命令按鈕，右邊的文本框就會顯示出所求的的帶根數(shù)，輸入選取的參數(shù)之后，計算得出帶根數(shù)為五根，符合帶根數(shù)小于十 的設(shè)計要求，如果不滿足的話，界面將會自動返回到界面“帶速的計算”，進(jìn)行重新選取帶型號。本界面相應(yīng)的參數(shù)通過編寫程序也會在下邊的文本框里顯示出來，點擊命令按鈕“下一步”，則進(jìn)入到“設(shè)計的結(jié)果”界面。 圖 45 設(shè)計的結(jié)果 該設(shè)計幾面為本次設(shè)計的最后一個界面，進(jìn)入到該界面之后，創(chuàng)建計算張緊力和軸上載荷的命令按鈕，根據(jù)公式（ 211）和公式（ 212）編輯相應(yīng)的計算公 28 式，當(dāng)計算完這兩個力之后，通過編輯相應(yīng)的程序，會顯示出框架“確定帶輪結(jié)構(gòu)”，點擊命令按鈕大小帶輪的結(jié)構(gòu)，則在下邊的文本框會顯示出所設(shè)計大小帶輪的使用結(jié)構(gòu)，同時，郵編的顯示參數(shù)這一文本框會把整個設(shè)計過程中的參數(shù)都顯示出來，通過這一文本框，可以看到整個設(shè)計中所涉及到的參數(shù)。 根據(jù)所輸入的數(shù)據(jù)集相關(guān)的計算得出小帶輪所選的結(jié)構(gòu)形式為“實心式”，大帶輪所選的結(jié)構(gòu)形式為“腹板式”。 29 第 5 章 總結(jié) 通過本次畢業(yè)設(shè)計，我對 Visual Basic 有了全新的了解和掌握，基本上熟悉了 Visual Basic 語言和它在機(jī)械設(shè)計方面中的聯(lián)系以及應(yīng)用。通過對本次畢業(yè)設(shè)計課題的研究，又重新溫習(xí)了一遍機(jī)械設(shè)計這門課程，對 以前所沒掌握的知識點重新學(xué)習(xí)了一遍，這對以后的工作將有著莫大的幫助。以前對計算機(jī)語言只停留在 C++上，通過本次對 v 帶傳動進(jìn)行簡單的參數(shù)化設(shè)計，我對 Visual Basic 這種計算機(jī)語言有了更近一步的認(rèn)識和了解，軟件按照傳統(tǒng) v 帶傳動設(shè)計的思路，通過 vb 建立起簡單操作的設(shè)計界面，完成設(shè)計之后，即使不了解 vb，也可以操作此界面。而且通過這次畢業(yè)設(shè)計還是我具備了一下幾個方面的能力： （ 1） 對機(jī)械設(shè)計思路的認(rèn)識有了更進(jìn)一步的提高，提高了嚴(yán)謹(jǐn)負(fù)責(zé)的工作態(tài)度； （ 2） 掌握了應(yīng)用計算機(jī)語言 Visual Basic 軟件和機(jī)械設(shè)計有機(jī)結(jié)合 的能力； （ 3） 提高了實踐動手的能力； （ 4） 加強(qiáng)了團(tuán)隊合作的能力； 本次畢業(yè)設(shè)計涉及好多機(jī)械設(shè)計中的參數(shù)，比如單位長度帶的質(zhì)量、包角修正系數(shù)等等，這些參數(shù)的選取都要根據(jù)相關(guān)的表來查詢獲得，由于在網(wǎng)上查詢不到有些參數(shù)的圖表，又沒有現(xiàn)成的插圖，所以只有通過查詢相關(guān)的書來拍去照片，通過畫圖板中的編輯，最后應(yīng)用到本次畢業(yè)設(shè)計的界面里邊。在學(xué)習(xí) vb 的過程中，必須要做到實踐與理論相結(jié)合，負(fù)責(zé)，要掌握一門全新的語言是很困難的。 30 謝辭 此次畢業(yè)設(shè)計能夠在規(guī)定的時間內(nèi)順利完成，首先要感謝我的指導(dǎo)教師博士。正是由于 老師的敦敦教誨，使我受益匪淺。從開始的開題報告到結(jié)束時的畢業(yè)設(shè)計論文，老師都是不厭其煩的的看完并修改其中出現(xiàn)的錯誤，甚至包括文中的錯別字。從這些對待小細(xì)節(jié)的態(tài)度使我對老師十分敬佩，老師這種態(tài)度也是我完成此次設(shè)計的動力。此外，我還要感謝同組的同學(xué)，在設(shè)計的過程中，每當(dāng)遇到問題時，我們總會找一個教室進(jìn)行討論，這是我們原本枯燥乏味的大四生活變得充實起來。指導(dǎo)老師豐富的實踐經(jīng)驗和淵博的知識嚴(yán)謹(jǐn)負(fù)責(zé)的態(tài)度以及同學(xué)們的熱心幫助都深深的印在我的腦海里了，對我影響很大。他們的幫助不僅僅是本次的畢業(yè)設(shè)計，現(xiàn)在我的畢業(yè)設(shè)計已接 近尾聲，在這，我對老師和同組的同學(xué)表示真誠的感謝?。。? 31 參考文獻(xiàn) [1] 李樹軍 .國外傳動帶發(fā)展概況及我國傳動帶發(fā)展建議 .2021 年中國膠帶發(fā)展論壇； [2] 朱光華 .同步帶疲勞壽命試驗機(jī)的開發(fā)與研究 .長春理工大學(xué)， 2021； [3] 陳志榮 .普通 V帶的計算機(jī)輔助設(shè)計； [4] 邱宣懷 ， 郭可謙 ， 吳宗澤 ， 機(jī)械設(shè)計（第 4版），高等教育出版社。 [5] 濮良貴，紀(jì)名剛 .機(jī)械設(shè)計 .北京 .高等教育出版社， 1995。 32 附錄 程序代碼 Private Sub Command1_Click() = Str$(2 * Val() * Val() * (Sin(Val() * / 360))) = Int(10 ^ (3 1) * Val() + ) / 10 ^ (3 1) End Sub Private Sub Command2_Click() = True = True = True = True = True = True = True End Sub Private Sub Command3_Click() = Str$(500 * Val() / (Val() * Val()) * (( Val()) / Val()) + Val() * Val() * Val()) = Int(10 * Val() + ) / 10 End Sub Private Sub Command6_Click() End End Sub Private Sub Command7_Click() = True = False End Sub Private Sub Label1_Click() End Sub Private Sub Command8_Click() If Str$( * Val()) = Str$(Val()) Then = 實心式 = True = False 33 ElseIf (Str$(Val()) Str$(Val())) = 100 Then = 孔板式 = True = False End If End Sub Private Sub Command9_Click() If Str$(Val()) 300 Then = 輪輻式 = True = False Else = 腹板式 = True = False End If = amp。 vbNewLine amp。 ≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡≡ amp。 vbNewLine amp。 ▲ amp。 _ v 帶的張緊力 F0= amp。 amp。 N amp。 vbNewLine amp。 ▲ amp。 _ 作用在軸上的載荷 FQ= amp。 amp。 N amp。 vbNewLine amp。 ▲ amp。 _ 小帶輪推薦使用的結(jié)構(gòu)為： amp。 amp。 vbNewLine amp。 ▲ amp。 _ 大帶輪推薦使用的結(jié)構(gòu)為： amp。 = True = True End Sub Private Sub Text1_Change() = True End Sub Private Sub Text2_Change() = True End Sub