【正文】 如圖23所示。 由于文本框Text1的屬性是字符型，因此在計算時應用Val 函數(shù)進行轉換。在窗體上放置兩個文本框和一個命令按鈕，通過文本框Text1輸入電壓U，單擊命令按鈕（Command1）開始運算，在文本框Text2中輸出計算的電流I。6． 掌握命令按鈕的主要事件的使用。2． 學習使用VB的各種運算符及表達式。Private Sub Form_Click()Unload MeEnd Sub【實驗思考題】1. 什么是工程？什么是工程文件？2. 什么是對象？什么是方法？什么是事件？方法和事情有啥不同？3. 編寫VB程序的一般步驟是什么？【實驗報告要求】1. 提前預習實驗相關資料，充分做好實驗準備工作。Private Sub cmdback_Click()Unload MeEnd Sub在Form2的加載事件中顯示文字信息。屬性表窗體名控件名屬性表屬性值Form1Label1CaptionAlignment Font歡迎使用本系統(tǒng)2Center宋體，小三，粗體Label2Caption請輸入用戶名Label3Caption請輸入口令TxtpasswordText PasswordChar空*TxtnameText空CmdokCaption確定CmdexitCaption退出Form2Label1Caption系統(tǒng)信息：Text1MullineLockedScrollBarsTrueTrue2VerticalcmdbackCaption返回Form3Form3Picture圖片文件Label1CaptionBackStyleFont謝謝使用！0Transparent宋體，二號，粗體4. 編寫代碼。Private Sub cmdrun_Click() = FalseEnd Sub熟悉多窗體的操作1. 創(chuàng)建3個窗體。3) 將文本框txtyou中的字體設置為“粗體”和“小二”?！啊泵睿到y(tǒng)顯示“生成工程”對話框，如圖17所示?！皢印泵钸\行程序，這時的運行是在解釋運行模式下，仍然在VB環(huán)境中。本例窗體文件名為 ，保存在G盤的VBpro文件夾下。通常一個工程中會涉及到多種文件類型，但本例比較簡單，它僅涉及到一個窗體，因此在保存文件時，只需保存一個窗體文件和工程文件即可。此時，在代碼編輯窗口會出現(xiàn)如下代碼：Private Sub Command1_Click()End Sub說明我們是對命令按鈕Command1的單擊事件進行編程。通過鼠標的幾個簡單操作，我們已經(jīng)建立好了應用程序界面，如圖13所示。② 在窗體上添加控件A．單擊工具箱中的標簽(Label)控件類型圖標，鼠標指針變?yōu)槭中?，再在“對象”窗口的窗體上單擊并拖動，然后釋放鼠標鍵，窗體上就會出現(xiàn)一個標簽類型的控件對象，同時鼠標指針恢復為箭頭形狀。單擊“打開”按鈕，Visual Basic ，并自動創(chuàng)建了一個窗體模塊Form1，這就是將要建立的應用程序的窗體。設計步驟：（1）新建工程單擊Windows任務欄中的“開始”168。設置方法：在“工程”菜單或者“工程資源管理器”快捷菜單中選擇工程“屬性”，會彈出“工程屬性”對話框，如圖12所示，在“啟動對象”的選擇列表中選擇窗體名稱即可把該窗體設為啟動窗體。另外，在VB中還允許可視地創(chuàng)建和編輯控件數(shù)組，這對于編組使用選擇框、命令按鈕等控件提供了很大方便。Activate是當一個窗體成為活動窗口時所觸發(fā)的事件，Resize是當窗體大小發(fā)生改變時所觸發(fā)的事件。當為True時，重新還原該窗體以前的畫面。178。178。178。（7）Picture屬性使用Picture屬性可以指定一幅圖片顯示在窗體的表面上，作為控件的背景。（4）BackColor屬性和ForeColor屬性 BackColor屬性用于返回或設置對象的背景顏色，F(xiàn)oreColor屬性用于返回或設置在對象里顯示圖片和文本的前景顏色。（2）Height、Width、Top和Left屬性圖11 窗體位置、大小Height和Width屬性決定了控件的高度和寬度，Top表示控件到窗體頂部的距離，Left表示控件到窗體左邊框的距離。【相關知識】1． 窗體是VB中的對象，具有自己的屬性、事件和方法。2． 學習如何用對象（窗體和控件）建立界面。在實驗中，學生根據(jù)實驗指導中的內容進行驗證與總結，然后再去完成實驗內容中安排的任務。復習和掌握與本實驗有關的教學內容。四、本課程實驗教學目的與要求學生在實驗過程中注意自始至終貫徹課程中所介紹的程序設計風格，養(yǎng)成良好的編程習慣。掌握函數(shù)和過程的使用。二、本課程應講授的基本實驗理論掌握所用Visual Basic ，學會獨立使用該系統(tǒng)；了解在該系統(tǒng)上如何編輯、編譯和運行VB程序；初步掌握面向對象程序設計方法。HUBEI UNIVERSITY OF AUTOMOTIVE TECHNOLOGY計算機工程系 實驗指導書 苗暹編 吳年志 審班級 學號 姓名 電氣與信息工程學院2010年2月前 言一、本課程實驗教學的地位和作用《Visual Basic程序設計》課程是一門重要的公共基礎課。三、本課程實驗教學應達到的能力要求掌握建立和運行VB程序的方法。掌握界面的設計。應獨立完成所布置的上機作業(yè)，為保證盡量在統(tǒng)一安排的上機時間內編譯運行通過程序，在每次實驗前應事先預習，按照要求提前做好預習，編寫好程序。準備好上機所需的程序，在上機實驗時必須完成預習要求中規(guī)定的任務，切忌不編程或抄別人的程序去上機。五、本課程實驗教學考核辦法實驗課成績占本課程總成績的20%。3． 學習用屬性窗口設置對象屬性的方法。窗體屬性：（1）Name屬性對象的名稱，是所有對象都具有的屬性，用來唯一標識該控件。默認單位為twip，1 twip=1/20點=1/1440英寸=1/567cm 。（5）BorderStyle屬性此屬性決定邊框風格, 通過改變 BorderStyle 屬性，可以控制窗體如何調整大小。（8）WindowsState屬性 0：正常窗口狀態(tài)，有窗口邊界； 1：最小化狀態(tài)，以圖標方式運行； 2：最大化狀態(tài)，無邊框，充滿整個屏幕。 FontSize屬性是整型，決定對象上正文的字體大?。ㄈ笔?磅）。 FontItalic屬性是邏輯型，決定對象上正文是否是斜體（缺省為False）。 FontUnderLine屬性是邏輯型，決定對象上正文是否帶下劃線（缺省為False）。當為False時，則不重畫。窗體常用方法：窗體常用的方法有Print（打印輸出）、Cls（清除）、Show（顯示）、Hide（隱藏）以及（Move）移動等。3． 設置啟動窗體在默認情況下，應用程序中的第一個窗體被指定為啟動窗體?！緦嶒灷}】例：使用VB建立一個簡單的應用程序，在窗體上輸出“大家好！”“歡迎來到這里”?！俺绦颉?68。在這個窗體上添加控件，即可建立應用程序界面。B．用同樣方法將文本框（TextBox）控件放置在窗體上。圖44 例 代碼編輯窗口（3）編寫應用程序代碼創(chuàng)建好了應用程序界面，下面就開始編寫應用程序代碼，控制程序的運行。在這兩條語句之間輸入如下代碼： = 大家好！ = 宋體 = 15 = True = 歡迎來到這里！ = 黑體 = 16 = True至此，我們完成了對命令按鈕Command1（“顯示”按鈕）的編程。保存文件的步驟如下：A．選擇“文件”→“保存Form1”（窗體文件）命令，系統(tǒng)彈出“文件另存為”對話框，提示用戶輸入文件名。B．選擇“文件”→“保存工程”（工程文件）命令，系統(tǒng)彈出“工程另存為”對話框，提示用戶輸入文件名，操作同上。有時我們需要程序的運行能脫離VB環(huán)境，可像任何基于Windows的應用程序那樣，雙擊程序文件圖標就可運行。B．在“文件名”文本框內顯示與原工程文件名一致的可執(zhí)行文件名，用戶也可修改文件名。4) 設置Form1的圖標，并將其標題改為“你好”。分別為Form1，F(xiàn)orm2，F(xiàn)orm3。a) 在窗體1的文本框中輸入用戶名和口令，單擊“確定”按鈕，當用戶名為“l(fā)x”并且口令為“1234”時顯示窗體2，否則顯示窗體3。Private Sub Form_Load() = 硬件資源 amp。2. 如實記錄實驗中的數(shù)據(jù)。3． 學習VB內部函數(shù)的使用和數(shù)據(jù)輸入、輸出方法。7． 學習用賦值語句構造簡單的順序結構程序。設計思路：在Form1窗口中放置兩個Label控件、兩個TextBox控件和一個CommandButton控件，屬性設置如表21所示。178。思考：在電路圖中，將變量r1，r2，r3的數(shù)據(jù)類型設置為Double，則在文本框中顯示的數(shù)據(jù)會有何變化？如果數(shù)據(jù)類型為Integer則在文本框中的數(shù)據(jù)如何顯示？ 你的回答： 2．設計一個程序，計算圓的周長，要求用InputBox函數(shù)輸入半徑，用MsgBox輸出周長值。 l)End Sub圖24 設置屬性后的界面圖25 輸入對話框圖26 輸出對話框3．用三種除法運算符（/、\、Mod）做計算。添加代碼：Private Sub Command1_Click()Dim beichushu, chushu As Singlebeichushu = Val()chushu = Val() = beichushu / chushu = beichushu \ chushu = beichushu Mod chushuEnd Sub圖27 實驗內容4界面【實驗報告要求】1. 提前預習實驗相關資料，充分做好實驗準備工作。2． 掌握多分支條件語句的使用。6． 熟練掌握事件過程代碼的編寫。②如果除數(shù)為0，用MsgBox提示出錯信息。界面如圖33（按下“復位”按鈕也就是如圖33效果）：當a＝0時（彈出警惕框如圖34，然后光標定位a下方的文本框處）圖33圖34當△0時 ，如圖35 當△≥0時，如圖36 圖35 圖36添加代碼：Private Sub Command1_Click()Dim a, b, c, delta, x1, x2 As SingleDim x1str, x2str As Stringa = Val()b = Val()c = Val()If a = 0