【正文】 定義字號(hào) .Paragraphs(.). = True 39。激活文檔 = (軸的彎扭組合疲勞強(qiáng)度計(jì)算結(jié)果 ) 39。顯示對話框 = 1 = E:\ = 6 然后建立 Word 對象，設(shè)置文檔標(biāo)題 Set newword = CreateObject() 39。 首先加入一個(gè)公共對話框的控件 ，用以顯示保存路徑，用戶輸入用戶名 39。 在這里軸的數(shù)據(jù)變量賦值仍然使用數(shù)組的方法 ，采用 For循環(huán)求和，然后校核計(jì)算。 表 靜強(qiáng)度許用安全系數(shù) 25 9 剛度校核 扭轉(zhuǎn)剛度校核 軸的扭轉(zhuǎn)剛度計(jì)算較為簡單，所以軟件界面也十分簡易 ，為用戶提供一個(gè)軸傳遞轉(zhuǎn)矩 T的輸入控件 Textbox， 然后點(diǎn)擊校核計(jì)算，軸的扭轉(zhuǎn)角即可計(jì)算出來。當(dāng) Option 控件被選中時(shí)， value 值為 True，采用 If 語句判斷 OptionX 的值是否為 True，如果為 True 就按照該截面的公式來計(jì)算系數(shù)，例如： If = True Then 39。H80000000 = True = amp。 Text 控件用來輸入?yún)?shù)，單擊不同的截面類型選項(xiàng)，所需輸入的 Text 控件會(huì)變?yōu)榭奢斎耄瑹o需輸入的數(shù)據(jù)的 Text 控件會(huì)變?yōu)榛疑?，這樣就避免了用戶的誤輸入。 [S] 選取條件 ～ 載荷確定精確，材料性質(zhì)較均勻 ～ 載荷確定不夠精確，材料性質(zhì)不夠均勻 ～ 載荷確定不精確，材料性質(zhì)不均勻 表 許用安全系數(shù) [S]值 23 8 靜強(qiáng)度 安全系數(shù)校核 軸的靜強(qiáng)度是根據(jù)軸的短時(shí)最大載荷（包括動(dòng)載荷和沖擊載荷）來計(jì)算的。 用戶界面設(shè)計(jì)如圖 所示，左側(cè)按鈕的順序提示了用戶操作的順序，為：選擇軸的材料→確定危險(xiǎn)截面→輸入截面數(shù)據(jù)→確定應(yīng)力集中系數(shù)→確定表面質(zhì)量系數(shù)→確定尺寸影響系數(shù)→確定應(yīng)力折算系數(shù)，在校核時(shí)還應(yīng)選擇循環(huán)特性，最終點(diǎn)擊校核按鈕完成校核計(jì)算。當(dāng)軸上的軸向力較大時(shí)，還應(yīng)計(jì)算其引起的正應(yīng)力。如果材料庫中沒有所需的材料，用戶也可以在下面的文本框中輸入相關(guān)數(shù)據(jù)，并將材料加入材料庫中，以便以后使用。 彎扭矩圖的繪制 Picture 控件作為容器出現(xiàn)，在 VB 中 Picture 的坐標(biāo)是左上角為原點(diǎn)（ 0,0），右下角為（控件 長度像素，控件高度像素），因此需要在窗體打開時(shí)對 picture 控件的坐標(biāo)重新定義，將 控件的左上角坐標(biāo)定義為（ 0，最大彎矩值），右下角定義為（軸的總長度， 2 倍的最大彎矩值），這樣就會(huì)將 Picture 控件的坐標(biāo)系修改為如圖 所示的情況，這樣在繪制彎矩圖時(shí)圖形能保持占滿整個(gè) Picture 控件，圖形不失真，能全面的反映出真實(shí)的彎矩。 支反力的計(jì)算 在載荷輸入的過程中，已經(jīng)將支點(diǎn)的參數(shù)定義為兩個(gè)參數(shù)左支點(diǎn) zzd，和右支點(diǎn)yzd，根據(jù)軸上載荷的數(shù)量和軸的長度，列方程計(jì)算出兩個(gè)支點(diǎn) 的支反力。數(shù)據(jù)指針移動(dòng)到首行 For i = 1 To Y 39。定義 L軸段長度 Public R() As Double 39。定義 D1左端外徑 Public F() As Double 39。因?yàn)闊o法確定數(shù)組的大小，需要再程序運(yùn)行的時(shí)候在改變數(shù)組的大小，因此 需要用到動(dòng)態(tài)數(shù)組。 軸段 /載荷參數(shù)變量的定義 軸的彎矩圖繪制需要使用到軸的數(shù)據(jù)和載荷數(shù)據(jù)的調(diào)用，因?yàn)橛脩粜：说拿恳桓S的軸段數(shù)是不一樣的，每一次校核的所需的中間變量數(shù)量也不同，無法實(shí)現(xiàn)代入 VB 程序中已編號(hào)的通用公式中。因此使用 VB 中的 picture 控件來完成。載荷的類型有：彎矩、轉(zhuǎn) 矩、集中力三種，載荷的方向有：水平面內(nèi)，垂直面內(nèi)，以及軸向三種。 圖 載荷輸入模塊窗體 難點(diǎn)分析 由于幾個(gè)功能都集中到一個(gè)窗口中，對窗口的結(jié)構(gòu)布局需要合理設(shè)計(jì)，為用戶的輸入查看提供方便。運(yùn)行程序如下： Ac = ‘ 記錄表中數(shù)據(jù)的個(gè)數(shù)定義為 Ac ‘?dāng)?shù)據(jù)指針移動(dòng)到最后 For i = Ac To 1 Step 1 If (軸段編號(hào) ) = zdbh Then‘如果當(dāng)前軸段號(hào)大于插入軸段編號(hào) zd = (軸段編號(hào) ).Value (軸段編號(hào) ) = zd + 1 ‘使當(dāng)前軸段編號(hào)加 1 ‘?dāng)?shù)據(jù)指針向上移動(dòng)一次 End If Next i 刪除軸段功能 當(dāng)用戶錯(cuò)輸或多輸了某段軸時(shí)，單擊該段軸，并點(diǎn)擊“刪除此段”按鈕，系統(tǒng)自動(dòng)檢測此段軸的編號(hào)，刪除此段軸的數(shù)據(jù)，并將以后的軸段編號(hào)依次減 1，來保證編號(hào)的連續(xù)性，以便于后續(xù)校核對數(shù)據(jù)調(diào)出的準(zhǔn)確，保證校核的正確性。 圖 結(jié)構(gòu)輸入窗口 插入軸段功能 當(dāng)用戶漏輸或錯(cuò)輸一段軸時(shí)，需要修改時(shí)，軟件為用戶提供了插入軸段 的功能。 數(shù)據(jù)庫中有 若干個(gè) 表 ，需要確定表的名稱，使用以下代碼打開 acc1 中的 cxtext3 表 SELECT * FROM cxtext3, con, adOpenKeyset, adLockOptimistic 輸入軸段功能 輸入軸段是指用戶按照校核階梯軸從左到右的結(jié)構(gòu)順序輸入每段軸的數(shù)據(jù)，每當(dāng)用戶單擊“增加軸段”按鈕時(shí) ，彈出“結(jié)構(gòu)輸入”窗口，用戶按照窗口所顯示的內(nèi)容，選擇該段軸的外形結(jié)構(gòu)，并按照圖例，輸入相關(guān)數(shù)據(jù)。 \。 amp。對象程序?yàn)椋? Dim con As New Public myrs As New 創(chuàng)建了對象之后 ， 下一步打開數(shù)據(jù)庫 。輸入代碼后，運(yùn)行程序便可在程序中的 Flex Grid 控件查看到軸段數(shù) 據(jù)。 圖 軸段數(shù)據(jù)的顯示 由于 VB 本身并不帶有可以訪問數(shù)據(jù)庫的類 ,所以 需要引用一個(gè)包含能訪問數(shù)據(jù)庫的類來使用數(shù)據(jù)庫 .這里 采用 ADODB,相比 DAO 和能訪問數(shù)據(jù)庫的 API 來說 ,它比 DAO 更靈活 ,更強(qiáng)大 。 模塊需要實(shí)現(xiàn)輸入軸時(shí)自動(dòng)編號(hào)，刪除軸段時(shí)自動(dòng)修改各段編號(hào)，插入軸段時(shí)自動(dòng)修改其余軸段編號(hào)，查看各軸段數(shù)據(jù)等。 結(jié)構(gòu)輸入模塊還需設(shè)置 插入、刪除 軸段的功能，在 VB 中操作數(shù)據(jù)庫是本模塊的一大難點(diǎn)，當(dāng)插入一段軸之后，其余下的軸段編號(hào)應(yīng)該 +1 ，當(dāng)刪除一段軸之后，其余下的軸段編號(hào)應(yīng)該 1 ，這樣才能保持?jǐn)?shù)據(jù)的連續(xù)性。以上五種軸的常用校核方式足以滿足學(xué)校，工廠，設(shè)計(jì)所等機(jī)構(gòu)的對一般軸的強(qiáng)度剛度校核需要。每個(gè)模塊均可以實(shí)現(xiàn)相關(guān)功能，具有關(guān)聯(lián)性，順序性，符合軸的各種校核方法的傳統(tǒng)計(jì)算順序，使用戶能清楚明白校核過程，減少工作量。 因此，編寫軸的強(qiáng)度校核軟件可使用Visual Basic 作為開發(fā)平臺(tái)，應(yīng)用 VB 語言來進(jìn)行可視化開發(fā)編程，這有利于本軟件的制作，也使得軟件最終完成后有較好的通用 性。 C++是一種程序語言，而 Visual C++是微軟開發(fā)出的可視化開發(fā)軟件。通過：軸 的結(jié)構(gòu)輸入，軸上載荷輸入，校核計(jì)算，三步來完成一根軸的強(qiáng)度校核。 課題意義 本課程設(shè)計(jì)課題實(shí)施的主要目的為設(shè)計(jì)并開發(fā)一套以現(xiàn)行國家標(biāo)準(zhǔn)為基礎(chǔ)、針對軸類零件，具有一定通用性的軸校核軟件。對于一般常見的階