1、課程VB可視化編程應用授課時間第一一一二課時（講解一課，實驗一課）課題Visual Basic 基礎教學目的和要求1 .程序設計基礎知識。2 . 了解面向對象的程序設計概念：對象、屬性、方法與事件。3 .掌握創建 Visual Basic程序的,般步驟。4 . 了解Visual Basic的集成開發環境（IDE）。5 .掌握Visual Basic工程的設計步驟，新建工程、設計界面、編寫代碼、運行和調試工程、保存工程。6 . 了解Visual Basic的幫助系統。7 .程序設計基礎知識。了解面向對象的程序設計概念：對象、屬性、方法與事件。掌握創建Visual Basic程序的,般步驟。了解V

2、isual Basic的集成開發環境（IDE）。重點難點1. 了解對象、屬性、方法與事件。2 .掌握Visual Basic工程的設計步驟，新建工程、設計界面、編寫代碼、運行和調試工程、保存工 程的方法。3 .動手編寫程序。教法講讀法、實踐法教具電腦教學內容及過程1、Visual Basic 的發展BASIC 語言是"Beginners All-purpose Symbolic Instruction Code ”的簡稱。Visual Basic是Microsoft公司于1991年推出的基于 Windows平臺的快速開發工具。它以結構化BASIC語言為基礎，繼承了原 BASIC語言簡

3、單易學的優點，同時又吸收了近年來最先進、最優秀的編程技術，提 供了可視化的編程環境，以事件驅動作為運行機制，成為新一代的可視化程序設計語言。2、Visual Basic 的特點1）、可視化的程序設計2）、面向對象的程序設計思想3）、事件驅動的編程機制4）、支持大型數據庫的開發Visual Basic提供了強大的數據庫管理和存取操作的能力，利用它可以開發出各種大型的客戶/服務器應用程序。5）、強大的Internet應用程序開發功能3、Visual Basic的安裝與啟動4、Visual Basic 6.0的集成開發環境5、對象的屬性、事件與方法1）對象“對象”（Object）是面向對象程序設計的

4、核心，學好 Visual Basic的訣竅之一就是要以“對象”的眼光去 看待整個程序設計。2）屬性屬性（Property）用來描述對象的外部特征，包括對象的性質和狀態等。每個對象都由若干屬性來描述，不同的對象可以有不同的屬性，例如，標題（Caption）、名稱（Name）、背景色（Backcolor）、字體大小（FontSize）、字體顏色（ForeColor）、是否可見（Visible）等。3）事件及事件過程所謂事件（Event）是由Visual Basic預先定義好的、能夠被對象識別的動作。例如，單擊事件（ Click）、 雙擊事件（DblClick ）、鼠標移動事件（MouseMove）

5、等。事件過程的一般格式為：Sub對象名事件（）處理事件的程序代碼End Sub4）方法所謂方法（Method）是指對象本身所包含的一些特殊函數或者過程，利用這些自帶的函數或過程，可以 實現一些特殊的功能和動作。方法的調用格式為：對象名.方法名5、Visual Basic工程的設計步驟建立一個Visual Basic應用程序大致需要 3個步驟：（1）建立應用程序界面。（2）設置控件屬性。（3）編寫程序代碼。二、建立應用程序界面1 在窗體上畫一個控件在窗體上畫一個控件有兩種方法：（1）單擊“工具箱”中的某個控件圖標，然后在窗體的適當位置拖動鼠標即可畫出一個控件。(2)雙擊“工具箱”中的某個控件圖標

6、，即可在窗體中央畫出該控件。2控件的選擇在窗體編輯器中，可以對窗體上的控件進行各種操作。但是在進行操作之前，都要首先選中該控件。要選擇一個控件，只要單擊這個控件就可以了。被選中的控件周圍會出現8個“控制柄”，而且在“標準”工具欄的右側會顯示這個控件的位置和大小，如圖所示。七 1560, 18叩jo 1Q95 靠 375工具欄右側顯示選定控件的信息3控件的縮放和移動4控件的復制與刪除5控件的布局1)、“對齊”子菜單2)、“統一尺寸”子菜單3)、“按網格調整大小”菜單項4)、“水平間距”與“垂直間距”子菜單5)、“在窗體中居中對齊”子菜單6)、“順序”子菜單6、創建工程(1)單擊工具箱中的“命令按

7、鈕”。(2)將鼠標指向窗體的左下部，按下鼠標左鍵并拖動鼠標的十字指針畫出一個矩形框，松開左鍵即畫出一個"命令按鈕"，按鈕內標有"Command/'。(3)重復前兩步操作，在窗體的右下部畫出第二個“命令按鈕”，按鈕內序號自動增加，顯示“Command2”。(4)單擊工具箱中的“標簽”按鈕。(5)將鼠標指向窗體的上部，按下鼠標左鍵并拖動指針畫出一個矩形框，松開鼠標左鍵，一個“標簽”即出現在窗體上，標簽中顯示" Labell"。三設置控件屬性設置控件屬性在屬性窗口中進行，其操作步驟為：(1)激活屬性窗口，在“對象”下拉列表框中選擇對象名For

8、ml。(2)在"對象”下拉列表框中選擇對象名 Commandl(3)將Command2的Caption屬性設置為"退出"，Name屬性設置為"Quit"。(4)在“對象”下拉列表框中選擇對象名 Label1。四編寫程序代碼打開代碼編輯窗口有 4種方法：(1)雙擊控件。(2)用右鍵單擊控件，從彈出菜單中選擇“查看代碼” 。(3)從“視圖”菜單中選擇“代碼窗口” 。(4)在工程資源管理器窗口單擊查看代碼按鈕圖標。打開代碼窗口后，在“對象”下拉列表框中選擇 “Welcome”對象，在“過程”下拉列表框中選擇 “Click”, 這時該事件過程的開頭和結

9、尾的代碼由系統自動給出：Private Sub Welcome_Click()End Sub在這兩行之間輸入如下程序代碼：Private Sub Welcome_Click()Label1.Caption ="歡迎使用"& Chr(13) & " Visual Basic 6.0"End Sub在“對象”下拉列表框中選擇“ Quit”對象，在“過程”下拉列表框中選擇“ Click"，輸入程序代碼如下：Private Sub Quit_Click()Unload MeEnd Sub五運行程序(工程)單擊工具欄中的“啟動”按鈕或者按

10、F5鍵，即可運行程序。Visual Basic應用程序具有標準的 Windows風格：窗體圖標、標題欄、最大化按鈕、最小化按鈕、關閉按 鈕等。六保存工程當一個Visual Basic應用程序設計結束，并且檢查無誤后，通常要將程序存入磁盤。 兩種方法來保存工程文件：(1)在“文件”菜單中選擇“保存工程”。(2)直接單擊在工具欄上的“保存工程”按鈕。七生成可執行文件生成當前工程的可執行文件，就是對當前應用程序進行編譯，制作成為可以獨立運行的 成EXE文件，只需選擇“文件”菜單中的“生成 exe”菜單項。輸入文件名后，單擊“確定”按鈕，程序被編譯到硬盤上。這個應用程序可脫離Visual Basic

11、提供了EXE文件。要生Visual Basic單獨運行。小結：通過本章的學習，同學們基本了解編程的原理， 學會使用VB,特別要牢記公式：“名稱.屬性=值”、 “控件名.方法名”。并動手編寫第一個 VB程序。VB程序”的作業：實驗題：創建一個窗口，窗口中有一個按鈕，點擊按鈕彈出“你好，這是我第一個 提示窗口。課程VB可視化編程應用授課時間第三一一六課時（講解二課，實驗二課）課題Visual Basic程序設計代碼基礎孝 與白 不 潺 >1 .數據類型：數彳1型數據（Integer）、字苻串型數據（string）、布爾型數據（Boolean）、日期型數 據（Date）、對象型數據（Objec

12、t）、可變類型數柜。2 .常量：用戶自定義符號常量、系統定義符號常量。3 .常用內部函數：數學函數、字符串函數、隨機函數、轉換函數、日期和時間函數、格式輸出函 數。4 .程序代碼書寫規則。1i1 .常量、變量的命名規則2 .常量、變量的聲明與使用3 . VB程序的書寫規則4 .運算符與表達式教法講讀法、實踐法教具電腦教學內容及過程一.表達式按語法規則，用運算符將運算對象(常量、變量、函數)連接起來二.數據類型不同類型的數據適用于解決不同類型的問題，不同類型的數據在內存中的存放形式不同標準數據類型、用戶自定義數據類型Type Student類型名ID As String*9Name As Str

13、ing*4元Sex As String*1素Age As Integer名Score As SingleEnd Type三.常量在程序運行過程中，其值不能改變的量(一)普通常量表示形式：&o205 &H3AF 123& -123! 0.123E+3分界符："abc" "ABD""XYZ" #2004-9-27#邏輯常量：True False(二)符號常量用一個符號來代替多次被使用的常量，具有含義清楚，一改全改的優點如：Const PI As Double=3.1415926535(三)系統常量由VB提供的應用程

14、序和控件的系統定義常數Text1.BackColor=&HFF&Text1.BackColor=vbRed四.變量1 .在程序運行過程中，其值可以改變的量：三要素：變量名、變量類型、變量值2 .實質：變量代表著內存中一定的存儲空間，存儲空間中存放的數據即變量的值，存儲空間的大小取決于變量的類型，變量名代表對應存儲空間的起始地址3 .變量使用方法：建議先聲明，后使用(1)顯式聲明：如： Dim count As Integer , sum As Single等價于 Dim count%, sum!(2)隱式聲明VB允許用戶不聲明變量而直接使用，所有隱式聲明的變量都是Variant

15、數據類型，VB根據程序中賦予變量的值來自動調整變量類型(3)強制顯式聲明Option Explicit 語句4 .變量賦值：變量名=表達式 也可以理解為變量名=值Visual Basic的命名規則在Visual Basic中，常量、變量和過程的聲明需要遵循下面的規則：(1)必須以字母開頭。對于中文版的Visual Basic可以用漢字開頭或者直接用漢字作為變量名、對象名或者過程名。(2)不能在命名中出現句點“.”、空格或者嵌入下列字符：!# $ % &也不能在命名中嵌入類型聲明字符，如：Integer、Long、Single、Double、String 等。(3)變量名的長度不能超過2

16、55個字符。控件、窗體、類和模塊的名字不能超過40個字符。(4)變量名在有效的范圍內必須是惟一的。(5)變量名不能和關鍵字同名。關鍵字是Visual Basic系統內部定義的詞，是語言的組成部分。包括預定義語句(比如 If、While、 Loop等)、函數(比如 Abs、Len、String等)和操作符(比如 And、Or等)。復合與續行在編寫程序代碼時要遵循一定的規則，這樣寫出的程序既能被Visual Basic正確地識別，又能增加程序的可讀性。一、復合多條較短的語句可以寫在一行上，稱為語句的復合。 語句之間要用冒號 ":"隔開，例如：Label1.Caption=&qu

17、ot;Hello" : Red = 255 : Label1.BackColor = Red二、續行當一條語句很長時，在代碼編輯窗口閱讀程序時將不便查看，使用滾動條又比較麻煩。這時，就可以使用續行功能，用續行符"”將較長的語句分為兩行或多行。例如：Label2.Caption =對于一個較長的標題，標簽控件提供了兩種屬性：AutoSize WordWrap來改變控件尺寸以適應較長或較短的標題。在使用續行符時，在它前面至少要加一個空格，并且續行符只能出現在行尾。小結：通過本章的學習，理解和初步學會使用常量和變量。了解和習慣VB程序書寫的規則。因為是初學，所以對于書本上一長串的

18、變量名感覺無從下手。其實，首先要了解常量和變量的作用，其次盡 量使用規范的命名，在以后的編程中逐漸領會和熟練使用。作業：1、變量的種類基本上有多少種？分別以什么字母開頭？2、變量有什么作用？3、常用的內部函數有哪些？課程VB可視化編程應用授課時間第七一一十課時（講解二課，實驗二課）課題順序結構程序設計教學目的和要求1 .賦值語句。2 .數據的輸入方式：用文本框（TextBox）輸入數據、用輸入框（InputBox）輸入數據。3 .數據的輸出方式：用Print方法輸出數據，用文本框（TextBox）輸出數據，用消息框（MsgBox ） 輸出數據，用標簽控件（Label）輸出數據。重點難點 Vis

19、ual Basic語言的輸入、輸出方法順序結構程序設計方法教法講讀法、實踐法教具電腦教學內容及過程順序結構程序設計各語句按出現的先后次序逐條執行輸入數據文本框通過Text屬性可以獲得用戶在文本框中輸入的內容（字符串）如要獲得數值應通過Val函數轉換Text屬性InputBox 函數提供一個簡單對話框供用戶輸入信息，當用戶按回車或單擊確定”按鈕后，將輸入的內容作為字符串返回如要獲得數值，最好通過Val函數轉換函數值從文件中讀取數據InputBox函數舉例Dim strName As String * 40 , strSI As String * 40strSI =請輸入你的姓名” + Chr（1

20、3） + Chr（10） +然后單擊確定”strName= InputBox$（strS 1,輸入框"王曉明"）輸出數據Print方法窗體與圖片框對象具有該方法可以輸出各種類型的數據標簽通過Caption設置顯示內容（字符串）如要輸出非字符型數據，需通過 Str函數進行轉換只能通過代碼設置標簽內容，用戶無法通過鍵盤修改標簽內容文本框通過Text屬性設置顯示內容（字符串）如要輸出非字符型數據，需通過 Str函數進行轉換既可通過代碼設置文本框內容，用戶也可通過鍵盤修改文本框內容MsgBox函數與過程向文件中寫數據輸出數據講解Print方法窗體名或圖片框名.Print輸出列表省略

21、對象名直接調用Print方法則默認在窗體上輸出緊縮格式輸出：輸出項之間以；分隔標準格式輸出：輸出項之間以，分隔插入n個空格：Spn）從第n列開始輸出：Tab(n)換行：最后一個輸出項后沒有；或，輸出空行：窗體名或圖片框名.PrintMsgBox函數與過程在對話框中顯示信息，等待用戶單擊按鈕MsgBox函數可以在用戶單擊按鈕后獲得一個整數，常通過對該整數的判斷來控制程序流程格式整型變量=MsgBox(提示，樣式，標題)MsgBox提示，樣式，標題對話框樣式操作演示函數值教材P58表4-24-2卸載對象與結束程序一、Unload 語句當要結束應用程序而從內存中卸載窗體或要從內存中卸載某些控件時，可

22、以使用Unload語句。Unload語句的語法格式為：Unload對象名說明：(1)對象名：要卸載的窗體對象或控件的名稱。(2)在卸載窗體前，會發生QueryUnload事件過程，然后是Unload事件過程。在其中任一過程中設置 cancel 參數為True可防止窗體被卸載。【例3.9】在例3.8中使用命令關閉程序窗體。設計步驟如下：只需在例3.8中增加一個命令按鈕 Command2 (關閉)，并且編寫 Command2的Click事件代碼：Private Sub Command2_Click()Unload MeEnd Sub說明：其中的 Me表示按鈕所在的窗體對象。二、結束過程語句Exit

23、 Sub語句用來結束過程的執行。其語法格式為：Exit Sub三、結束語句在早期的Basic語言中使用End語句來結束一個程序的執行。其語法格式為；End說明：(1) End語句不調用 Unload、QueryUnload事件或任何其他 Visual Basic代碼，只是生硬地終止代碼執行。窗體和類模塊中的Unload、QueryUnload事件代碼未被執行。(2) End語句提供了一種強迫中止程序的方法。只要沒有其他程序引用該程序公共類模塊創建的對象并無代碼執行，程序將立即關閉。(3) Visual Basic程序正常結束應該卸載所有的窗體。注釋與暫停一、注釋語句為了提高程序的可讀性，通常應

24、在程序的適當位置加上一些注釋。語法格式為：Rem注釋內容或 注釋內容說明：(1)注釋內容：指要包括的任何注釋文本。在Rem關鍵字與注釋內容之間要加一個空格。可以用一個撇號(')來代替Rem關鍵字。(2)如果在其他語句行后使用Rem關鍵字，必須用冒號(：)與語句隔開。若使用撇號，則在其他語句行后不必加冒號。S = pi * r A 2 '計算圓的面積V = 4 / 3 * pi * r人3 : Rem 計算球的體積二、暫停語句Stop語句用來暫停程序的執行，使用 Stop語句，就相當于在程序代碼中設置斷點。其語法格式為：Stop說明：1 1) Stop語句的主要作用是把解釋程序置

25、為中斷( Break)模式，以便對程序進行檢查和調試。可以在程 序中的任何地方放置 Stop語句，當執行Stop語句時，系統將自動打開DeBug窗口。(2)與End語句不同，Stop不會關閉任何文件，或清除變量。如果在可執行文件( .EXE)中含有Stop語 句，則將關閉所有的文件而退出程序。因此，當程序調試結束后，生成可執行文件之前，應刪除代碼中的 所有Stop語句。本章小結：通過本章的學習，同學們初步掌握了 Visual Basic語言的輸入、輸出方法和順 序結構程序設計方法。因為是比較簡單的從上到下結構，沒有什么分支，所以掌握起來并沒 有什么困難。在本章要注意的是：一定要嚴格按照編程的語

26、法規則來進行編程。作業：1.如果要設計一個程序， 點擊窗口中的按鈕， 彈出對話框(MsgBox)，上面寫著：恭喜你，你答對了。 應該如何設計？2 .設計一個程序，具有兩個窗體，第一個窗體有兩個按鈕，點擊“顯示”按鈕則第二個窗體顯示，點擊“隱藏”按鈕則第二個窗體消失。課程VB可視化編程應用授課時間第十一一一十六課時（講解二課，實驗二課）課題選擇結構程序設計孝 與白 不 厚 >1. 單行結構條件語句IfThenElse &.2. 塊結構條彳語句If - Then- -Elself End If3. 多分支選擇語句Select Case End Select1i If Then End

27、 If 條件語句 Select Case End Selec璉擇語句教法講讀法、實踐法教具電腦教學內容及過程選擇結構適于解決根據 不同情況，采取不同措施”的問題 單分支：如果那么If <條件> Then卜 語句組1>Else <語句組2>塊結構條件語句1、If條件 1> Then語句組1Else語句組2End If2、If條件 1> Then卜語句組1>ElseIf < 條件 2> Then卜語句組2>ElseIf條件 N> Then卜語句組N>Else卜其他語句組>End IfIf與End If必須成對使用，

28、所以有一個If就有一個End If與之相對應。多分支選擇語句Select Case啜U試表達式>Case表達式表1>卜語句組1>Case表達式表2>卜語句組2>Case Else卜語句組n>End Select選擇結構的執行過程先判斷，后執行，畫流程圖無論表達式值為真或假最后均執行If的后續語句，表達式可以為關系表達式、邏輯表達式和算術表達式.邏輯數據與整型數據的轉換規則Truef1False-0非 0f True 0一 False行If與塊If的區別If a>b Then t=a:a=b:b=tIf a>b Thent=aa=bb=tEnd I

29、fIf a>b Then t=aa=bb=t單、雙分支If語句比較If x>=y Thenmax=xElsemax=yEnd IfPrint maxmax=yIf x>=y Then max=xPrint maxIf x>=y Then max=xmax=yPrint max塊結構條件語句輸入一組成績，評定其等級If x>=90 ThenPrint "優秀"相當于 X<90And X>=80日seIf x>=80 ThenPrint "良好"日seIf x>=70 ThenPrint "中等

30、"日seIf x>=60 ThenPrint "及格"ElsePrint "不及格"End If把上面程序用單分支If語句表示If x>=90 Then Print "優秀"If x>=80 Then Print "良好"If x>=70 Then Print "中等"If x>=60 ThenPrint "及格"ElsePrint "不及格"End If塊結構條件語句比較另一種方法If x<=60 thenP

31、rint "不及格"日seIf x<=70 ThenPrint "及格"日seIf x<=80 ThenPrint "中等"日seIf x<=90 ThenPrint "良好"ElsePrint "優秀"End If多分支選擇語句Select Case 表達式Case表達式列表1語句1Case表達式列表2語句2Case Else語句n+1End Select執行計算表達式的值與Case后的表達式依次進行比較，相匹配則執行其后的語句，然后結束 Select Case語句執行與所有

32、的表達式均不匹配，則執行Case曰se后的語句，如果無 Case Else則不做任何操作表達式列表形式表達式列表可以為單個值，如"VB'或A+3表達式列表可以為一組值，如1,3,5表達式列表可以為一個Is<60閉區間，如1 To 10表達式列表可以為一個半開區間，如例如Select Case xCase 90 to 100Print "優秀"Case 80 to 89Print "良好"Case 70 to 79Print "中等"Case 60 to 69Print "及格"Case El

33、sePrint "不及格"End Select本章小結：通過本章的學習，同學們應該掌握更深一層的編程，在本章開始，編程并不 是從上到下的流程，而是有選擇有分支的。在本章，重要的是記住公式，并且學會套用公式。作業：下面程序運行后，在文本框中輸入12345678,按回車鍵后文本框中顯示的內容是？Dim n%,m%Private Sub Text1_KeyPress(KeyAscii As Integer)If IsNumeric(Text1) ThenSelect Case Val(Text1) Mod 2Case 0n=n+Val(Text1)Case 1m=m+Val(Te

34、xt1)End SelectEnd IfText1=""Text1.SetFocusIf KeyAscii=13 then Text1="n=" & Str(n) & "m=" & Str(m)End Sub課程VB可視化編程應用授課時間第十七一一二十四課時（講解四課，實驗四課）課題循環結構程序設計教學目的和要求1. ForNext循環結構語句。2. Do Loop循環結構語句：前測、當型Do WhileLoop前測、直到型Do UntilLoop后測、當型Do.Loop While后測、直型Do.Loop U

35、ntil 。3. 循環的嵌套。重點難點 For Next循環語句 Do Loop循環結構語句（當型、直到型）教法講讀法、實踐法教具電腦教學內容及過程循環結構解決一些需要重復多次才能完成的問題每一次在做相同操作或與上一次有聯系的相似操作兩種循環兩條循環語句For Next語句Do Loop 語句For Next語句實現循環次數已知的循環For循環變量=初值To終值Step步長 循環體Next循環變量DoLoop 語句多用于循環次數未知的循環兩種形式Do循環條件LoopDo Loop循環條件兩種條件While條件為真時執行循環，否則退出Until條件為假時執行循環，否則退出DoLoop 語句在循環

36、體外初始化循環變量 在循環體內改變循環變量值 循環三要素循環條件、循環變量初始化、改變循環變量的值循環中應避免的問題不循環發生場合：當型循環原因：循環變量初值不合適，循環初始條件為假 死循環發生場合：當型循環、直到型循環原因：循環變量改變量不合適，循環條件始終為假循環的入口與出口循環入口滿足循環條件即可進入循環循環出口正常出口：不滿足循環條件，正常退出緊急出口：當出現某種情況時，不管當前是否滿足循環條件，立即退出Exit For語句：退出For循環Exit Do語句：退出 Do循環一般出現在一條 If語句中，如If n Mod 3=0 Then Exit For嵌套：一個結構中又包含另一個完整

37、的結構幾種選擇結構可以相互嵌套幾種循環語句可以相互嵌套一般情況下各層循環變量互不相同選擇結構與循環結構可以相互嵌套本章小結：通過本章的學習，學會如何使用循環，使用循環，可以解決很多實際問題, 提高程序運行的效率，但是需要注意的是千萬不要造成死循環和沒有規定循環次數的循環, 很容易造成死機。另外要牢記公式和靈活運用公式。作業：1 .設計一個程序，點擊按鈕開始計算從1 一直加到100的結果。2 .設計一個程序，點擊按鈕后顯示99表。課程V可視化編程應用授課時間第二十五一一二十八課時（講解二課，實驗二課）課題Visual Basic常用內部控件教學目的和要求1 .控件的公共屬性。2 . 窗體、命令按

38、鈕（ CommandButton ）、框架（Frame）、圖片框（Image）、選項按鈕 O OptionButton ）、復選按鈕（CheckBox ）、列表框（ListBox ）、組合框（ComboBox）、定時器（Timer）、滾動條（HscrollBar、VScrollBar ）重點難點 常用內部控件的使用教法講讀法、實踐法教具電腦教學內容及過程一、圖片框、圖像框的常用屬性1、Picture屬性：顯示圖片 (1)在設計階段裝入圖片 改變屬性窗口中的 Picture屬性 (2)在運行期間裝入圖片對象名.Picture=LoadPicture(filename)如：Picture1.Pic

39、ture=LoadPicture("c:windowsBubbles.bmp") 刪除圖片框的圖形也同樣使用LoadPicture如：Picture1.Picture= LoadPicture()2、圖片框的Autosize屬性：決定控件是否自動適應圖片的大小值為：true, false3、圖像框的Strech屬性：決定圖片是否自動適應控件的大小 值為：true, false二、圖片框、圖像框的區別1、圖片框可以作為其它控件的容器2、圖片框可以通過Print方法接受文本3、圖像框比圖片框占用內存少，顯示速度快 三、單選按鈕(OptionButton )1、事件Click事件

40、：當單擊單選按鈕時發生2、屬性(1) Value屬性：表示單選按鈕選中或不選中的狀態(2) Style屬性：設置控件的外觀說明：(1)要使某個單選按鈕成為缺省按鈕，只要設計時將其 Value屬性設置成True (2)要禁用單選按鈕，將Enabled屬性設置成False四、復選框 1、屬性(1) Value 屬性:復選框狀態：0-未選中，1-選中，2-變灰暗(2) Style 屬性： 設置控件的外觀。 2、事件 Click事件 五、列表框(ListBox) 主要用途：在于提供項目列表，用戶從其中可以選擇一項或多項。 1、屬性(1) List 屬性該屬性是一個字符串數組，用來保存列表框中的各個數據

41、項內容。List數組下標從0開始,即List(0)是第一個數據項的內容，List(列表框Name. ListCount-1)是最后一個數據項的內容。用List屬性設置列表項中的數據項的方法： 屬性窗口 程序中設置 列表框Name. List(下標) 如：List1.list(3)= "Li Ning ” (2) ListCount屬性：該屬性記錄了列表框的數據項數 (3) ListIndex屬性(設計時不可用)該屬性是被選中的列表項的下標值(任何時候都是一個值)。(4) Text屬性(只讀)用于存放選中列表項的文本內容。(5) Selected屬性：該屬性值為一個邏輯數組(6) Se

42、lCount屬性：返回列表框中選中項的數量(7) 設置 MultiSelect 屬性(8) Style 屬性(9) 用方法(11) AddItem 方法語法：Listname.AddItem item ,index(2) RemoveItem 方法語法：ListName.RemoveItem index(3) Clear 方法語法：ListName.Clear六、組合框1、屬性：(1) Style 屬性(2) Text 屬性2、方法：同列表框七、框架(Frame)若要在同一窗體上建立幾組相互獨立的單選按鈕，通常用框架將每一組單選按鈕框起來(分組) 注意(1)只能在框架中畫控件的方法向框架中添加

43、控件，不能用雙擊的方式，也不能先畫出控件在添 加到框架中。(2)如果用框架將窗體上現有的控件進行分組，可先選定這些控件，將它們剪切、粘貼到框架中。1、屬性(1) Caption 屬性(2) Enabled 屬性2、由于框架的主要作用是對控件進行分組，所以沒有必要相應它的事件本章小結：通過本章的學習，同學們應該了解和掌握 VB內部控件的使用方法，具有 方便使用的內部控件是 VB的之所以受到廣大用戶歡迎的條件之一， 可以為同學們以后的 編程提供很大的方便。所以我們一定要牢記經常使用的控件的基本屬性。作業:1 .分別寫出命令按鈕、圖片框和定時器的常用屬性以及作用。2 .設計一個程序，每過一秒鐘則窗體

44、上的數字加1。課程VB可視化編程應用授課時間第二十九一一三十四課時（講解二課，實驗四課）課題數組教學目的和要求3 .控件的公共屬性。4 . 窗體、命令按鈕（CommandButton ）、框架（Frame）、圖片框（Image）、選項按鈕（OptionButton ）、復選按鈕（CheckBox）、列表框（ListBox ）、組合框（ComboBox）、 定時器（Timer）、滾動條（HscrollBar、VScrollBar ）重點難點常用內部控件的使用教法講讀法、實踐法教具電腦教學內容及過程一、數組的概念數組是一組具有相同名字、不同下標的變量的集合。需要注意它并不是一種數據類型，它是用來

45、存放或表示一組相關的數據。數組必須先聲明后使用，主要聲明數組名、類型、維數、數組大小。按聲明時下標的個數確定數 組的維數，VB中的數組有一維數組、二維數組最多60維；按聲明時數組的大小確定與否分為定長(靜態)數組和可調(動態)數組兩類數組。例 7. 1 中的語句：Dim C(1 to 50) As Integer聲明了一個一維定長數組，該數組的名字為C,類型為整型；共有50個元素，下標范圍為1到50;C數組的各元素是 C(1),C(2),C(3),，C;(5C)(i)表示由下標i值決定是哪一個元素。二、在對數組操作時，引用數組元素的形式是：數組名(下標1,下標2)注意：下標不能超出數組聲明時的

46、上、下界范圍。下標可以是整型的常數、變量、表達式，甚至 又是一個數組元素。如C(8) 、C(3+13)、C(i)都是正確的數組元素引用形式。數組元素的使用規則與同類型的簡單變量相同。三、一堆數組在聲明時，已明確給出了數組的下標上界、下界(下界也可隱含給出)時該數組稱為定長(靜態) 數組。定長(靜態)數組分一維數組、二維數組及多維數組，VB中最多可達60維。在聲明時，數組只有一個下標，則該數組即為一維數組。四、數組的聲明：聲明一維數組形式如下：Dim數組名(下標)as類型其中：下標：必須為常數，不可以為表達式或變量。下標的形式：下界to 上界，下標下界最小可為-32768,最大上界為32767,

47、省略下界，其默認值 為0。一維數組的大小為：上界 一下界+1。As類型：如果默認，即不明確給出數組的類型，則數組與以前所述簡單變量的聲明一樣，是變體 數組。Dim語句聲明的數組，實際上就是為系統提供數組名、數組類型、數組的維數和各維大小等相關 信息。例如：Dim Y(100) As Integer聲明了 Y是數組名、整型、一維數組、有101個元素；下標的范圍0100。若在程序中使用 a(101), 則系統會顯示下標越界五、一維數組的使用編寫程序時，一維數組通常與For循環結合使用，For語句中的循環變量作為數組元素的下標，通過循環變量的不斷改變，達到對每個數組元素依次進行處理的目的六、二維數組

48、：在聲明時，數組有兩個下標，則該數組即為二維數組。七、二維數組的使用：在利用二維數組編寫程序時，二維數組通常與雙重 For循環結合使用，每重For語句中的循環變量分別作為數組元素的兩個下標，通過循環變量的不斷改變，達到對二維數組中每個數組元素依次進行 處理的目的。八、控件數組：控件數組的概念控件數組是由一組相同類型的控件組成。它們共用一個控件名，絕大部分的屬性也相同，但有一 個屬性不同，即Index屬性的值不同。當建立控件數組時， 系統給每個元素賦一個唯一的索引號（Index）,通過屬性窗口的Index屬性，可以知道該控件的下標是多少，第 1個元素下標是 0。例如，控件數組 LblTm（6）表

49、示控件數組名為 LblTm的第7個元素。控件數組最大的特點是：控件數組共享同樣的事件過程。所以適用于若干個控件執行的操作相似 的場合，例如，控件數組 cmdShuzi有10個命令按鈕，則不管單擊哪個命令按鈕，就會調用同一個單 擊事件過程。為了區分是控件數組中的哪個元素觸發了事件，在程序運行時，通過傳送給過程的索引 值（即下標值）來確定。一個控件數組至少包含一個元素，最多可達32768個。建立的步驟如下：窗體上畫出某控件，可進行控件名的屬性設置，這是建立的第一個元素。選中該控件，進行 復制”和 粘貼”操作，系統會提示（假設先畫了一個Commandl'命令按鈕）：已經有一個控件為 Comm

50、and1 '。創建一個控件數組嗎？”單擊Yes按鈕后，就建立了一個控件數組元素，進行若干次粘貼”操作，就建立了所需個數的控 件數組元素。 進行事件過程的編程。本章小結：通過本章的學習，掌握數組特別是控件數組的使用方法。在實際編程中， 如果需要一次聲明多個變量的話，最好使用數組的方法。作業：按照書本上習題2的要求制作一個計算器。課程VB可視化編程應用授課時間第三十五一一四十課時（講解三課，實驗三課）課題過程孝 與白 不 厚 >1 .系統提供的內部函數過程和事件過程。2 .用戶自定義的過程（通用過程）：Function過程、Sub子過程。3 . Function過程：Function

51、過程的定義和調用。4 . Sub過程：Sub過程的定義和調用。5 .參數的傳遞：形參和實參，按值傳遞和按地址傳遞。6 .過程的作用域。1i建立函數過程和子過程調用過程的方法和參數傳遞 函數過程與子過程的區別教法講讀法、實踐法教具電腦教學內容及過程一、過程的定義過程一一構成程序的一個基本單位。實現某一特定功能或若干功能的代碼段。使用過程的兩大優點：便于調試 代碼重用Sub過程：分為事件過程和通用過程。區別：過程的調用方式不同。1、事件過程：由對象的事件所觸發調用說明：窗體的事件過程名由Form_事件名 組合構成控件的事件過程名由控件的Name_事件名組合構成例如： Private Sub For

52、m_Load（）End SubPrivate Sub Command1_Click()End Sub2、通用過程：存放多個程序需要共同使用的一段代碼（公用代碼）創建：（1）直接輸入過程頭，按回車后將自動出現過程尾格式：Private|PublicStatic Sub 過程名（形式參數表）過程頭語句過程體End Sub過程尾說明：可以使用Exit Sub退出；不能嵌套定義，但可以調用其它過程。（2）利用 工具/添加過程”命令，設置對話框即可。 然后在代碼窗口中定義過程的參數Function過程（也稱為函數過程 ）與Sub過程區別：Function過程帶有返回值，定義時有返回值的類型說明。格式：P

53、rivate|PublicStatic Function 函數名（形式參數）As 類型函數名=表達式語句End Function 說明：函數的創建與通用過程的創建相似：用 Function代替Sub;可以在代碼窗口 ”直接定義或 工具/添加過程”對話框中定義。然后在代碼窗口中定義過程的參數，返回值類型為了使函數過程返回結果，一般在函數過程中應有函數名=表達式”這樣的語句，如省略，則數值函數返回0,字符串返回空字符串。可以用Exit Function退出；二、過程的調用1、在其它過程中調用通用過程使用Call語句：Call 過程名(實在參數)使用過程名： 過程名實在參數(注意：實參不能有圓括號)

54、例題：見下頁2、函數過程的調用：變量名 =函數名(參數列表) 三、參數傳遞1、形參與實參如： 定義過程： sub testsub(r as integer,cc as string )調用過程：call testsub(18, rr)注：實參，形參變量名可不同，但個數必相同實參書寫順序必須與相應形參的類型相符2、按值傳遞參數形式：參數前帶有關鍵字ByVal形參是實參的副本(形參的變動不影響實參)。3、按地址傳遞參數形式：參數前帶有關鍵字ByRef或缺省形參使用對應的實參的存儲單元。顯然，形參的變動將影響實參。4、使用可選參數在參數前加optional指定參數可選若指定了可選參數，則其后的參數也

55、必是可選的，要加 optional5、使用不定數量的參數(可變參數)一般，實參與形參個數相等，但可用ParamArray關鍵字使過程接受任意個數的參數。四、變量和過程的作用范圍1、過程的作用域(1)窗體/模塊級過程private(2)全局級過程public或缺省如果在窗體模塊 Form1中包含SomeSub過程，則可使用下面的語句調用Form1中的過程：Call Form1.SomeSub(arguments)若在 Module1中調用 Module2中的 CommonName過程，要用下面的語句：Module2.CommonName (arguments)2、變量的作用域過程級變量(局部變量)在其聲明的過程內起作用用Dim聲明：變量值只在過程執行期間存在。用Static聲明：靜態局部變量，在整個應用程序運行時，其值一直存在。模塊級變量一一在該模塊的所有過程中起作用在模塊的 通用”聲明段用Private或Dim語句聲明。全局變量一一在該工程的所有模塊中起作用。例如，兩個窗