1、VB程序設計的初步知識 1.VB的概述 VB是一種可視化、面向對象和采用事件驅動方式的構造化高檔程序設計語言。 特點： 可視化編程 面向對象程序設計 構造化的程序設計語言 事件驅動編程機制 訪問數據庫 2.VB的程序開發環境 （1）窗口設計器窗口。簡稱，窗體 （2）工程資源管理器窗口 工程文獻和工程文獻組 工程文獻的擴展名是vbp，每個工程相應一種工程文獻。 窗體文獻 擴展名是frm，每一種窗體相應一種窗體文獻，一種應用程序可以有多種窗體。 原則模塊文獻 擴展名bas，不屬于任何一種窗體。 類模塊文獻 （3）屬性窗口和工具箱窗口 3.VB常用對象及操作 （1）對象事件的名稱Name是由VB預定

2、的，不可以由編程者設定。 可以在運營期間變化窗體的Name屬性的值。(?) （2）控件 4.VB應用程序一般有3類模塊構成，即窗體模塊、原則模塊和類模塊。 VB應用程序以解釋和編譯方式執行。 5.VB中的變量和常量 （1）常量 文字常量：字符串和數值常量 符號常量 格式：Const 變量名=體現式 （2）變量 命名規則：名字只能由字母、數字和下劃線構成。 第一種字符必須是英文字母，最后一種字符可以是類型闡明符。 變量的類型和定義 類型闡明符放在變量名的尾部。 A#b(錯) %：整型 &：長整型 ！：單精度型 #：雙精度型 $:字符串型 在定義變量時指定類型。 格式：Declare 變量名 as

3、 類型 Declare 可以是 Dim、Static、Public或Private （3）變量的作用域 變量分為:局部變量、模塊變量和全局變量 局部變量 在事件過程或通用過程內定義的變量叫局部變量。 模塊變量 窗體變量可用于窗體內的所有過程. 當同一種窗體內的不同過程使用相似的變量時，必須定義窗體層變量，在使用窗體層變量前，必須先聲明。 全局變量 全局變量只能在原則模塊中聲明，不能在過程或窗體模塊中聲明。用Public 聲明。 6. VB常用內部函數 轉換函數 取整函數Int和fix 數值轉換函數 類型轉換函數 格式轉換函數 數學函數 三角函數 絕對值函數（Abs） 符號函數（Sgn） 平方根

4、函數（Sqr） 指數和對數函數（Exp和Log） 隨機數函數 隨機數函數（Rnd） Randomize語句 時間函數 7. VB字符串解決 左、中、右部截取 Left(字符串，n)Mid(字符串，n)Right(字符串，n) 字符串長度測量函數 Len(字符串) Strings函數 Strings（n,ASCII碼） Strings（n,字符串） 查找某個字符串函數 InStr(首字符位置，字符串1，字符串2，n 字母大小轉換函數 Ucase(字符串) Lcase(字符串) 插入字符串語句 Mid(字符串，位置)=字符串 SetFocus語句 8.VB運算符與體現式 （1）算術運算符 求模運算

5、 Mod求余. 算術運算符優先級 - * / Mod + - & 如：72 Mod 523=1 （1） 關系運算符和邏輯運算符 （2） 體現式的執行順序 關系運算(=,) 最后進行邏輯運算,順序為: NotAndOrXorEqv 如：體現式： Not a=c Or 4*c=b2 And ba+c的值是（Flase）a=2,b=3,c=4 9.VB常用原則控件 (1).標簽 Alignment 確認標簽中標題放置的位置，可設立0、1、2，作用分別為標題設立在左、右、中。 AutoSize 標題自動調節標簽的大小，可設立為True和False. Borderstyle 設立標簽的邊框，可設立為0和

6、1，0表達為無邊框。 Enabled 用于擬定一種窗體或控件能否對顧客產生的事件作出反映。 BackStyle 設立標簽與否覆蓋背景，0表達為透明，1表達標簽覆蓋背景。 WordWrap 決定標簽的標題文本能否自動換行。 其她：Height、Left、Top、Visible、Width等等。 (2) 文本框 屬性： MaxLength 設立文本框中輸入的最大字符數。 MultiLine 設立與否容許多行顯示。 Passwordchar 用于口令輸入。 Scrollbars 用來設立文本框中的滾動條。 事件： Change 事件 當顧客輸入新信息或把Text屬性設立為新值從而變化文本框的屬性時，

7、將可觸發此事件。 GotFocus事件 當文本框有輸入焦點時，鍵盤上輸入的字符都將在文本框中顯示出來，只有當一種文本框被激活并且可見性為TRUE是才干收到焦點。 Setfocus 事件 該措施可以把輸入的光標（焦點）移到指定的文本框中。 格式： 對象. Setfocus (3) 圖形控件 圖片框和圖像框： CurrentX和CurrentY屬性 Picture屬性 Stretch屬性 用于自動調節圖像框中圖形內容的大小。 區別: 圖片框是“容器”控件，可作為父控件，而圖像框不能。 圖片框可接受文本和圖片，圖像框不能。 圖像框占用內存少，顯示速度快。 圖片框更靈活，且合用于動態環境。 運營期間裝

8、入圖片 格式：對象. Picture=LoadPicture（”文獻名”） 直線和形狀： BorderColor屬性 Borderstyle 1實線 2虛線 3點線 4點劃線 BackStyle 設立標簽與否覆蓋背景，0表達為透明，1表達標簽覆蓋背景。 Shape 屬性 0矩形 1正方形 2橢圓形 3圓形 4四角圓化的矩形 BorderWidth 指定線寬或界寬 （3） 復選框和單選按鈕 Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline Value、Alignment、Height、Left、Top、Visible、Widt

9、h 單選按鈕：Value=True，表達選擇了該單選按鈕. Value=False, 表達沒有選擇該單選按鈕. 復選框：Value=0，表達沒有選擇該復選框。 Value=1，表達選擇該復選框。 Value=2，表達該復選框被禁用。 (6) 列表框和組合框 列表框措施：AddItem 添加文本內容到列表框中。 Clear 清除列表框中所有內容。 RemoveItem 刪除列表框中指定的項目。 組合框（ComboBox）：AddItem、Clear、RemoveItem同樣合用。 Style是組合框的一種重要屬性，其值可取0、1、2，決定組合框的3個類型。 注意： 屬性ListIndex和 Li

10、stCout的區別 108（7） 滾動條 屬性： 除Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline Value、Alignment、Height、Left、Top、Visible、Width外，尚有如下屬性： Max和Min LargeChange和SmallChange Value 表達滾動框在滾動條的位置。 事件：重要有Scroll和Change.當在滾動條內拖動滾動框時會觸發Scroll事件，而變化滾動框的位置時會觸發Change事件。 （8） 計時器 可以用Enabled和Name屬性，其最重要的是Interval

11、屬性，取值范疇065535. （9） 框架 （10） 焦點與Tab順序 設立焦點 格式： 對象. Setfocus Tab順序 Tab順序是在按Tab鍵時焦點在控件間移動的順序。影響Tab順序的屬性是TabIndex。1.數據的輸出措施: print措施 與print措施有關的函數：tab(n)函數 【print tab(24); 800】 spc(n)函數 【print “china”; spc(4); ”中國” 】用于跳出n個空格輸出 tab函數從第一列開始計數，n是絕對偏移量。spc(n)函數則是從前面的輸出內容開始計數，n是相對偏移量。 格式輸出（ ） #：表達數字，不補零 0：表達數

12、字，在數字的前或后補零 .：指定小數點的位置 ，：指定千分分隔符的位置 如：print format$ （12345.6,”#,#.#”）12,345.（3）msgbox函數 信息框 返回值標題 2.數據輸出措施（1）inputbox措施 Inputbox函數的返回值默覺得字符串。如：a=inputbox(“Enter an integer”) b= inputbox(“Enter an integer”) text1.text=b+a 如果在輸入對話框中輸入8和10，則文本框中顯示的內容為108VB的控制構造 循環控制構造 (1)For循環控制構造 使用Exit for 語句，可以在循環變量

13、達到終值前就退出循環。 （2）當循環構造 While 條件 語句塊 Wend (3)Do循環構造 Do WhileLoop Do loop While (4)多分支控制構造 測試體現式=？Select case 測試體現式 （5）IIf函數 A=IIf(條件，true部分，false部分)數組與過程 1默認數組 默認數組就是數據類型為Variant的數組。 Static A(4)即為定義了四個默認數組。 2動態數組 用變量作為下標定位的數組時動態數組 用數值常量或符號常量作為下標定維的數組是靜態數組。 動態數組定義分兩步：一方面在窗體層、原則模塊或過程中用DIM或Public聲明一種沒有下標的

14、數組，然后再過程中在用ReDimd定義。 3. 數組的清除和重定義 Erase 數組名 Erase用于動態數組中，將刪除整個數組構造并釋放數組所占用的內存，即動態數組后來就不復存在。用于靜態數組中只是內容清空，數組仍然存在。 4. 數組元素的輸入及輸出 輸入：一般通過For循環和Inputbox函數輸出 如: Option base 1 Dim s() as string Sub Form_Click() Redim s(4) as string For i= 1 to 4 Temp$=Inputbox(“Enter Name”) S(i)= Temp$ Next i End Sub 輸出：用

15、Print措施結合For循環實現 Option base 1 Dim s(4,4) as Integer For i= 1 to 4 For j= 1 to 4 Print s(i,j); “ ” ； Next j Next i 5控件數組 控件數組是一組相似類型的控件構成，這些控件有一種相似的控件名稱，具有相似的屬性設立，所有元素的Name屬性相似，但Index屬性不同。 6.Sub過程 通用過程：多種事件過程需要使用同一種程序代碼，她可以單獨建立，供事件過程或其她過程調用。 事件過程：當發生某個事件時，對事件作出響應的程序段。 函數過程的返回值只能有一種。 調用Sub過程： Call語句調

16、用過程。 如：Call Tryout(a,b) 把過程名作為一種語句使用。 如：Try out a,b 去掉call核心字，去掉“實際參數”括號。 7.通用sub過程和事件過程 重點難點 事件過程是一種特殊的sub過程，她附加在窗體和控件上。窗體的事件過程不能由顧客任意定義，而是由系統指定。一般是在事件過程中調用通用過程，同步事件過程也可以被其她過程調用。 通用過程可以放在原則模塊中，也可以放在窗體模塊中，而事件過程只能放在窗體模塊中，不同模塊中的過程可以互相調用。 8Function過程 重點難點 Sub過程不直接返回值，可以作為單獨的基本語句使用，而Function過程要返回一種值，一般出

17、目前體現式中。 鍵盤與鼠標事件 1鍵盤事件 KeyPress事件 當壓下鍵盤上的某個鍵時，將發生KeyPress事件。該事件可以用于各控件。例如用在文本框上的格式：Private Sub Text- KeyPress（KeyAscii as integer） KeyPress事件帶有一種參數，參數有兩種形式，第一種形式：Index As Integer,只用在控件數組。第二種形式是：KeyAscii As integer,用于單個控件。 KeyPress事件用于辨認按鍵的Ascii碼，捕獲擊鍵動作，KeyAscii參數不能省略。 控件的鍵盤事件優先于窗體的鍵盤事件 KeyDown和KeyUP事

18、件 KeyDown和KeyUP事件返回的是鍵盤的直接狀態。 KeyPress事件返回的是Ascii碼。當按鍵“A”時，KeyDown事件所得到的Keycode碼與鍵“a”的相似。 2鼠標事件第10章 鍵盤與鼠標事件本章重要考察鍵盤事件與鼠標事件，涉及KeyPress事件、KeyDown和KeyUp事件、鼠標事件、鼠標光標的形狀與拖放等知識點。通過對歷年試卷內容的分析，本章考核內容約占6%，屬于一般考核對象。 10.1 鍵盤事件 使用鍵盤事件過程，可以解決當按下或釋放鍵盤上某個鍵時所執行的操作。 10.1.1 考點1：KeyPress事件 當壓下鍵盤上的某個鍵時，將發生KeyPress事件。該事

19、件可用于窗體、復選框、組合框、命令按鈕、列表框、圖片框、文本框、滾動條及與文獻有關的控件。嚴格地說，當按下某個鍵時，所觸發的是擁有輸入焦點（Focus）的那個控件的KeyPress事件。在某一時刻，輸入焦點只能位于某一種控件上，如果窗體上沒有活動的或可見的控件，則輸入焦點位于窗體上。當一種控件或窗體擁有輸入焦點時，該控件或窗體將接受從鍵盤上輸入的信息。例如，假定一種文本框擁有輸入焦點，則從鍵盤上輸入的任何字符都將在該文本框中回顯。 在窗體上畫一種控件（指前面所講的可以發生KeyPress事件的控件），例如文本框，并雙擊該控件，進入程序代碼窗口后，從“過程”框中選用KeyPress，即可定義Ke

20、yPress事件過程。一般格式如下： Private Sub Text1 _ KeyPress（KeyAscii As Integer） End Sub KeyPress事件帶有一種參數，這個參數有兩種形式，第一種形式是Index As Integer，只用于控件數組；第二種形式是KeyAscii As Integer，用于單個控件。上面列出的是第二種形式。KeyPress事件用來辨認按鍵的ASCII碼。參數KeyAscii是一種預定義的變量，執行KeyPress事件過程時，KeyAscii是所按鍵的ASCII碼。 闡明： 運用KeyPress事件可以對輸入的值進行限制； 運用KeyPress

21、事件可以捕獲擊鍵動作； 在KeyPress過程中可以修改KeyAscii變量的值。如果進行了修改，Visual Basic控件中輸入修改后的字符，而不是顧客輸入的字符。 例10.1.1 如下有關KeyPress事件過程參數KeyAscii的論述中，對的的是（ ）。9月 填空第29題 AKeyAscii參數是所按鍵的ASCII碼 BKeyAscii參數的數據類型為字符串 CKeyAscii參數可以省略 DKeyAscii參數是所按鍵上標注的字符 解析：KeyPress事件帶有一種參數，這個參數有兩種形式。第一種形式是Index As Integer，只用于控件數組；第二種形式是KeyAscii

22、As Integer，用于單個控件。參數KeyAscii是一種預定義的變量，執行KeyPress事件過程時，KeyAscii是所按鍵的ASCII碼，并且該參數不能省略。 答案：A 小技巧：在默認狀況下，控件的鍵盤事件優先于窗體的鍵盤事件。因此在發生鍵盤事件時，總是先激活控件的鍵盤事件。如果但愿窗體先接受鍵盤事件，則必須把窗體的KeyPreview屬性設立為True，否則不能激活窗體的鍵盤事件。 10.1.2 考點2：KeyDown和KeyUp事件與KeyPress事件不同，KeyPress并不反映鍵盤的直接狀態，而KeyDown和KeyUp事件返回的是鍵盤的直接狀態。換言之，KeyDown和K

23、eyUp事件返回的是“鍵”，而KeyPress事件返回的是“字符”的ASCII碼。例如，當按字母鍵“A”時，KeyDown所得到的KeyCode碼（KeyDown事件的參數）與字母鍵“a”是相似的，而對KeyPress來說，所得到的ASCII碼不同樣。 KeyDown和KeyUp事件的參數也有兩種形式，其中Index As Integer只用于控件數組，而KeyCode As Integer，Shift As Integer用于單個控件。 闡明： 參數KeyCode是按鍵實際的ASCII碼。該碼以“鍵”為準，而不是以“字符”為準。也就是說，大寫字母與小寫字母使用同一種鍵，它們的KeyCode相

24、似（使用大寫字母的ASCII碼）； 轉換鍵，指的是三個轉換鍵的狀態，涉及Shift、Ctrl和Alt，這三個鍵分別以二進制形式表達，每個鍵有三位，Shift鍵為001，Ctrl鍵為010，Alt鍵為100； KeyDown是當一種鍵被按下時所產生的事件，而KeyUp是松開被壓下的鍵時所產生的事件。 例10.1.2 在窗體上畫1個文本框，其名稱為Text1，然后編寫如下過程： Private Sub Text1_KeyDown (KeyCode As Integer ,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_K

25、eyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 程序運營后，把焦點移到文本框中，此時如果敲擊“A”鍵，則輸出成果為（ ）。4月 選擇第29題 AA BA CA DA A B C D 解析：敲擊“A”鍵的動作，一方面是按下該鍵觸發Text1_KeyDown事件，通過Print Chr(KeyCode)輸出“A”；然后是松開被按下的“A”鍵，此時觸發Text1_KeyUp事件，通過Print Chr(KeyCode+2)輸出“C”。 答案：C 警鐘長鳴：在鍵盤上按下一種鍵總是會觸發KeyDown事件、Ke

26、yUp事件和KeyPress事件。 例10.1.3 在窗體上畫1個命令按鈕和1個文本框，其名稱分別為Command1和Text1，然后編寫如下代碼： Dim SaveAll As String Private Sub Command1_Click() Text1.Text=Left(UCase(SaveAll),4) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) SaveAll = SaveAll +Chr(KeyAscii) End Sub 程序運營后，在文本框中輸入abcdefg，單擊命令按鈕，則文本框中顯示的內容是_。4月

27、 填空第9題 解析：Text1_KeyPress過程將顧客在文本框中所輸入的內容保存到變量SaveAll中，本例輸入“abcdefg”，則SaveAll=“abcdefg”；Left(UCase(SaveAll),4)函數即為對“abcdefg”轉換為大寫后取前四個字母，即“ABCD”。 答案：ABCD 小技巧：運用邏輯運算符And可以判斷與否按下了某個轉換鍵，可以在事件過程中通過判斷與否按下了某個或某幾種鍵來執行指定的操作。 可視化程序設計 1當窗體為活動窗體時，可以使用“工具”菜單中的“菜單編輯器”打開菜單編輯器。 2彈出式菜單：建立彈出式菜單一方面用菜單編輯器建立菜單，然后用PopupM

28、enu措施彈出顯示。 各級菜單中的所有菜單項的名稱必須唯一。 3通用對話框： 對話框的類型可以通過Action屬性設立，也可以用相應的措施設立。可以通過DialogTitle屬性設立有實際意義的標題。 通用對話框，Action=1 打開文獻； =2 保存文獻 措施：showopen；showsave 4文獻對話框： 格式：【窗體】對話框名，Fliter=描述符1|過濾器1| 描述符2|過濾器2| FliterIndex 用來指定默認的過濾器。 5多重窗體程序設計 Show措施：用來將指定的窗體裝入內存并顯示該窗體。 6VB工程中，可以作為啟動對象的程序是Sub main 過程或任何窗體。 一種

29、工程中可以涉及多種窗體文獻。數據文獻 1基本文獻操作語句與函數 打開文獻 重點難點 格式：Open文獻名【for 方式】 as #文獻號 如果省略【for 方式】，則打開文獻的存取方式是隨機存取方式。 方式指文獻的輸出方式，可以是Output(順序輸出)以寫的方式打開、 input(順序輸入)、append(添加)。 使用open語句打開文獻時，如果為輸入input打開的文獻不存在，則產生“文獻未找到”的錯誤；如果為Output(順序輸出) 、append(添加)訪問方式打開的文獻不存在，則建立相應的文獻。 (2)關閉文獻 (3)EOF函數 用來測試文獻的結束狀態。運用EOF函數，可以避免在文

30、獻輸入時浮現“輸入超過尾”錯誤。 DO While Not EOF 2.順序文獻與隨機文獻 順序文獻寫操作 Print #文獻號，體現式 Write #文獻號, 體現式 (2)順序文獻讀操作 Input #文獻號，變量表 (3)隨機文獻的打開與讀寫操作 隨機文獻的記錄是定長記錄。在用open語言打開文獻時必須指定記錄的長度。 打開隨機文獻： Open”文獻名” for random As #文獻號 對文獻的操作既可以讀也可以寫。第12章 數 據 文 件 本章重要考察Visual Basic中的數據文獻操作，涉及Visual Basic文獻概述、基本文獻操作語句與函數、順序文獻與隨機文獻和文獻系

31、統控件。通過對歷年試卷內容的分析，本章考核內容約占8%，屬于一般考核對象。 12.1 Visual Basic文獻概述 12.1.1 考點1：文獻概述 1文獻概念 所謂“文獻”，是指記錄在外部介質上的數據的集合。 2在程序設計中使用文獻的因素 文獻是使一種程序可以對不同的輸入數據進行加工解決、產生相應輸出成果的常用手段。 使用文獻可以以便顧客，提高上機效率； 使用文獻可以不受內存大小的限制。 3文獻構造 為了有效地存取數據，數據必須以某種特定的方式寄存，這種特定的方式稱為文獻構造。Visual Basic文獻由記錄構成，記錄由字段構成，字段由字符構成。 （1）字符 字符是構成文獻的最基本單位。

32、字符可以是數字、字母、特殊符號或單一字節。Visual Basic支持雙字節字符，當計算字符串長度時，一種西文字符和一種中文都可作為一種字符計算，但它們所占的空間是不同樣的。例如：字符串“系統分析員協會顧問團CSAI”的長度為14個字符，而所占的存儲空間為24個字節。 （2）字段 字段也稱為域。字段由若干個字符構成，用來表達一項數據。 （3）記錄 記錄由一組有關的字段構成。 （4）文獻 文獻由記錄構成，一種文獻具有一種以上的記錄。 4文獻種類 根據不同的分類原則，文獻可分為不同的類型。 （1）根據數據性質劃分 程序文獻：寄存的是可以由計算機執行的程序，涉及源文獻和可執行文獻。 數據文獻：寄存一

33、般的數據，此類數據必須通過程序來存取和管理。 （2）根據數據的存取方式和構造劃分 順序文獻：文獻中的記錄一種接一種地寄存。順序文獻的組織比較簡樸，但維護困難。重要長處是占空間少，容易使用。 隨機存取文獻：又稱直接存取文獻，每個記錄的長度是固定的，根據記錄號進行讀寫操作。長處是數據的存取靈活、以便，速度較快，容易修改。缺陷是占空間較大，數據組織較復雜。 （3）根據數據的編碼方式劃分 ASCII文獻：又稱文本文獻，它以ASCII方式保存文獻。可以用字解決軟件建立和修改。 二進制文獻：以二進制方式保存的文獻。不能用一般的字解決軟件編輯，占空間較小。 例12.1.1 如下文獻擴展名中，不屬于程序文獻的

34、是（ ）。 A.exe B.frm C.mdb D.vbp 解析：.exe文獻為可執行文獻；.frm文獻為Visual Basic的窗體文獻；.mdb文獻為Access數據庫文獻；.vbp文獻為Visual Basic的工程文獻。 答案：C第二章 數據的輸出與輸入1.Print措施的對象2.MsgBox函數和InputBox函數中各參數的含義格式：InputBox(prompt,title,default) 格式：MsgBox(msg,type,title)9章 數組與過程 本章重要考察Visual Basic中的數組與過程，重要涉及：數組基本概念、數組基本操作、控件數組、Sub過程、Func

35、tion過程、過程中的參數、局部內存分派和Shell函數。通過對歷年試卷內容的解析，本章考核內容約占18%，屬于重點考核對象,但將保持下降趨勢。 9.1 數組基本概念 9.1.1 考點1：數組的定義 數組是有序的數據的集合。在Visual Basic中，一種數組中的元素可以是相似類型的數據，也可以是不同類型的數據。在Visual Basic中，可以有兩種格式定義數組： 1第一種格式 （1）一維數組 一維數組的定義一般格式如下： Dim 數組名(下標上界) As 類型名稱 例如：Dim score (10) As Integer 該語句定義了一種一維數組，名字為score，類型為Integer，

36、共6個元素。 （2）二維數組 二維數組的定義一般格式如下： Dim 數組名(第一維下標上界，第二維下標上界) As 類型名稱 例如：Dim stuScore (10,2) As Integer 該語句定義了一種二維數組，名字為stuScore，類型為Integer，共11X3=33個元素。 2第二種格式 （1）定義數組 在定義數組時，指定數組下標的上界和下界。語句一般格式如下： Dim 數組名(下界 To 上界，下界 To 上界) As 類型名稱 例如：Dim score（1 To 5） 該語句定義了一種一維數組，下界為1，上界為5，共5個元素。 第二種格式事實上涉及了第一種格式，只要省略“下

37、界To”，即變為第一種格式。 （2）語句闡明 “數組名”與簡樸變量相似，可以是任何合法的Visual Basic變量名，在同一過程中，數組名不能與變量名同名； 數組必須先定義后使用，并且每一維的元素個數必須是常數，不能是變量或體現式； 使用Dim語句定義數組時，數值數組中的所有元素初始化為0，字符串數組中的所有元素初始化為空字符串； 一般狀況下，下標的下界默覺得0，可以使用Option Base n（n只能為或1）變化下標的默覺得1；使用LBound和UBound函數可以獲得數組的上、下界值； 如果下標值從0開始，則數組元素的個數為最大下標值加1，如果下標值從1開始，則數組元素的個數與最大下標

38、值相等。 3定義數組的保存字 在Visual Basic中，定義數組時可使用4個保存字，以定義不同范疇內的數組： Dim：定義窗體模式或原則模塊數組，也可用在過程中； ReDim：用在過程中； Static：用在過程中； Public：用在原則模塊中，定義全局數組。 例9.1.1 在窗體上畫1個命令按鈕，其名稱為Command1，然后編寫如下事件過程：4月 填空第7-8題 Private Sub Command1_Click() Dim arr (1 To 100) As Integer For I = 1 To 100 arr(i)=Int(Rnd *1000) Next i Max = a

39、rr(1) Min = arr(1) For i= 1 To 100 If 【7】 Then Max = arr(i) End If If 【8】 Then Min =arr(i) End If Next i Print Max =;Max, Min=;Min End Sub 程序運營后，單擊命令按鈕，將產生100個1000以內的隨機整數，放入數組arr中，然后查找并輸出這100個數中的最大值Max和最小值Min，請填空。 解析：由條件判斷可以得知，在【7】處的意思是將最大值Max中的數與arr(i)中的數相比較，【8】處的意思是將最小值Min中的數與arr(i)中的數相比較。 答案：【7】M

40、axarr(i) 9.1.2 考點2：默認數組 所謂默認數組，就是數據類型為Variant（默認）的數組。在一般狀況下，定義數組應指明其類型。 例如： Static Elec(1 To 100)As Integer 該語句定義了一種數組Elec，該數組的類型為整型，它有100個元素，每個元素都是一種整數。但如果使用語句： Static Elec(1 To 100) 則定義的數組是默認數組，沒有指定類型，則類型默覺得Variant，該語句等價于： Static Elec(1 To 100) As Variant 對于默認數組來說，同一種數組中可以寄存多種不同的數據。因此，默認數組可以說是一種“混

41、合數組”，這也就是默認數組的意義所在。 例9.1.2 閱讀下面程序并填空。 Sub Form_Click() 【1】 Defau(1)=100 Defau(2)=234.56 Defau(3)= CSAI Defau(4)= 20 & Now For i=1 To 4 Print Defau(;I; )=; Defau(i) Next i End Sub 答案：【1】Static Defau(4)第11章 可視化程序設計本章重要考察可視化程序設計，涉及菜單程序設計、對話框程序設計、多重窗體程序設計、Visual Basic工程構造與執行控制等知識點。通過對歷年試卷內容的分析，本章考核內容約占6

42、%，屬于一般考核對象，下次考試將保持上升趨勢。 11.1 菜單程序設計菜單的基本作用有兩個，一是提供人機對話的界面，以便讓使用者選擇應用系統的多種功能；二是管理應用系統，控制多種功能模塊的運營。 在實際應用中，菜單可分為兩種基本類型，即下拉式菜單和彈出式菜單。 11.1.1 考點1：下拉式菜單下拉式菜單是一種典型的窗口式菜單。在下拉式菜單系統中，一般有一種主菜單，其中涉及若干選擇項，主菜單的每一項都可以“下拉”出下一級菜單供顧客選擇或輸入信息。操作完畢后菜單從屏幕上消失，并恢復本來的屏幕狀態。 1菜單編輯器 Visual Basic中的菜單通過菜單編輯器，即菜單設計窗口建立。可以通過如下4種方

43、式進入菜單編輯器： 執行“工具”菜單中的“菜單編輯器”命令； 使用熱鍵Ctrl+E； 單擊工具欄中的“菜單編輯器”按鈕； 在要建立菜單的窗體上單擊鼠標右鍵，將彈出一種菜單，然后單擊“菜單編輯器”命令。 菜單編輯器窗口分為三個部分：即數據區、編輯區和菜單項顯示區。 （1）數據區 數據區用來輸入或修改菜單項、設立屬性。在數據區中，必須提供菜單項的“標題”和“名稱”屬性，“有效”屬性和“可見”屬性一般默覺得True，只有在必要時才設立其她屬性。在設立“標題”屬性時，如果輸入一種減號（），則可在菜單中加入一條分隔線；如果在菜單“標題”中涉及“&”，則可將該符號后的字母作為訪問鍵（通過ALT加該鍵打開該

44、菜單）。 （2）編輯區 編輯區用來對輸入的菜單項進行簡樸的編輯。 （3）菜單項顯示區 菜單項顯示區用來顯示所輸入的菜單項。菜單在數據區輸入，在編輯區進行位置調節，在菜單項顯示區顯示。 2菜單項的控制 （1）有效性控制 菜單中的某些菜單項應能根據執行條件的不同進行動態變化，即當條件滿足時可以執行，否則不能執行。 菜單項的“有效”屬性，菜單項的有效性就是通過該屬性來控制的。事實上，只要把一種菜單項的“有效”屬性設立為False，就可以使其失效，運營后該菜單項變為灰色；為了使一種失效的菜單項變為有效，只要把它的“有效”屬性重新設立為True即可實現。 （2）菜單項標記 所謂菜單項標記，就是在菜單項前

45、加上一種“”。它有兩個作用：一是可以明顯地表達目前某個（或某些）命令狀態是“On”或“Off”二是可以表達目前選擇的是哪個菜單項。菜單項標記通過菜單設計窗口中的“復選”屬性設立，當該屬性為True時，相應的菜單項前有“”標記；如果該屬性為False，則相應的菜單項前沒有“”標記。 （3）鍵盤選擇 用鍵盤選用菜單一般有兩種措施，即熱鍵和訪問鍵（Access Key）。 3菜單項的增減 菜單項的增減通過控件數組來實現。一種控件數組具有若干個控件，這些控件的名稱相似，所使用的事件過程相似，但其中的每個元素可以有自己的屬性。控件數組和一般數組同樣，可通過下標（Index）訪問控件數組中的元素。控件數組

46、可以在設計階段建立，也可以在運營時建立。 例11.1.1 假定有一種菜單項，名為MenuItem，為了在運營時該菜單項失效（變灰），應使用的語句是（ ） AMenuItem.Enabled= False BMenuItem.Enabled= True CMenuItem.Visible= True DMenuItem.Visible= False 解析：Enabled屬性設立菜單與否可用；Visible屬性設立菜單與否可見。菜單項標記一般是動態地加上或取消的，因此應在程序代碼中根據執行狀況動態設立。 答案：A 重要提示：只有當某個窗體為活動窗體時，才干用上面簡介的四種措施打開菜單編輯器窗口。

47、11.1.2 考點2：彈出式菜單 建立彈出式菜單一般分兩步進行：一方面用菜單編輯器建立菜單，然后用PopupMenu措施彈出顯示。第一步的操作與前面簡介的基本相似，惟一的區別是必須把菜單名（即主菜單項）的“可見”屬性設立為False（子菜單項不要設立為False）。PopupMenu措施用來顯示彈出式菜單，其一般格式如下： 對象.PopupMenu菜單名，Flags，X，Y，BoldCommand 闡明： 當省略“對象”時，彈出式菜單只能在目前窗體中顯示。如果需要彈出式菜單在其她窗體中顯示，則必須加上窗體名； Flags的兩組參數可以單獨使用，也可以聯合使用。當聯合使用時，每組中取一種值，兩者

48、相加；如果使用符號常量，則兩個值用Or連接； 彈出式菜單的位置由X、Y和Flags參數共同指定。 例11.1.2 在菜單編輯器中建立一種名稱為Menu（ ）的菜單項，將其“可見”屬性設立為False，并建立其若干子菜單，然后編寫如下過程： Private Sub Form_MouseDown (Button As Integer ,Shift As Integer ,X As Single, Y As Single) If Button = 1 Then PopupMenu Menu() End If End Sub 則如下論述中錯誤的是（ ）4月 選擇第32題 A該過程的作用是彈出一種菜單

49、B單擊鼠標右鍵時彈出菜單 CMenu（）是在菜單編輯器中定義的彈出菜單的名稱 D參數X、Y指明鼠標目前位置的坐標 解析：一般把PopupMenu措施放在MouseDown事件中，該事件響應所有的鼠標單擊操作，用Button參數控制左右鍵選擇。Button=1為單擊鼠標左鍵時彈出菜單，Button=2為單擊鼠標右鍵時彈出菜單。 答案：B 第九章.常用控件認清事件觸發的對象名 列表框 List屬性是一種字符數組，寄存列表框的項。 ListIndex屬性選中的列表項序號。 ListCount屬性列表框中項目的數量。 Text屬性被選中列表項的文本內容。 Selected屬性是一種邏輯數組，表達相應的

50、項在程序運營期間與否被選中。第三章 VB程序設計語句1. For循環 For = to step 步長 Exit For Next 1) 多重循環 Do循環 格式一：Do While Loop 格式二：Do Until Loop 格式三：Do Loop While 格式四：Do Loop Until 2) 二重循環 1.典型案例：求100以內的素數。2.取矩陣對角線上的元素。3.打印“*”型圖。 3) 程序范例： Const n=5,m=4 Dim a(m,n) Private Sub Command1_Click() K=1 For i=1 To m For j=1 To n a(i,j)=

51、k k=k+1 Next j Next i End Sub Private Sub Command2_Click() Summ=0 For i=1 To m For j=1 To n If i=1 Or i=m Then Summ=summ+a(i,j) Else If j=I Or j=n Then Summ=summ+a(i,j) End If End If Next j Next i Print summ End Sub 過程Command1_Click()的作用是二維數組a 中寄存1個 m行n列的矩陣;過程Command2_Click()的作用是 A) 計算矩陣外圍一圈元素的累加和 B

52、) 計算矩陣除外一圈以外的所有元素的累加和 C) 計算矩陣第1列和最后一列元素的累加和 D) 計算矩陣第1行和最后一行元素的累加和VB中狀態欄(StatusBar)和工具欄(ToolBar)典型實例分析1 狀態欄的作用與構成 StatusBar 控件由 Panel（窗格） 對象構成，最多能被提成 16 個 Panel 對象，每一種 Panel 對象能涉及文本和/或圖片。控制個別窗格的外觀屬性涉及 Width、Alignment（文本和圖片的）和 Bevel(斜面)。此外，能使用 Style 屬性七個值中的一種自動地顯示公共數據，諸如日期、時間和鍵盤狀態等。2 創立狀態欄先在窗體上畫出一種Sta

53、tusBar對象，再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設立窗口，進行下面的設立：（1） 選擇窗格形狀在屬性窗口里選擇通用標簽，在樣式列表框里選擇多窗格（缺省形式）或單窗格簡樸文本形式。（2） 添加或刪除狀態欄窗格在屬性窗口里選擇窗格標簽，單擊插入窗格按鈕添加一種窗格，或單擊刪除窗格按鈕刪除一種窗格。（3） 在單窗格里顯示文本 在屬性窗口里選擇通用標簽，在簡樸文本框里輸入想顯示在狀態欄窗格里的文本。用代碼顯示的方式是：StatusBar1.SimpleText = 要顯示的內容（4） 在多窗格里顯示文本或圖形1). 在屬性窗口里選擇窗格標簽，用索引旁的按鈕選擇窗格序號。2). 在文

54、本框里輸入想顯示在狀態欄窗格里的文本。用代碼顯示的方式是：StatusBar1.Panels(x).Text = 要顯示的內容3). 如果想加入圖形，單擊瀏覽按鈕打開一種圖形選擇對話框，選擇想加入的圖形，然后單擊打開按鈕。（5) 編寫代碼如果是一種單窗格狀態欄，當顧客單擊狀態欄時，只需用下面的事件過程來響應：Private Sub StatusBar1_Click() End Sub如果是一種多窗格狀態欄，就需要鑒別顧客單擊的是哪一種窗格，可用下面的事件過程來辨認顧客所單擊的窗格：Private Sub StatusBar1_PanelClick(ByVal Panel As Panel) S

55、elect Case Panel.Index Case 1 Case 2 End SelectEnd Sub3創立工具欄（1）.建立工具欄1） 在工具箱里單擊工具欄圖標，拖到窗體的任何位置，Visual Basic自動將ToolBar移到頂部。再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設立窗口；2） 選擇按鈕標簽，單擊插入按鈕，Visual Basic就會在工具欄上顯示一種空按鈕，反復此步插入多種按鈕；3） 單擊擬定按鈕。如果想把按鈕分組，一方面插入一種分隔的按鈕，再在對話框里將這個按鈕的樣式屬性改為3-Separator。（2） 為工具欄增長圖畫1). 在Visual Basic工具

56、箱里單擊ImageList圖標，并將它拖到窗體的任何位置（位置不重要，由于它總是不可見的），再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設立窗口；2). 選擇圖象標簽，單擊插入圖片，在選定圖形對話框里選擇想使用的位圖或圖標，然后單擊打開按鈕。為每個想添加圖形的工具欄按鈕反復此步。3). 單擊擬定按鈕。4). 進入ToolBar屬性對話框，選擇通用標簽，在圖象列表框里選擇剛剛添加的ImageList控件。5). 選擇按鈕標簽，單擊緊挨Index框的向左或向右箭頭以選擇一種按鈕序號。出目前工具欄最左邊的按鈕序號為1。6). 在Image框里輸入一種數，輸入為1，則顯示剛剛ImageList控

57、件里的第一種圖形，輸入為2，則顯示剛剛ImageList控件里的第二個圖形。7). 為每個按鈕反復第6步， 單擊擬定按鈕，目前Visual Basic就會在工具欄上顯示精美的圖形了。（3）為工具欄添加文本信息在ToolBar屬性對話框中選擇按鈕標簽，在標題框里輸入想顯示在按鈕上的文本。（4）添加ToolTipsToolTips是一種當點到工具按鈕時彈出的小標簽。ToolTips很以便，可以告訴那些新手每個按鈕是干什么用的。在ToolBar屬性對話框中選擇按鈕標簽，在工具提示文本框里輸入想作為ToolTip的文本。（5）編寫代碼雙擊工具欄，如下面的格式輸入代碼就可以了：Private Sub Toolbar1_ButtonClick(ByVal Button As Button) Select Case Button.Index Case 1 Case 2 End SelectEnd SubVB進程條(ProgressBar)和滑塊(Slider)