高等學(xué)校計(jì)算機(jī)基礎(chǔ)教育教材

1、Visual Basic 6.0 程序設(shè)計(jì)v 第一章 Visual Basic程序設(shè)計(jì)概述v 第二章 VB簡(jiǎn)單的程序設(shè)計(jì)v第三章 VB基本語(yǔ)法結(jié)構(gòu)v第四章 VB程序基本控制流程v第五章 數(shù)組v第六章 過(guò)程v第七章 常用控件v第八章 界面設(shè)計(jì)與窗體v 第九章 多窗體v第十章 文件v第十一章 圖形v *第十二章 Visual Basic與數(shù)據(jù)庫(kù).v v *為可選章第一章 Visual Basic程序設(shè)計(jì)概述程序設(shè)計(jì)語(yǔ)言簡(jiǎn)介程序設(shè)計(jì)語(yǔ)言的發(fā)展一、面向機(jī)器的語(yǔ)言一、面向機(jī)器的語(yǔ)言 通常針對(duì)某一種類型的計(jì)算機(jī)和其他設(shè)備而專門(mén)編寫(xiě)的由二進(jìn)制代碼所組成的機(jī)器程序語(yǔ)言，所以這類程序一般可以充分發(fā)揮硬件的潛力，

2、然而與人類的自然語(yǔ)言相差較大，所以面向機(jī)器的程序的可讀性很差；普及越來(lái)越成為軟件發(fā)展的障礙。因此，一種新的面向過(guò)程的程序設(shè)計(jì)方法被提出來(lái)了。二、面向過(guò)程的語(yǔ)言二、面向過(guò)程的語(yǔ)言 用計(jì)算機(jī)能夠理解的邏輯來(lái)描述需要解決的問(wèn)題和解決問(wèn)題的具體方法、步驟。面向過(guò)程的程序設(shè)計(jì)的核心是數(shù)據(jù)結(jié)構(gòu)和算法，其中數(shù)據(jù)結(jié)構(gòu)用來(lái)量化描述需要解決的問(wèn)題，算法則研究如何用更快捷、高效的方法來(lái)組織解決問(wèn)題的具體過(guò)程。面向過(guò)程的程序設(shè)計(jì)語(yǔ)言主要有BASIC、FORTRAN、PASCAL、C等。三、面向?qū)ο蟮恼Z(yǔ)言三、面向?qū)ο蟮恼Z(yǔ)言 面向?qū)ο蟮恼Z(yǔ)言相對(duì)于以前的程序設(shè)計(jì)語(yǔ)言，代表了一種全新的思維模式。它 的一條基本原則是計(jì)算機(jī)程序

3、是由單個(gè)能夠起到子程序作用的單元或?qū)ο蠼M合而成。這種全新的思維模式能夠方便、有效地實(shí)現(xiàn)以往方法所不能企及的軟件擴(kuò)展、軟件管理和軟件使用，使大型軟件的高效率、高質(zhì)量的開(kāi)發(fā)，維護(hù)和升級(jí)成為可能，從而為軟件開(kāi)發(fā)技術(shù)拓展了一片新天地。 面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言主要有VB、VC和JAVA等。Visual Basic的編程特點(diǎn) 1可視化程序設(shè)計(jì) 2. 面向?qū)ο蟮木幊陶Z(yǔ)言 3. 事件驅(qū)動(dòng)的編程機(jī)制1.2 Visual Basic 6.0安裝、啟動(dòng)和退出下面簡(jiǎn)單介紹如何安裝Visual Basic 6.0企業(yè)版。1將Visual Basic 6.0安裝盤(pán)放入光軀中，瀏覽安裝盤(pán)，雙擊“SETUP.EXE” 文件，

4、進(jìn)入安裝向?qū)А?直接點(diǎn)擊“下一步” 按鈕，在“最終用戶協(xié)議”對(duì)話框中仔細(xì)閱讀其協(xié)議，若確實(shí)無(wú)疑義，選中“接受協(xié)議”，再點(diǎn)擊“下一步” 按鈕。3輸入產(chǎn)品的ID號(hào)。4選中“安裝Visual Basic 6.0中文企業(yè)版” ，再點(diǎn)擊“下一步” 按鈕。在彈出的菜單中點(diǎn)擊“繼續(xù)” 按鈕，再點(diǎn)擊“確定” 按鈕，等待片刻。 5一般情況下使用默認(rèn)安裝文件夾即可，當(dāng)然也可以點(diǎn)擊“瀏覽”按鈕自由更改安裝文件夾。6點(diǎn)擊“典型安裝”左邊的圖標(biāo)按鈕，等待拷貝文件。7點(diǎn)擊“重新啟動(dòng)Windows” ，重新啟動(dòng)計(jì)算機(jī)后，在出現(xiàn)的窗體中把“安裝 MSDN”項(xiàng)去掉，再點(diǎn)擊“下一步” 按鈕，再點(diǎn)擊“是”。8直接點(diǎn)擊“下一步” 按

5、鈕 ，把彈出的窗體中的“現(xiàn)在注冊(cè)”項(xiàng)去掉，再點(diǎn)擊“完成”按鈕，即完成了VB的安裝。1.2.2 Visual Basic 6.0的啟動(dòng) 啟動(dòng)Visual Basic 6.0通常有兩種方法： 1雙擊桌面上的圖標(biāo) ，啟動(dòng)Visual Basic 6.0。 2點(diǎn)擊任務(wù)欄上的【開(kāi)始】【程序】【Microsoft Visual Basic 6.0中文版】【Microsoft Visual Basic 6.0中文版】，啟動(dòng)Visual Basic 6.0應(yīng)用程序。1.2.3 Visual Basic 6.0的退出 有兩種方法可以退出Visual Basic 6.0： 1 點(diǎn)擊菜單欄上的【文件】【退出】，退出

6、應(yīng)用程序。 2 直接點(diǎn)擊標(biāo)題欄右上角的“關(guān)閉”按鈕。1.3 Visual Basic 6.0集成開(kāi)發(fā)環(huán)境（IDE，Integrated Development Environment ） 窗口介紹一一.主窗口主窗口代碼窗口工具箱窗體窗口窗體布局屬性窗口工程資源管理器菜單欄工具欄任務(wù)欄下面對(duì)集成開(kāi)發(fā)環(huán)境中的各元素作簡(jiǎn)要介紹。1標(biāo)題欄用來(lái)顯示窗口的標(biāo)題。2主菜單主菜單欄中含了使用VB6.0所需要的命令。主菜單中共有13個(gè)菜單項(xiàng)，每個(gè)菜單項(xiàng)都有一個(gè)下拉菜單，內(nèi)含若干個(gè)菜單命令，單擊某個(gè)菜單項(xiàng)，即可打開(kāi)該菜單，單擊某個(gè)菜單中的某一條，就執(zhí)行相應(yīng)的命令。3上下文菜單上下文菜單沒(méi)有顯式地出現(xiàn)在集成開(kāi)發(fā)環(huán)境

7、中。在對(duì)象上單擊鼠標(biāo)右鍵即可打開(kāi)上下文菜單。在上下文菜單中列出的操作選項(xiàng)清單取決于單擊鼠標(biāo)右鍵所在環(huán)境。4工具欄以圖標(biāo)按鈕的形式提供了常用的菜單命令。單擊工具欄上的按鈕，則執(zhí)行該按鈕所代表的操作。按照缺省規(guī)定，啟動(dòng)VB之后顯示“標(biāo)準(zhǔn)”工具欄?！皹?biāo)準(zhǔn)”工具欄各按鈕的作用如圖所示。1窗體窗口窗體窗口 “窗體窗口”也稱為“對(duì)象窗口”，主要用來(lái)在窗體上設(shè)計(jì)應(yīng)用程序的界面，用戶可以在窗體上添加控件來(lái)創(chuàng)建所希望的界面外觀。例如，當(dāng)新建一個(gè)工程時(shí)，VB自動(dòng)建立一個(gè)新窗體，并命名為Form1，如圖所示。二二.其他窗口其他窗口2代碼代碼(code)窗口窗口 雙擊窗體或窗體上的控件就可以彈出代碼窗口。代碼窗口是專

8、門(mén)用來(lái)進(jìn)行程序設(shè)計(jì)的窗口，可在其中顯示和編輯程序代碼（如圖1-11所示）。也可以通過(guò)點(diǎn)擊菜單欄上的【視圖】【代碼窗口】，調(diào)出代碼窗口。 代碼窗口標(biāo)題欄下面有兩個(gè)下拉列表框，左邊是“對(duì)象”下拉列表框，可以選擇不同的對(duì)象名稱；右邊是“過(guò)程”下拉列表框，可以選擇不同的事件過(guò)程名稱，還可以選擇用戶自定義過(guò)程的名稱。標(biāo)題欄過(guò)程下拉列表框?qū)ο笙吕斜砜虺绦蚓庉媴^(qū)域3屬性窗口屬性窗口屬性是指對(duì)象（窗體或控件）的特征，如大小、名稱、標(biāo)題、顏色、位置等。屬性窗口列出了被選定的一個(gè)對(duì)象的所有屬性。如圖，屬性窗口包含對(duì)象下拉列表框、屬性列表和屬性說(shuō)明欄。對(duì)象下拉列表框?qū)ο笙吕斜砜蚺判蜻x項(xiàng)卡排序選項(xiàng)卡屬性列表屬性列

9、表屬性說(shuō)明欄屬性說(shuō)明欄4工程資源管理器窗口工程資源管理器窗口首先說(shuō)明一下“工程”的概念。VB把一個(gè)應(yīng)用程序稱為一個(gè)工程（Project），而一個(gè)工程又是各種類型的文件的集合，這些文件包括工程文件（.vbp）、窗體文件（.frm）、標(biāo)準(zhǔn)模塊文件（.bas）、類模塊文件（.cls）、資源文件（.res）、ActiveX 文檔（.dob）、ActiveX 控件（.ocx）、用戶控件文件（.ctl）、 屬性頁(yè)文件（.pag）。 需要指出的是，并不是每一個(gè)工程都要包括上述所有文件，VB 要求一個(gè)工程至少包含兩個(gè)文件，即工程文件（.vbp）和窗體文件（.frm）。至于一個(gè)工程要包括多少種文件，由程序設(shè)計(jì)的

10、復(fù)雜程度而定。 一個(gè)工程可以通過(guò)“工程窗口”來(lái)顯示，工程窗口列出了當(dāng)前工程所包含的文件清單。如圖是啟動(dòng)VB后建立的一個(gè)最簡(jiǎn)單工程的結(jié)構(gòu)。5工具箱窗口工具箱窗口工具箱提供了一組在設(shè)計(jì)時(shí)可以使用的常用工具，這些工具以圖標(biāo)的形式排列在工具箱中，如后圖所示。這些工具就像制作機(jī)械零件的模具一樣。利用模具可以做出零件，利用工具箱中工具可以做出控件。雙擊工具箱中的某個(gè)工具圖標(biāo)，或單擊工具圖標(biāo)后按住鼠標(biāo)左鍵在窗體上拖動(dòng)，即可在窗體上做出一個(gè)這種控件。設(shè)計(jì)人員在設(shè)計(jì)階段可以利用這些工具在窗體上構(gòu)造出所需要的應(yīng)用程序界面。除了系統(tǒng)提供的這些標(biāo)準(zhǔn)工具外，VB還允許用戶添加新的控件工具。如圖所示，窗體布局窗口中有一個(gè)

11、表示顯示器屏幕的圖像，屏幕圖像上又有表示窗體的圖像，它們標(biāo)示了程序運(yùn)行時(shí)窗體在屏幕中的位置。用戶可拖動(dòng)窗體圖像調(diào)整其位置。6 窗體布局窗口窗體布局窗口工程管理與環(huán)境設(shè)置1.VB的三種工作模式的三種工作模式主窗體的標(biāo)題欄上顯示了Visual Basic的三種工作模式：設(shè)計(jì)、中斷與運(yùn)行模式。1設(shè)計(jì)模式在創(chuàng)建一個(gè)新的工程或打開(kāi)一個(gè)已有工程時(shí)，首先進(jìn)入的是“設(shè)計(jì)”模式，標(biāo)題欄上顯示“設(shè)計(jì)”字樣。在這個(gè)模式下，可以設(shè)計(jì)應(yīng)用程序界面和編輯程序代碼。 2運(yùn)行模式編好一個(gè)程序后，可以點(diǎn)擊標(biāo)準(zhǔn)工具欄上的 按鈕運(yùn)行程序。這時(shí)標(biāo)題欄上顯示“運(yùn)行”字樣。注意：在運(yùn)行模式下，菜單是不可用的，只有在“設(shè)計(jì)”模式下才可以使

12、用所有菜單項(xiàng)。所以如果要回到“設(shè)計(jì)”模式，必須點(diǎn)擊標(biāo)準(zhǔn)工具欄上的 按鈕，切換到“設(shè)計(jì)”模式。 3中斷模式 如果程序在運(yùn)行時(shí)出現(xiàn)錯(cuò)誤，或者點(diǎn)擊標(biāo)準(zhǔn)工具欄上的 按鈕，就進(jìn)入到“中斷”模式，這時(shí)標(biāo)題欄上顯示“中斷”字樣，可以在代碼窗口中修改程序代碼。完成修改后，可以點(diǎn)擊 按鈕繼續(xù)運(yùn)行程序，或點(diǎn)擊 按鈕，切換到“設(shè)計(jì)”模式。 2、工程的組成、工程的組成 應(yīng)用程序建立在工程的基礎(chǔ)之上，一個(gè)工程是各種類型文件的集合，它包括工程文件（Vbp）、窗體文件（Frm）、標(biāo)準(zhǔn)模塊文件（Bas）、類模塊文件（Cls）、資源文件（Res）和ActiveX的文件（Ocx）。1工程文件 存儲(chǔ)了與該工程有關(guān)的所有文件和對(duì)象的

13、清單，這些文件和對(duì)象自動(dòng)鏈接到工程文件上，每次保存工程時(shí)，其相關(guān)文件信息也隨之更新。當(dāng)然，某個(gè)工程下的對(duì)象和文件也可供其他工程共享使用。在工程的所有對(duì)象和文件被匯聚在一起并完成編碼后，就可以編譯工程，生成可執(zhí)行文件。2窗體文件 存儲(chǔ)了窗體上使用的所有控件對(duì)象、對(duì)象的屬性、對(duì)象相應(yīng)的事件工程和程序代碼。一個(gè)應(yīng)用程序至少包含一個(gè)窗體文件。3標(biāo)準(zhǔn)模塊文件 存儲(chǔ)了所有模塊級(jí)變量和用戶自定義的通用過(guò)程。通用過(guò)程是指可以被應(yīng)用程序各處調(diào)用的過(guò)程。4類模塊文件 用來(lái)建立用戶自己的對(duì)象。類模塊包含用戶對(duì)象的屬性及方法，但不包含事件代碼。 3、創(chuàng)建、打開(kāi)和保存工程、創(chuàng)建、打開(kāi)和保存工程1創(chuàng)建工程第一步，點(diǎn)擊任務(wù)

14、欄上的【開(kāi)始】【程序】【Microsoft Visual Basic 6.0中文版】【Microsoft Visual Basic 6.0中文版】，啟動(dòng)Visual Basic 6.0應(yīng)用程序。第二步，在“新建工程”選項(xiàng)卡中選擇“標(biāo)準(zhǔn)EXE”（如圖1-15所示），點(diǎn)擊“確定”，則新建了一個(gè)工程，默認(rèn)的名稱為“工程1”。2打開(kāi)工程對(duì)已有的工程可以使用以下兩種方式打開(kāi)： 找到工程文件并雙擊。 啟動(dòng)Visual Basic 6.0后，在彈出的菜單中點(diǎn)擊“取消”。點(diǎn)擊菜單欄上的【文件】【打開(kāi)工程】，定位文件所在的路徑，選擇要打開(kāi)的工程文件圖標(biāo)，點(diǎn)擊“打開(kāi)”，便可打開(kāi)一個(gè)工程。3保存工程點(diǎn)擊菜單欄上的【

15、文件】【保存工程】，如果是新建的工程會(huì)彈出“文件另存為”對(duì)話框。首先要保存的是窗體文件，后綴名為“frm”，選擇要保存的文件路徑，并給窗體文件命名，默認(rèn)文件名為“Form1”，也可以自定義名稱，點(diǎn)擊“保存”。然后保存工程，后綴名為“vbp”，選擇要保存的文件路徑，并給工程文件命名，默認(rèn)文件名為“工程1”，也可以自定義名稱，點(diǎn)擊“保存”。 例1-1在窗體上有一個(gè)按鈕，顯示“歡迎”字樣。按下“歡迎”按鈕時(shí)，在標(biāo)簽中顯示“歡迎學(xué)習(xí)Visual Basic！”。操作步驟：第一步，單擊工具箱中的CommandButton按鈕，在Form1窗體中拖曳鼠標(biāo)，制作一個(gè)按鈕，然后可以通過(guò)拖曳鼠標(biāo)來(lái)調(diào)整按鈕的大小

16、和位置，按鈕的缺省名稱為“Command1”。用同樣的方法，在窗體中添加一個(gè)標(biāo)簽（Label1）。第二步，選中按鈕“Command1”，在屬性窗口（如圖1-12所示）中，單擊屬性列表框中的Caption屬性值文本框，輸入“歡迎”文字。選中標(biāo)簽Label1，單擊屬性列表框中的BorderStyle屬性，將屬性值改成“1-Fixed Single”。第三步，雙擊窗體，在彈出的代碼窗口中輸入以下代碼： Private Sub Command1_Click() Label1.Caption = 歡迎學(xué)習(xí)Visual Basic！ End Sub第四步，點(diǎn)擊工具欄上的按鈕，運(yùn)行程序。一個(gè)簡(jiǎn)單的VB程序就

17、這樣完成了，如果您對(duì)這個(gè)例子不太理解沒(méi)有關(guān)系，我們將在后面的章節(jié)中再做詳細(xì)的解釋。例例1-1運(yùn)行結(jié)果運(yùn)行結(jié)果:四、添加、刪除和保存窗體、工程四、添加、刪除和保存窗體、工程1添加窗體 右鍵單擊工程資源管理器窗口中的工程名（如圖1-21所示），在彈出的快捷菜單中點(diǎn)擊【添加】【添加窗體】。在彈出的對(duì)話框中選擇所要添加的窗體的類型（如圖1-22所示），點(diǎn)擊“打開(kāi)”，添加了一個(gè)空白窗體。2刪除窗體 右鍵單擊工程資源管理器窗口中的窗體程名，在彈出的快捷菜單中點(diǎn)擊“移除form1”。3保存窗體 在工程資源管理器窗口中，單擊要保存的窗體名稱，點(diǎn)擊菜單欄上的【文件】【保存form1】。4添加工程 點(diǎn)擊菜單欄上的

18、【文件】【添加工程】（如圖1-24所示），選擇工程的類型，點(diǎn)擊“打開(kāi)” 按鈕，添加了一個(gè)新工程。 5刪除工程 在工程資源管理器窗口中，單擊要?jiǎng)h除的工程名稱，點(diǎn)擊菜單欄上的【文件】【移除工程】，可將工程刪除。6保存工程 在工程資源管理器窗口中，單擊要保存的工程名稱，點(diǎn)擊菜單欄上的【文件】【保存工程】。5、環(huán)境設(shè)置1“編輯器”選項(xiàng)卡點(diǎn)擊菜單欄上的【工具】【選項(xiàng)】，選擇“編輯器”選項(xiàng)卡?！熬庉嬈鳌边x項(xiàng)卡部分選項(xiàng)說(shuō)明： 自動(dòng)語(yǔ)法檢測(cè)：在編寫(xiě)程序代碼時(shí)，如果出現(xiàn)語(yǔ)法錯(cuò)誤，VB會(huì)自動(dòng)找出錯(cuò)誤，并顯示成紅色。 自動(dòng)列出成員：使編寫(xiě)代碼更方便，在輸入對(duì)象名稱再加“.”后，VB 會(huì)自動(dòng)列出所有和該對(duì)象相關(guān)的屬性

19、、方法。 顯示數(shù)據(jù)提示：調(diào)試時(shí)使用，將鼠標(biāo)停留在要顯示數(shù)據(jù)的變量上，可以顯示該變量的值。 過(guò)程分隔符：在代碼編輯窗口中，VB在各過(guò)程之間用“”分隔開(kāi)來(lái)。2通用選項(xiàng)卡點(diǎn)擊菜單欄上的【工具】【選項(xiàng)】，選擇“通用”選項(xiàng)卡。通用選項(xiàng)卡部分選項(xiàng)說(shuō)明： 顯示網(wǎng)格：在窗體上顯示網(wǎng)格狀的小點(diǎn)，選擇該選項(xiàng)后，可以通過(guò)改變“寬度”和“高度”值來(lái)改變窗體上點(diǎn)的疏密程度（注意：窗體上的點(diǎn)越密，調(diào)整控件在窗體上的位置可以越精確）。 對(duì)齊控件到網(wǎng)格：使控件在窗體上與某個(gè)小點(diǎn)對(duì)齊，而不會(huì)落在兩個(gè)小點(diǎn)之間，使控件容易對(duì)齊。 顯示工具提示：當(dāng)鼠標(biāo)停留在工具箱的某個(gè)圖標(biāo)上時(shí)，顯示該圖標(biāo)所代表的控件的名稱。 第二章 建立簡(jiǎn)單的VB

20、應(yīng)用程序類和對(duì)象類和對(duì)象對(duì)象和類對(duì)象和類對(duì)象是對(duì)現(xiàn)實(shí)世界問(wèn)題的描述。對(duì)象本身就是具有知識(shí)和處理能力并且相對(duì)獨(dú)立的單位，現(xiàn)實(shí)世界的任何事物都可以看作對(duì)象，如汽車、衣服、房子等。類是用來(lái)創(chuàng)建對(duì)象的模板，包含所創(chuàng)建的對(duì)象的狀態(tài)描述和方法定義，對(duì)象是類的一個(gè)實(shí)例。在VB的集成開(kāi)發(fā)環(huán)境中，“工具箱”中的每一個(gè)控件都可以看作是一個(gè)類，選中一個(gè)控件在窗體上拖放鼠標(biāo)，可以設(shè)計(jì)出按鈕、標(biāo)簽和圖形框等不同元素，這些是由類創(chuàng)建的對(duì)象。對(duì)象的屬性、事件和方法對(duì)象的屬性、事件和方法一一.對(duì)象屬性對(duì)象屬性 屬性是反應(yīng)對(duì)象的特征，也就是說(shuō)屬性中存放著對(duì)象的數(shù)據(jù)。對(duì)象常見(jiàn)的屬性有名稱（Name）、標(biāo)題（Caption）、字體

21、（FontName）等。可以在屬性窗口可以設(shè)置屬性，步驟為： 1.選擇要設(shè)置屬性的對(duì)象 2.激活屬性窗口 3.選擇屬性名稱 4.設(shè)置屬性值設(shè)置屬性值的方式有兩種：設(shè)置屬性值的方式有兩種：a.在屬性窗口設(shè)置在屬性窗口設(shè)置(1)直接輸入新值 某些屬性如Caption、Text需要由用戶輸入。如設(shè)置標(biāo)簽對(duì)象的Caption值 (2)選擇輸入 某些屬性的值是VB預(yù)先設(shè)好的只能從其中進(jìn)行選擇，如DrawStyle、FillStyle等，這些取值可能只有兩種、幾種，這樣的屬性只能在下拉列表中選擇。 (3)利用對(duì)話框設(shè)置 某些屬性如Picture、Font等，在設(shè)置框的右端會(huì)顯示省略號(hào)按鈕，單擊這個(gè)按鈕會(huì)彈

22、出相應(yīng)的對(duì)話框用來(lái)設(shè)置對(duì)象屬性。如圖2-4所示設(shè)置字體屬性。b.在程序運(yùn)行時(shí)設(shè)置在程序運(yùn)行時(shí)設(shè)置 語(yǔ)法格式：語(yǔ)法格式： 對(duì)象名對(duì)象名.屬性名屬性名=屬性值屬性值二二. 對(duì)象事件對(duì)象事件事件是VB預(yù)先設(shè)置好的，可以被對(duì)象識(shí)別的動(dòng)作，不同的對(duì)象能夠識(shí)別的事件不一樣。在對(duì)象上發(fā)生了事件后，應(yīng)用程序就要處理這個(gè)事件，這樣一段應(yīng)用程序代碼叫做事件過(guò)程（Event Procedure）。VB程序設(shè)計(jì)的工作就是編寫(xiě)事件過(guò)程中的代碼。事件過(guò)程的形式如下：Private Sub 對(duì)象名_事件（）對(duì)象程序代碼End Sub “對(duì)象名”是指對(duì)象屬性中的Name屬性值，“事件”是VB預(yù)先設(shè)置好的，在建立對(duì)象后，VB能

23、自動(dòng)確定與該對(duì)象相匹配的事件，并可顯示出來(lái)提供給用戶選擇。例如，單擊Picture1圖形框，打印出“歡迎使用VB！”字樣，則對(duì)應(yīng)的事件過(guò)程為：Private Sub Picture1_Click() Picture1.Print 歡迎使用VB！End Sub【注意】用戶在對(duì)一個(gè)對(duì)象發(fā)出動(dòng)作時(shí)，可能會(huì)對(duì)該對(duì)象激發(fā)多個(gè)事件，如用戶執(zhí)行了單擊動(dòng)作，會(huì)同時(shí)觸發(fā)Click、MouseDown事件。這時(shí)只要去編寫(xiě)自己需要的事件如Click，沒(méi)有代碼的空事件系統(tǒng)不會(huì)執(zhí)行。三三. 對(duì)象方法對(duì)象方法在面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言中，為程序設(shè)計(jì)人員提供了一種特殊的函數(shù)和過(guò)程，我們稱之為方法（Method）。VB將這些通

24、用的過(guò)程和函數(shù)已經(jīng)編寫(xiě)好代碼并將其封裝，讓用戶作為方法直接調(diào)用，這樣避免了用戶重復(fù)編寫(xiě)大量代碼。和屬性及事件一樣，方法是特定對(duì)象的一部分，其調(diào)用格式為：對(duì)象名對(duì)象名. 方法方法 參數(shù)名表參數(shù)名表若省略對(duì)象名，則表示為當(dāng)前對(duì)象，一般指窗體本身。如：Picture1.Print Hello VB6.0此語(yǔ)句使用Print方法在Picture1圖形框上打印“Hello VB6.0”，如果語(yǔ)句為：Print Hello VB6.0在窗體上打印“Hello VB6.0”。2.2編寫(xiě)簡(jiǎn)單的編寫(xiě)簡(jiǎn)單的VB程序程序使用VB開(kāi)發(fā)應(yīng)用程序需要以下幾步驟：1建立可視化用戶界面2設(shè)置對(duì)象屬性3編寫(xiě)代碼 4保存工程5調(diào)

25、試應(yīng)用程序，排除錯(cuò)誤6創(chuàng)建可執(zhí)行程序2.2.1 設(shè)計(jì)用戶界面設(shè)計(jì)用戶界面1向窗體上添加控件 向窗體上添加控件有兩種方法： 雙擊工具箱中的控件圖標(biāo)，該控件即自動(dòng)添加到了窗體的中央。 單擊工具箱中的控件圖標(biāo)，然后將鼠標(biāo)指針移到窗體上，鼠標(biāo)指針變成十字型，在窗體上需要放控件的位置拖動(dòng)鼠標(biāo)畫(huà)出想要的尺寸，然后釋放鼠標(biāo)，即可在窗體上畫(huà)出該控件。2對(duì)窗體上的控件進(jìn)行調(diào)整對(duì)窗體上的控件進(jìn)行調(diào)整的基本操作如下： （1）選中控件 （2）調(diào)整控件大小及位置22.22.2 2 設(shè)置屬性設(shè)置屬性 利用屬性窗口，可為界面中的對(duì)象（窗體或控件）設(shè)置相應(yīng)的屬性。打開(kāi)屬性窗口可用以下4種方法：（1）選“視圖”菜單中的“屬性窗

26、口”。（2）按F4鍵。（3）單擊工具欄上的“屬性”按鈕。（4）使用對(duì)象的上下文菜單。 在屬性窗口中所進(jìn)行的是屬性初始值的設(shè)置，用戶也可在程序中對(duì)他們進(jìn)行設(shè)置和修改。22.22.3 3 編寫(xiě)代碼編寫(xiě)代碼為了使應(yīng)用程序具有一定的功能，還必須為對(duì)象編寫(xiě)實(shí)現(xiàn)某一功能的程序代碼，編寫(xiě)程序代碼要在“代碼窗口”進(jìn)行。打開(kāi)代碼窗口可用以下4種方法：（1）雙擊對(duì)象。（2）選“視圖”菜單中的“代碼窗口”。（3）使用對(duì)象的上下文菜單。（4）在工程窗口單擊查看代碼圖標(biāo)。 VB代碼書(shū)寫(xiě)格式比較自由。代碼不區(qū)分字母的大小寫(xiě)，一行允許多達(dá)255個(gè)字符。通常一行寫(xiě)一條語(yǔ)句，這樣程序看起來(lái)比較清晰。在同一行上也可寫(xiě)多個(gè)語(yǔ)句，這

27、時(shí)語(yǔ)句間用冒號(hào)“：”分隔。例如，a=4：b=5：c=6。單行語(yǔ)句也可分若干行書(shū)寫(xiě)，要使用一個(gè)空格后跟一個(gè)下劃線作續(xù)行符，如下所示： dim a as single，b as single，c as single _ d as single，e as single例2-1建立一個(gè)簡(jiǎn)單的應(yīng)用程序，用于在圖形框介紹“丁香”的功能與特點(diǎn)。建立如圖所示的用戶界面：按照表設(shè)置屬性值：屬性值設(shè)置完畢后的用戶界面為：控件名標(biāo)題（Caption）字號(hào)（FontSize）Form1丁香12Label1丁香小四Picture1小四Option1特點(diǎn)小四Option2功能小四Command1退出小四（1）單擊“對(duì)象”

28、右邊的下來(lái)菜單，選擇Option1（2）單擊“過(guò)程”列表右邊的下拉菜單，選擇Click事件。 輸入如下代碼： Private Sub Option1_Click() Picture1.Cls Picture1.Print 質(zhì)堅(jiān)實(shí)而重，入水即沉，斷面有油性. End Sub選擇對(duì)象Option2和事件Click輸入如下代碼： Private Sub Option2_Click() Picture1.Cls Picture1.Print 治呃逆，嘔吐，反胃，瀉痢，心腹冷等 End Sub選擇對(duì)象Command1和Click事件輸入如下代碼： Private Sub Command1_Click()

29、 End End Sub2.2.4 保存和運(yùn)行調(diào)試工程、生成EXE文件1保存工程選“文件”菜單中的“保存工程”或單擊工具欄中的“保存”按鈕即可。2運(yùn)行調(diào)試工程運(yùn)行工程，盡可能地發(fā)現(xiàn)程序中存在的錯(cuò)誤和問(wèn)題，排除錯(cuò)誤、解決問(wèn)題。運(yùn)行工程可用以下3種方法：（1）選擇“運(yùn)行”菜單中的“啟動(dòng)”。（2）單擊工具欄中的“啟動(dòng)”按鈕。（3）按F5鍵。一般來(lái)講，程序很少能一次運(yùn)行通過(guò)，這是因?yàn)槌绦蛑杏羞@樣那樣的錯(cuò)誤，這是由它反映的實(shí)際問(wèn)題的復(fù)雜性，及程序本身邏輯結(jié)構(gòu)的復(fù)雜性決定的。 程序中的錯(cuò)誤可分為3類：（1）編譯錯(cuò)誤。（2）運(yùn)行錯(cuò)誤。（3）邏輯錯(cuò)誤。 3生成EXE文件2.3.1 窗窗 體體 創(chuàng)建VB應(yīng)用程序

30、的第一步是創(chuàng)建用戶界面。用戶界面的基礎(chǔ)是窗體，各種控件對(duì)象必須建立在窗體上。 啟動(dòng)VB后，即在屏幕上顯示一個(gè)窗體。窗體及基本的內(nèi)部控件窗體及基本的內(nèi)部控件窗體控制菜單框窗體控制菜單框窗體控制菜單框標(biāo)題欄最小化按鈕最大化按鈕關(guān)閉按鈕窗體的屬性決定了窗體的外觀和操作。窗體的大部分屬性可用兩種方法來(lái)設(shè)置：通過(guò)屬性窗口設(shè)置和通過(guò)程序代碼設(shè)置。有少量的屬性不能在程序代碼中設(shè)置。（1） Appearance屬性 該屬性決定窗體的外觀效果，屬性值為0為平面效果，屬性值為1為立體效果。（2） Caption屬性 用于設(shè)置窗體標(biāo)題欄顯示的內(nèi)容，它的值為字符串。系統(tǒng)默認(rèn)的Caption值為Form1。（3） Ic

31、on屬性 用于設(shè)置當(dāng)窗體最小化時(shí)以該圖標(biāo)顯示，如果不設(shè)置則以VB默認(rèn)圖標(biāo)顯示。設(shè)置方法為，單擊Icon屬性設(shè)置右邊的“”，打開(kāi)“加載圖標(biāo)”對(duì)話框，選擇圖標(biāo)文件裝入。（4） ControlBox屬性 當(dāng)其值為T(mén)rue時(shí)左上角有控制菜單，當(dāng)為False時(shí)為無(wú)控制菜單框。 （5）MaxButton 屬性和 MinButton 屬性 MaxButton屬性為T(mén)rue，窗體右上角有最大化按鈕；為False時(shí)，無(wú)最大化按鈕。MinButton屬性為T(mén)rue，窗體右上角有最小化按鈕；為False時(shí)，無(wú)最小化按鈕。（一）窗體的主要屬性（6）BorderStyle 屬性 決定窗體邊框式樣及窗體是否能調(diào)整大小。（

32、7）BackColor屬性和ForeColor 屬性 BackColor屬性設(shè)置窗體的背景顏色，F(xiàn)orColor 屬性設(shè)置窗體的前景顏色。窗體的前景顏色是執(zhí)行Print方法時(shí)所顯示文本的顏色。（8）Height屬性和Width屬性 設(shè)置窗體的初始高度和寬度。其單位為T(mén)wip。 1Twip=1/20點(diǎn)=1/1440英寸=1/567cm。（9）Left屬性和Top屬性 用于設(shè)置窗體左邊框距屏幕左邊界的距離和窗體頂邊距屏幕頂端的距離。其單位為T(mén)wip。（10）Name（名稱）屬性 設(shè)置窗體的名稱，在程序代碼中用這個(gè)名稱引用該窗體。新建工程時(shí)，窗體的名稱缺省為 Form1；添加第二個(gè)窗體，其名稱缺省為

33、 Form2，依次類推。為了便于識(shí)別，用戶通常給 Name 屬性設(shè)置一個(gè)有實(shí)際意義的名稱。（11）Enabled屬性 屬性值為T(mén)rue或False，設(shè)置對(duì)象是否能夠?qū)τ脩舢a(chǎn)生的事件做出反應(yīng)。一般在程序中設(shè)置，用于臨時(shí)屏蔽對(duì)窗體或其它控件的的控制。（12）Moveable屬性 屬性值為T(mén)rue或False，設(shè)置是否可以移動(dòng)窗體。（13）Visible屬性 屬性值為T(mén)rue或False，設(shè)置窗體是否被顯示。用戶可用該屬性在程序代碼中控制窗體的隱現(xiàn)。 （14）Picture屬性 設(shè)置在窗體中顯示的圖片。單擊Picture屬性右邊的按鈕，彈出“加載圖片”對(duì)話框，用戶可選擇一個(gè)圖片文件作為窗體的背景圖片

34、。若在程序中設(shè)置該屬性的值，需要使用LoadPicture函數(shù)。（15）WindowState屬性 設(shè)置窗體啟動(dòng)后的大小狀態(tài)。 在VB中，雖然不同的對(duì)象有不同的屬性集合，但有一些屬性，如Name 、Enabled、Visible、Height、Width、Left、Top等，其它控件也有，且具有相似的作用。在后續(xù)的章節(jié)中，主要介紹各種控件常用的特殊屬性。（二） 事件窗體最常用的事件有3種：Click（單擊）、DbClick（雙擊）、Load（裝入）。1Click事件程序運(yùn)行后，單擊窗體觸發(fā)該事件。2DbClick事件程序運(yùn)行后，雙擊窗體觸發(fā)該事件。3Load事件Load事件是窗體被裝入內(nèi)存工作

35、區(qū)時(shí)觸發(fā)的事件。如果這個(gè)事件過(guò)程存在，就馬上執(zhí)行它。Load事件過(guò)程通常用于啟動(dòng)程序時(shí)，對(duì)屬性、變量的初始化以及裝載數(shù)據(jù)等。（三）方法（三）方法窗體上常用的方法有Print和Cls方法。1.Print方法 Print 方法的語(yǔ)法是： 對(duì)象名對(duì)象名.PrintSpc(n)|Tab(n)表達(dá)式列表表達(dá)式列表；|，2. Cls方法 Cls方法的語(yǔ)法格式： 對(duì)象名對(duì)象名 .Cls 其中對(duì)象可以是Form或PictureBox，如果省略，通常Visual Basic都把當(dāng)前的窗口作為Cls操作的對(duì)象。例2-2利用Print方法打印出如圖2-15所示的圖形，并使用Cls方法將打印出來(lái)的圖形清除。在用戶界面

36、上放置一個(gè)命令按鈕，在代碼窗口直接設(shè)計(jì)程序如下：Private Sub Command1_Click()Form1.ClsEnd SubPrivate Sub Form_Click()Print Print “ Print Print Print Print Print Print Print End Sub程序運(yùn)行結(jié)果如圖所示。例2-3 設(shè)計(jì)一個(gè)窗體， 用于測(cè)試鼠標(biāo)的單擊與雙擊的反應(yīng)。直接在代碼窗口輸入程序代碼如下： Private Sub Form_Load() Caption = 加載窗體結(jié)果 AutoRedraw = True Picture = LoadPicture(App.Pat

37、h + bg1.jpg) FontSize = 40 FontName = 隸書(shū) ForeColor = vbGreen Print Load事件 End Sub Private Sub Form_Click() Caption = 鼠標(biāo)單擊 Print 鼠標(biāo)單擊 End Sub Private Sub Form_DblClick() Caption = 鼠標(biāo)雙擊 Picture = LoadPicture() Print 鼠標(biāo)雙擊 End Sub2.3.2 標(biāo)標(biāo) 簽簽 標(biāo)簽（Label）主要用于顯示不需要用戶修改的文本。所以，標(biāo)簽可以用來(lái)標(biāo)示窗體及窗體上的對(duì)象，如為文本框、列表框等添加描述性

38、的文字，或者作為窗體的說(shuō)明文字。（一） 屬性1Caption屬性 設(shè)置標(biāo)簽要顯示的內(nèi)容。它是標(biāo)簽的主要屬性。2BorderStyle屬性 默認(rèn)值為0，標(biāo)簽無(wú)邊框；設(shè)置為1時(shí)，標(biāo)簽有立體邊框。3Autosize屬性 該屬性用于設(shè)置標(biāo)簽是否自動(dòng)改變尺寸以適應(yīng)其內(nèi)容。4Alignment屬性 確定標(biāo)簽中內(nèi)容的對(duì)齊方式。5BackStyle屬性 該屬性用于設(shè)置背景是否透明。（二）事件（二）事件 標(biāo)簽的主要事件有：Click、DblClick和Change事件。但是一般標(biāo)簽用于顯示輸出信息，不需編寫(xiě)事件過(guò)程。例2-4 利用標(biāo)簽控件，制作具有陰影效果的文字，如圖所示該例題的設(shè)計(jì)主要是對(duì)兩個(gè)標(biāo)簽對(duì)象的屬性設(shè)

39、置，參見(jiàn)下表：。默認(rèn)控件BackStyleForeColorLeftTopLabel10Transparent&H00000000 &黑720240Label20Transparent&H00FFFFFF&白8002802.3.3 命令按鈕命令按鈕在VB應(yīng)用程序中，命令按鈕是使用最多的對(duì)象之一，常常用它接受用戶的操作信息，觸發(fā)相應(yīng)的事件過(guò)程，以實(shí)現(xiàn)指定的功能。（一） 屬性1Caption屬性 設(shè)定命令按鈕上顯示的文本。2Default屬性 該屬性用于設(shè)置默認(rèn)命令按鈕。3Style屬性和Picture屬性 命令按鈕上除了可以顯示文字外，還可以顯示圖形。若要顯示圖形，首先應(yīng)將Style 屬性設(shè)置為

40、1，然后在Picture屬性中設(shè)置要顯示的圖形文件。4Value屬性 該屬性只能在程序運(yùn)行期間引用或設(shè)置。True表示被按下，F(xiàn)alse（默認(rèn)）表示未被按下。（二）事件 命令按鈕最常用的事件是Click事件?？丶QCaption字體大小StylePictureForm1“按鈕操作示例”四號(hào)Label1“HELLO VB”小一Command1“改變背景”四號(hào)0-空Command2“改變文字”四號(hào)0-空Command3空1-ARW09RT例2-5 分別制作兩個(gè)按鈕用來(lái)改變標(biāo)簽的文本顏色和背景色，并制作一個(gè)具有圖標(biāo)的按鈕用來(lái)結(jié)束程序。各控件參數(shù)見(jiàn)下表： 事件代碼如下：Private Sub Com

41、mand1_Click() Label1.ForeColor = vbRedEnd SubPrivate Sub Command2_Click() Label1.BackColor = vbYellowEnd SubPrivate Sub Command3_Click() EndEnd Sub程序運(yùn)行結(jié)果如圖所示：2.3.4 文本框文本框文本框（TextBox）在窗體中為用戶提供一個(gè)既能顯示文本又能編輯文本的區(qū)域。在文本框內(nèi)，用戶可以用鼠標(biāo)、鍵盤(pán)按常用的方法對(duì)文字進(jìn)行編輯，例如進(jìn)行輸入、刪除、選擇、復(fù)制及粘貼等各種操作。（一） 屬性1Text屬性 設(shè)置文本框中顯示的內(nèi)容。2Locked屬性 設(shè)置文本框中的內(nèi)容是否可編輯。3Maxlength屬性 設(shè)置文本框中允許輸入的最大字符數(shù)。4MultiLine屬性 決定文本框是否允許接收多行文本。5PassWordChar屬性 當(dāng)MultiLine為False時(shí)，該屬性可設(shè)置顯示在文本框中