1、VB程序設計實驗報告 實驗日期：2010.09.16 一、實驗目的與要求理解變量與常量的概念、定義及使用，并且理解程序設計的算法及算法表示；掌握各種常用數據類型的數據在內存中的存放形式，選擇及循環控制語句的運用；了解自定義數據類型，各種運算符、表達式的使用方法，順序結構程序設計方法；會用常用的內部函數，并且能夠靈活運用各種選擇結構進行和循環控制進行綜合程序設計。二、實驗內容1.設計一個字符大小寫轉換程序，當在文本框Text1中輸入大寫字母，在文本框Text2中同時顯示其小寫字母；當在文本框Text1中輸入小寫字母，在文本框Text2中同時顯示其大寫字母；當輸入其他字符，則在文本框Text2中原

2、樣輸出。2. 編寫華氏溫度與攝氏溫度的轉換程序，轉換公式如下：F = 95 c + 32 攝氏溫度轉化為華氏溫度，F為華氏溫度C = 59 F -32 華氏溫度轉化為攝氏溫度，C為攝氏溫度要求按兩種方法進行轉換。（1） 用命令按鈕實現轉換，即單擊“轉換華氏”按鈕，則將攝氏溫度轉換成華氏溫度；同樣，單擊“轉換攝氏”按鈕，則將華氏溫度轉換成攝氏溫度。（2） 不用命令按鈕，當文本輸入時直接完成轉換。當用戶在“攝氏溫度”文本輸入框內輸入值后按回車鍵，自動將攝氏溫度轉換成華氏溫度；同樣，華氏轉換成攝氏的方法也是如此。三、實驗步驟第一題實驗步驟;(1) 將label1、label2的caption屬性寫為

3、“輸入文本”；(2) 將text1、text2的內容清空；(3) 將form1的caption屬性改為“字符大小寫轉換”。第二題實驗步驟（1） 將命令按鈕Command1、Command2的caption屬性改為“轉換華氏”、“轉換攝氏”，并統一大小，設置間距；（2） 將label1、label2的caption屬性改為“攝氏溫度”、“華氏溫度”，并設置字體大小。（3） 將text1、text2的內容清空；四、程序代碼第一題實驗代碼：Private Sub Text1_KeyPress(KeyAscii As Integer)Select Case KeyAsciiCase 0 To 64Te

4、xt2.Text = Text2.Text + Chr(KeyAscii)Case 65 To 90Text2.Text = Text2.Text + Chr(KeyAscii + "32")Case 97 To 122Text2.Text = Text2.Text + Chr(KeyAscii - "32")Case ElseKeyAscii = 0End SelectEnd Sub第二題實驗代碼：Private Sub Command1_Click()Dim f!, c!c = Text1.Textf = 9 / 5 * c + 32Text2.Te

5、xt = fEnd SubPrivate Sub Command2_Click()f = Text2.Textc = 5 / 9 * (f - 32)Text1.Text = cEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Thenc = Text1.Textf = 9 / 5 * c + 32Text2.Text = fEnd IfSelect Case KeyAsciiCase 48 To 57, 8, 46Case ElseKeyAscii = 0End SelectEnd SubPrivate Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Thenf = Text2.Textc = 5 / 9 * (f - 32)Text1.Text = cEnd IfSelect