【正文】 第一章： Visual Basic 概述 Visual Basic 簡(jiǎn)介 ?具有面向?qū)ο蟮目梢暬O(shè)計(jì)工具 ?事件驅(qū)動(dòng)的編程機(jī)制 ?提供了易學(xué)易用的應(yīng)用程序集成開發(fā)環(huán)境 ?結(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言 ?支持多種數(shù)據(jù)庫(kù)的訪問(wèn) ?支持 DDE、 DLL、 OLE 技術(shù) ?完備的 Help 聯(lián)機(jī)幫助功能 1. 面向?qū)ο蟮某绦蛟O(shè)計(jì)方法基礎(chǔ) 2. 2. 對(duì)象及對(duì)象類：動(dòng)作體的邏輯模型，稱為“對(duì)象” 3. 3. 屬性 : 屬性是用來(lái)描述對(duì)象的特性。 4. 4. 方法： 方 法指對(duì)象可以進(jìn)行的動(dòng)作或行為。 VB 對(duì)象具有屬性、方法和事件。屬性是描述對(duì)象的數(shù)據(jù)；方法告訴對(duì)象應(yīng)做的事情；事件是對(duì)象所產(chǎn)生的事情，事件發(fā)生時(shí)可以編寫代碼進(jìn)行處理。 VB 的窗體和控件是具有自己的屬性、方法和事件的對(duì)象?？梢园褜傩钥醋饕粋€(gè)對(duì)象的性質(zhì)，把方法看作對(duì)象的動(dòng)作，把事件看作對(duì)象的響應(yīng)。 日常生活中的對(duì)象，如小孩玩的氣球同樣具有屬性、方法和事件。氣球的屬性包括可以看到的一些性質(zhì)，如它的直徑和顏色。其它一些屬性描述氣球的狀態(tài)（充氣的或未充氣的）或不可見(jiàn)的性質(zhì)，如它的壽命。通過(guò)定義，所有氣球都具有這些屬 性；這些屬性也會(huì)因氣球的不同而不同。 氣球還具有本身所固有的方法和動(dòng)作。如：充氣方法（用氦氣充滿氣球的動(dòng)作），放氣方法（排出氣球中的氣體）和上升方法（放手讓氣球飛走）。所有的氣球都具備這些能力。 1. 1. 3 基于 Windows 環(huán)境下的應(yīng)用程序的工作方式 —— 事件驅(qū)動(dòng) 在傳統(tǒng)的或“過(guò)程化”的應(yīng)用程序中，應(yīng)用程序自身控制了執(zhí)行哪一部分代碼和按何種順序執(zhí)行代碼。從第一行代碼執(zhí)行程序并按應(yīng)用程序中預(yù)定的路徑執(zhí)行，必要時(shí)調(diào)用過(guò)程。 在事件驅(qū)動(dòng)的應(yīng)用程序中，代碼不是按照預(yù)定的路徑執(zhí)行，而是在響應(yīng)不同的事件時(shí) 執(zhí)行不同的代碼片段。事件可以由用戶操作觸發(fā)、也可以由來(lái)自操作系統(tǒng)或其它應(yīng)用程序的消息觸發(fā)、甚至由應(yīng)用程序本身的消息觸發(fā)。這些事件的順序決定了代碼執(zhí)行的順序，因此應(yīng)用程序每次運(yùn)行時(shí)所經(jīng)過(guò)的代碼的路徑都是不同的。 因?yàn)槭录捻樞蚴菬o(wú)法預(yù)測(cè)的，所以在代碼中必須對(duì)執(zhí)行時(shí)的“各種狀態(tài)”作一定的假設(shè)。當(dāng)作出某些假設(shè)時(shí)（例如，假設(shè)在運(yùn)行來(lái)處理某一輸入字段的過(guò)程之前，該輸入字段必須包含確定的值），應(yīng)該組織好應(yīng)用程序的結(jié)構(gòu)，以確保該假設(shè)始終有效（例如，在輸入字段中有值之前禁止使用啟動(dòng)該處理過(guò)程的命令按鈕）。 在執(zhí)行中代碼 也可以觸發(fā)事件。例如，在程序中改變文本框中的文本將引發(fā)文本框的 Change 事件。如果 Change 事件中包含有代碼，則將導(dǎo)致該代碼的執(zhí)行。如果原來(lái)假設(shè)該事件僅能由用戶的交互操作所觸發(fā)，則可能會(huì)產(chǎn)生意料之外的結(jié)果。正因?yàn)檫@一原因，所以在設(shè)計(jì)應(yīng)用程序時(shí)理解事件驅(qū)動(dòng)模型并牢記在心是非常重要的。 在 VB 中事件的調(diào)用形式是 ： Private Sub 對(duì)象名 _事件名 （事件內(nèi)容） End Sub Visual Basic 的集成開發(fā)環(huán)境 VB 集成開發(fā)環(huán)境 (IDE—— Integrated Developing Environment ) 由以下元素組成： 1． 標(biāo)題欄 用于顯示正在開發(fā)或調(diào)試的工程名和系統(tǒng)的工作狀態(tài)（設(shè)計(jì)態(tài)、運(yùn)行態(tài)、中止態(tài)）。 2． 菜單欄 用于顯示所使用的 Visual Basic 命令。 標(biāo)準(zhǔn)菜單包括： 3． 工具欄 在編程環(huán)境下用于快速訪問(wèn)常用命令。缺省情況下，啟動(dòng) VB 后顯示“標(biāo)準(zhǔn)”工具欄，附加的編輯、窗體設(shè)計(jì)和調(diào)試的工具 欄可以從“視圖”菜單上的“工具欄”命令中移進(jìn)或移出。 4． 窗體設(shè)計(jì)器 用來(lái)設(shè)計(jì)應(yīng)用程序的界面。啟動(dòng) VB 后，窗體設(shè)計(jì)器中自動(dòng)出現(xiàn)一個(gè)名為 Form1 的空白窗體，可以在該窗體中添加控件、圖形和圖片等來(lái)創(chuàng)建所希望的外觀，窗體的外觀設(shè)計(jì)好后，從菜單中選擇“文件”→“保存窗體”→在保存對(duì)話框中給出合適的文件名（注意擴(kuò)展名），并選擇所需的保存位置→確定。需要再設(shè)計(jì)另一個(gè)窗體時(shí)，單擊工具欄上的“添加窗體”按鈕即可。 5． 控件（工具）箱 由一組控件按鈕組成，用于設(shè)計(jì)時(shí)在窗體中放置控件。除了缺省的工具箱布局之外，還可以通過(guò)從上下文菜單中選定“添加選項(xiàng)卡”并在結(jié)果選項(xiàng)卡中添加控件來(lái)創(chuàng)建自定義布局。6． 彈出式（上下文） 菜單 在要使用的對(duì)象上單擊鼠標(biāo)右鍵即可打開快捷菜單，其上會(huì)出現(xiàn)與當(dāng)前對(duì)象相關(guān)的經(jīng)常執(zhí)行的操作，以加快操作速度。 7． 工程管理器窗口 用于瀏覽工程中所包含的窗體和模塊，還可以從中查看代碼、查看對(duì)象。 8． 屬性窗口 是 VB 中一個(gè)比較復(fù)雜的窗口，其中列出了對(duì)選定窗體和控件的屬性設(shè)置值。 VB 中正是通過(guò)改變屬性來(lái)改變對(duì)象的特征，如大小、標(biāo)題或顏色 。 9． 對(duì)象瀏覽器 列出工程中有效的對(duì)象，并提供在編碼中漫游的快速方法?？梢允褂谩皩?duì)象瀏覽器”瀏覽在 VB 中的對(duì)象和其它應(yīng)用程序，查看對(duì)那些對(duì)象有 效的方法和屬性，并將代碼過(guò)程粘貼進(jìn)自己的應(yīng)用程序。 １０． 對(duì)象瀏覽器 右擊窗體中的對(duì)象、從工程管理器中點(diǎn)“查看代碼”按鈕。 11．窗體布局窗口 Form Layout window 允許使用表示屏幕的小圖象來(lái)布置應(yīng)用程序中各窗體的位置。 12． 立即、本地和監(jiān)視窗口 這些附加窗口是為調(diào)試應(yīng)用程序提供的，它們只在 IDE 之中運(yùn)行應(yīng)用程序時(shí)才有效。 創(chuàng)建 VB 應(yīng)用程序的一般步驟 一個(gè) VB 程序也稱為一個(gè)工程，由窗體、標(biāo)準(zhǔn)模塊、自定義控件及應(yīng)用所需的環(huán)境設(shè)置組成。開發(fā)步驟一般如下： 1． 創(chuàng)建程序的用戶界面 2． 設(shè)置界面上各個(gè)對(duì)象的屬性 3． 編寫對(duì)象響應(yīng)事件的程序代碼 4． 保存工程 5． 測(cè)試應(yīng)用程序，排除錯(cuò)誤 6． 創(chuàng)建可執(zhí)行程序 ?硬件環(huán)境： 486 以上處理器、 16MB 以上內(nèi)存、 50MB 以上的硬盤空間、 CDROM 驅(qū)動(dòng)器、鼠標(biāo)等 ?軟件環(huán)境： Windows95 或 以上版本 ?初次安裝： 1)啟動(dòng) Windows95 2)插入具有 系統(tǒng)的光盤 3)運(yùn)行 安裝程序 4)選擇 “典型安裝 ”或 “自定義安裝 ”或 “最小安裝 ” ?添加或刪除 部件： 1)插入具有 系統(tǒng)的光盤 2)運(yùn)行 “開始 /設(shè)置 /控制面板 ” 3)雙擊控制面板中的 “添加 /刪除程序 ”圖標(biāo) 4)選擇其中的 “Visual Basic ”選項(xiàng) ?啟動(dòng) ：開始 /程序 /Visual Basic ，雙擊圖標(biāo) ?退出 舉例： 1 啟動(dòng) VB，開始新工程 2 創(chuàng)建程序的用戶截面 3 加入程序代碼 4 保存工程文件 5 運(yùn)行和調(diào)試應(yīng)用程序，檢查并排除程序中的錯(cuò)誤 6 生成可執(zhí)行程序 7 打印窗體和代碼 （ 7）列表框 ( ListBox)：用于列出可供用戶選擇的項(xiàng)目列表。用戶可以從中選擇一個(gè)或多個(gè)項(xiàng)目。 屬性： 名稱：（通常以“ List”作為前綴。） List：列表屬性。用于保存列表的內(nèi)容。 List 實(shí)際上是一個(gè)一維數(shù)組，數(shù)組中元素的值，就是在執(zhí)行時(shí)看到的列表項(xiàng)（ item） 一維數(shù)組： List 中有 5 個(gè)元素， List(0),List(1) List(2) ,List(3) ,List(4) 列表項(xiàng)文本 List (0)=68 List (1)=78 List (2)=88 List (3)=80 List (4)=76 數(shù)組名： List 列表項(xiàng)序號(hào)： 0， 1， 2， 3， 4， （從 0 開始） 列表項(xiàng)文本（數(shù)組元素值）分別為： 68 78 88 80 76 Listcount：列表框內(nèi)所有選項(xiàng)的總數(shù)，也就是 List()數(shù)組元素的總個(gè)數(shù)。 ListIndex：用戶最后單擊的列表項(xiàng)在 List() 數(shù)組中的編號(hào)順序。 （無(wú)選中時(shí)其值為 1） Text： 列表項(xiàng) 的正文。其值為最后選中的列表項(xiàng)的文本。 請(qǐng)記住如下關(guān)系： [對(duì)象名稱． ]List(ListIndex)=Text Columns：列表框顯示形式。設(shè)定 Listbox 的列表項(xiàng)若超過(guò)顯示范圍時(shí)，其卷動(dòng)方式使用垂直滾動(dòng)條或是水平滾動(dòng)條。 取值：０：（默認(rèn)值）使用垂直滾動(dòng)條。逐行顯示列表項(xiàng)，可能有垂直滾動(dòng)條。 1~n ：使用水平滾動(dòng)條。此時(shí)列表框內(nèi)一次可顯示的列數(shù)（ Column）即為 n 值。 MultiSelect：設(shè)定是否允許用戶多重選取對(duì)象的列表項(xiàng) 取值： ０：不能多重選取。（默認(rèn)值） １：簡(jiǎn)易多重選取。（用鼠標(biāo)或空格鍵來(lái)選取，一次一個(gè)） ２：高級(jí)多重選取?？捎茫?shift］ 或 ［ ctrl］ 來(lái)選取。（類似文件選?。? Selected：設(shè)定列表項(xiàng)是否被選取的狀態(tài)。它是一個(gè)與 List 大小相同的數(shù)組。 其中各元素的取值： Ｔ rue ：被選取。 Ｆ alse：不被選取。（默認(rèn)值） Sorted：排序?qū)傩?。設(shè)定列表項(xiàng)是否要照 ASCII 代碼排序。（字母順序） 取值： True ：是 (不區(qū)分大小寫 ) False：否。（默認(rèn)值） 方法：（Ｐ 28） AddItem：添加列表項(xiàng)。 格式： [對(duì)象名稱． ]AddItem 列表項(xiàng)文本 [,插入位置序號(hào) ] 說(shuō)明：１、若不指定位置，則插入到列表項(xiàng)末尾。 ２、新列表項(xiàng)插入后，原來(lái)位置及其后的列表項(xiàng)順序下移。 Clear：刪除列表所有項(xiàng)目。 RemoveItem：刪除列表項(xiàng)。 格式： ［對(duì)象名稱．］ RemoveItem 刪除項(xiàng)序號(hào) 事件： Click ：?jiǎn)螕羰录? Dblick：雙擊事件（使用較少） 應(yīng)掌握： １．如何添加或刪除列表框中的列表項(xiàng)？ 方法一：在設(shè)計(jì)態(tài)：定制 List 屬性。 （向列表中添加列表時(shí)，按［ ctrl］ +[Enter]換行。） 方法二：在程序代碼中：用 AddItem,RemoveItem 等方法進(jìn)行。 ２．如何知道目前用戶所選取的列表項(xiàng)和目前列表框中的列表項(xiàng)數(shù)目？ 用戶目前所選的列表項(xiàng)： Text 的值。 目前列表框中的列表項(xiàng)數(shù)目： ListCount 的值。 （ 8）組合框（ boBox）：將文本框和列表框結(jié)合在一起，在列表框中所選項(xiàng)目的文本會(huì)自動(dòng)填入文本框。（與列表框相比，組合框一次只能選取一個(gè)列表項(xiàng)） 工具箱中的圖標(biāo) P25；在窗體中的形式 屬性： 同 Listbox 有： List, ListCount,ListIndex,Text,Sorted 等等。 Style ：外觀屬性。設(shè)置組合框的類型和功能。 取值：（實(shí)驗(yàn)指導(dǎo)書 P40） 0：（默認(rèn)值）系統(tǒng)將創(chuàng)建一個(gè)帶有下拉式列表框的組合框。 稱為組合下拉式的組合框。它的下拉式窗體不是一直顯示的。 （如 word 中字體大小選擇框）， 此狀態(tài)下用戶可將所內(nèi)容直接輸入到文本框中。 1：系統(tǒng)創(chuàng)建一個(gè)由文本框和列表框直接結(jié)合在一起的簡(jiǎn)單組合框。 稱為組合式的組合框。它的下拉式窗體是一 直顯示的。 如： word 中字體菜單對(duì)話框中的字體、字號(hào)對(duì)話內(nèi)容。 ２：系統(tǒng)創(chuàng)建一個(gè)沒(méi)有文本框的下拉式列表框。單擊列表框右側(cè)的按鈕，文本框才會(huì)顯示出來(lái)。 稱為單純下拉式的組合框。 此狀態(tài)下用戶不可在文本框中輸入，只能在列表中選擇。且下拉式窗體也不是一直顯示的。 Text：文本屬性。其取值為用戶從列表框中選定的文本內(nèi)容或直接輸入文本框中的內(nèi)容。 事件：對(duì)不同類型的組合框，響應(yīng)的事件是不相同的。 對(duì)于０，２類型的組合框：?jiǎn)螕羰录? 對(duì)于 １ 類型的組合框：雙擊事件。 帶有文本框的０ ，１組合框：在編輯文本時(shí)可引發(fā) Change 事件。 說(shuō)明：１、用戶若只需要使用單選的列表框，則可用組合框來(lái)代替。 ２、如何添加或刪除組合框中的列表項(xiàng)？（方法：同列表框） ３、如何知道用戶目前所選取或輸入的列表項(xiàng)是什么？ 由于組合框不允許多重選取，所以，Ｔ ext 屬性值為內(nèi)容； Listindex 屬性值為序號(hào)。 方法： 同列表框。 圖像：（ image） : 主要用于圖像的顯示、放大、縮小等靜態(tài)顯示圖像場(chǎng)合。 圖像框中不能容納其他控件、也不能繪制圖形和顯示文本。而圖片控件框中可以。 圖像在工具箱中的圖標(biāo) P25；在窗體中的形式 屬性： 名稱： visible ：設(shè)置此對(duì)象在執(zhí)行時(shí)是否看得見(jiàn)。 取值： True ：（默認(rèn)值）看得見(jiàn)。 False ：隱藏。 enabled ：可用否。 picture : 設(shè)定圖像框中代表的圖片名稱。 其值在設(shè)定時(shí)的