工學vb能力拓展_第1頁
工學vb能力拓展_第2頁
工學vb能力拓展_第3頁
工學vb能力拓展_第4頁
工學vb能力拓展_第5頁
已閱讀5頁,還剩7頁未讀 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、附件1:學 號:能力拓展訓練題 目應用VB軟件開發(fā)工具進行程序設計學 院專 業(yè)班 級姓 名指導教師年月日附件2:能力拓展訓練任務書學生姓名: 專業(yè)班級:指導教師: 工作單位:題 目: 應用VB軟件開發(fā)工具進行程序設計 初始條件:設計一程序當輸入試驗數(shù)據(jù)時,自動計算力學性能試驗的強度和塑性指標。要求完成的主要任務:(1) 學習并掌握Visual Basic程序設計語言;(2) 應用VB軟件開發(fā)工具完成指定題目的編程設計;(3) 完成能力拓展訓練總結報告。時間安排:7月13日7月17日指導教師簽名: 2009年7月7日系主任(或責任教師)簽名: 年 月 日總結報告一、設計題目及要求設計一程序當輸入

2、試驗數(shù)據(jù)時,自動計算力學性能試驗的強度和塑性指標。二、設計分析1、由材料力學實驗知,材料的力學性能實驗的強度指標和塑性指標主要是計算低碳鋼圓棒試樣和鑄鐵圓棒試樣在拉伸試驗下的強度指標和塑性指標。對于低碳鋼試樣,在實驗前需測量低碳鋼圓棒試樣的原始標距長度和原始直徑d,在拉伸試驗機上進行拉伸試驗時,需記錄圓棒試樣的屈服載荷F和最大載荷F,在試樣拉斷后,需測量圓棒試樣的斷裂后的標距L和頸縮處的最小直徑d。然后利用公式:強度指標:屈服強度:R=抗拉強度: R=塑性指標:斷后延伸率: A=×100%斷后截面收縮率: Z=×100% 而 S=3.14* S=3.14*而對于鑄鐵試樣,材

3、料力學性能只需計算強度指標的抗拉強度:R=由此,可以知道,在進行計算之前,需首先輸入的參數(shù)為,、d、d,而且所有的變量都是單精度實型變量,然后即可由上述公式進行強度和塑性指標的計算。2、窗體布局設計為:在窗體上畫2個兩個大框架,11個標簽,10個文本框和3個命令按鈕,其中2-6號標簽和1-6號文本框放在第一個大框架中,7-10號標簽和8-11號文本框放在第二個大框架中,第二個大框架又分兩個小框架,7、8號標簽和8、9號文本框放在第一個小框架中,9、10號標簽和10、11號文本框放在第二個小框架中,如圖所示:需要實現(xiàn)的功能為:當驅動了應用程序后,能在全屏幕顯示應用界面,以方便進行數(shù)據(jù)的輸入,并能

4、針對不同的試驗條件進行不同的計算,當輸入的試驗條件或數(shù)據(jù)不滿足程序的要求時,能提醒用戶進行正確地輸入,以得到正確的結果。程序流程圖為:開始選擇試樣材料、輸入試驗數(shù)據(jù)判斷是否選擇了試樣材料判斷是否完全輸入了試驗數(shù)據(jù)YNNY判斷試驗材料低碳鋼鑄鐵公式一公式二輸出試驗結果結束提醒用戶正確輸入提醒用戶正確輸入全屏顯示界面三、程序設計:Private Sub Command1_Click() If (Option1 = True And Option2 = True) Or (Option1 = False And Option2 = False) Then MsgBox "請選擇一種材料進行

5、試驗" '判斷是否選擇了試樣材料 ElseIf (Text1.Text = "" Or Text2.Text = "" Or Text3.Text = "" Or Text4.Text = "" Or Text5.Text = "" _ Or Text6.Text = "") Then MsgBox "請輸入完整的試驗數(shù)據(jù)" '判斷輸入的試驗數(shù)據(jù)是否完整 ElseIf Option1 = True And Option2 = Fa

6、lse Then Text7.Text = Val(Text3.Text) * 4 / Val(Text2.Text) / Val(Text2.Text) / 3.14 Text8.Text = Val(Text4.Text) * 4 / Val(Text2.Text) / Val(Text2.Text) / 3.14 Text9.Text = (Val(Text5.Text) - Val(Text1.Text) / Val(Text1.Text) * 100 Text10.Text = (Val(Text2.Text) * Val(Text2.Text) * 3.14 / 4 - Val(T

7、ext6.Text) _ * Val(Text6.Text) * 3.14 / 4) / (Val(Text2.Text) * Val(Text2.Text) * 3.14 / 4) * 100 '當試樣是低碳鋼時的計算輸出方式ElseIf Option2 = True And Option1 = False Then Text3.Text = "voild" Text7.Text = "voild" Text8.Text = Val(Text4.Text) * 4 / Val(Text2.Text) / Val(Text2.Text) / 3.

8、14 Text9.Text = "voild" Text10.Text = "voild" '當試樣是鑄鐵時的計算輸出方式 End IfEnd SubPrivate Sub Command2_Click()Text1.Text = ""Text2.Text = ""Text3.Text = ""Text4.Text = ""Text5.Text = ""Text6.Text = ""Text7.Text = "&quo

9、t;Text8.Text = ""Text9.Text = ""Text10.Text = "" '點擊按鈕2后數(shù)據(jù)全部清除Option1 = FalseOption2 = False '點擊按鈕2后兩個材料選項都設置為未選項End SubPrivate Sub Command3_Click()End '點擊按鈕3結束程序End SubPrivate Sub Form_Load()Width = Screen.WidthHeight = Screen.HeightLeft = Screen.Width - Wi

10、dthTop = Screen.Height - Height '設置窗口顯示為全屏顯示Text1.Text = ""Text2.Text = ""Text3.Text = ""Text4.Text = ""Text5.Text = ""Text6.Text = ""Text7.Text = ""Text8.Text = ""Text9.Text = ""Text10.Text = ""

11、'設置初始狀態(tài)時數(shù)據(jù)全部是清空的狀態(tài)Option1 = FalseOption2 = False '設置初始狀態(tài)時材料選項全部不選Label1.Caption = "材料"Label2.Caption = "試樣初始長度L0(cm)"Label3.Caption = "試樣初始直徑d0(mm)"Label4.Caption = "屈服力Fel(N)"Label5.Caption = "最大力Fm(N)"Label6.Caption = "實驗后試樣長度Lu(cm)&qu

12、ot;Label7.Caption = "實驗后試樣直徑du(mm)"Label8.Caption = "屈服強度Rel(MPa)"Label9.Caption = "抗拉強度Rm(MPa)"Label10.Caption = "斷后延伸率A(%)"Label11.Caption = "斷后截面收縮率Z(%)" '設置標簽名稱Option1.Caption = "低碳鋼"Option2.Caption = "鑄鐵" '設置材料選項的名稱Co

13、mmand1.Caption = "計算并輸出"Command2.Caption = "重新計算"Command3.Caption = "退 出" '設置三個按鈕的名稱Form1.Caption = "材料力學性能試驗"Frame1.Caption = "所測試驗數(shù)據(jù)"Frame2.Caption = "試驗結果"Frame3.Caption = "強度指標"Frame4.Caption = "塑性指標" '設置其他相應

14、的選項名稱End Sub點擊菜單欄中的文件選項,選擇“工程另存為”,保存為材料力學性能實驗2.frm文件和材料力學性能實驗2.vbp文件,并點擊“生成第一個程序.exe”,生成“材料力學性能試驗.exe”。四、結果分析1、雙擊擊材料力學性能實驗2.frm文件,開始執(zhí)行此文件,出現(xiàn)如圖所示界面:2、單擊菜單欄中的“運行”選項,在下拉菜單中單擊“驅動”選項,則開始運行程序,或者開機直接點擊“材料力學性能試驗.exe”也能生成下面的界面,如圖所示:3、選擇低碳鋼試樣材料并輸入實驗數(shù)據(jù),點擊“計算并輸出”按鈕:4、選擇鑄鐵試樣,輸入實驗數(shù)據(jù)并選擇“計算并輸出”按鈕:5、當沒選擇材料試樣,點擊了“計算并

15、輸出”按鈕時:6、當選擇了材料而數(shù)據(jù)輸入不完全,點擊“計算并輸出”按鈕時:7、單擊 “重新計算” 按鈕后,清除窗口界面里的所有數(shù)據(jù):8、點擊“退出”按鈕,退出界面:結果分析:首先,在程序的開始設置了界面的顯示方式為全屏幕顯示,便于進行數(shù)據(jù)的輸入。其次,對于不同的材料,程序能選擇不同的計算方式進行計算,并能正確的輸出不同條件下的正確結果。而當輸入的實驗條件或數(shù)據(jù)不滿足程序的要求時,程序能自動的提醒用戶正確的輸入實驗條件或數(shù)據(jù),從而計算得出正確的實驗結果。五、心得體會visual basic程序設計語言是現(xiàn)代工程技術人員廣泛使用的軟件開發(fā)工具,在大三暑假開始之初,我們進行了為期一周的能力拓展訓練,

16、學習使用visual basic程序設計語言,并運用visual basic程序設計語言進行簡單的編程。在這次能力拓展訓練中,我了解了visual basic與其他程序設計語言的相似點和不同點,并能與以前學的程序語言相比較,進行簡單的編程,并能獨立、熟練地使用visual basic程序設計語言編程技術、上機調試、結果仿真,對實驗過程中出現(xiàn)的現(xiàn)象進行分析,解決一些基本的問題,雖然這次能力拓展訓練時間比較短,但是收獲頗豐。與以前學的C語言相比,visual basic程序設計語言的最大特點是提供了面向對象的可視化編程工具,可以在屏幕上“畫”出所需的用戶界面來,因而程序設計的效率可大大地提高,并且

17、加強了程序設計的可視性,方便程序設計人員進行程序設計。同時,我也在編程過程中體會到visual basic程序設計語言的編程特點,在編程時可以進行程序的復制和粘貼,同時,visual basic程序設計語言不區(qū)分大小寫,并能自動地進行轉換,這大大簡化了編程的過程,使得visual basic程序設計語言的應用更加簡便。在上機調試的過程中,更能感覺到其與C語言相比的強大優(yōu)勢就是可視化和結構化的程序設計語言,簡單易懂,容易操作,減少了出錯的概率??傮w感覺visual basic程序設計語言是一個非常好的程序設計語言,因為本次能力拓展訓練的時間比較短暫,故不可能將其完整的和比較好的掌握,但我今后一定會繼續(xù)地學習visual basic程序設計語言,以期能更好的掌握和應用它,在今后的學習中充分利用visual basic程序設計語言的優(yōu)點,希望能對自己的學習有所幫助。六、參考文獻1、visual basic6.0程序設計教程(第2版)林卓然 編著 電子工業(yè)出版社 2007年7月2、visual basic6.0程序設計教程(第二版)主編 羅朝盛 人民郵電出版社2005年7月3、visual basic程序設計例題匯編 劉炳文 編著 清華大

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
  • 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論