VisualBasic程序設(shè)計與應(yīng)用實踐教程

教育部大學(xué)計算機(jī)課程改革規(guī)劃教材

高等院校新課程體系計算機(jī)基礎(chǔ)教育規(guī)劃教材

VisualBasic程序設(shè)計與

應(yīng)用實踐教程

孔慶彥沈杰李志強(qiáng)主編

內(nèi)容簡介

本書為《VisualBasic程序設(shè)計與應(yīng)用教程》（孔慶彥、韓雪娜、張輝主編）的配套教材，全

書知識點與主教材知識點對應(yīng)。主要包括語言基礎(chǔ)知識、結(jié)構(gòu)化程序設(shè)計、數(shù)組和自定義類型、

過程、常用控件、菜單設(shè)計、多重窗體、數(shù)據(jù)文件、數(shù)據(jù)庫編程和圖形處理等內(nèi)容。整體結(jié)構(gòu)包

括知識點總結(jié)、實驗、習(xí)題及參考答案3部分。

本書內(nèi)容豐富、結(jié)構(gòu)清晰，既可與主教材《VisualBasic程序設(shè)計與應(yīng)用教程》配套使用，

也可以單獨作為實踐教材使用。

圖書在版編目（CIP）數(shù)據(jù)

VisualBasic程序設(shè)計與應(yīng)用實踐教程/孔慶彥，

沈杰，李志強(qiáng)主編.—北京：中國鐵道出版社，2015.2

教育部大學(xué)計算機(jī)課程改革規(guī)劃教材高等院校新課

程體系計算機(jī)基礎(chǔ)教育規(guī)劃教材

ISBN978-7-113-19580-9

Ⅰ.①V…Ⅱ.①孔…②沈…③李…Ⅲ.①BASIC語

言－程序設(shè)計－高等學(xué)校－教材Ⅳ.①TP312

中國版本圖書館CIP數(shù)據(jù)核字（2015）第026729號

書名：VisualBasic程序設(shè)計與應(yīng)用實踐教程

作者：孔慶彥沈杰李志強(qiáng)主編

策劃編輯：孟欣讀者熱線：400-688-0820

責(zé)任編輯：周海燕徐盼欣

封面制作：劉穎

責(zé)任校對：湯淑梅周海燕

責(zé)任印制：李佳

出版發(fā)行：中國鐵道出版社（100054，北京市西城區(qū)右安門西街8號）

網(wǎng)址：

印刷：北京銘成印刷有限公司

版次：2015年2月第1版2015年2月第1次印刷

開本：787mm×1092mm1/16印張：17.25字?jǐn)?shù)：405千

書號：ISBN978-7-113-19580-9

定價：34.00元

版權(quán)所有侵權(quán)必究

凡購買鐵道版的圖書，如有印制質(zhì)量問題，請與本社教材圖書營銷部聯(lián)系調(diào)換。電話：（010）63550836

打擊盜版舉報電話：（010）51873659

FOREWORD前言

本書是《VisualBasic程序設(shè)計與應(yīng)用教程》（孔慶彥、韓雪娜、張輝主編，中國鐵道出

版社出版）的配套實踐教材。書中列舉的大量示例，都與實際應(yīng)用程序?qū)崿F(xiàn)有關(guān)，有利于加

深學(xué)生理解程序設(shè)計語言。

本書由3部分組成。

第1部分為知識點總結(jié)：通過知識體系、學(xué)習(xí)綱要，對主教材各章知識點進(jìn)行概括，使

讀者對本章的內(nèi)容一目了然。

第2部分為實驗：包括主教材課后實驗和拓展實驗兩個模塊。實驗內(nèi)容的選取注重實用

性、技能性，總體方針依據(jù)“大學(xué)計算機(jī)基礎(chǔ)教育改革理論研究與課程方案項目課題組”的

研究成果《大學(xué)計算機(jī)基礎(chǔ)教育改革理論研究與課程方案》中對VisualBasic提出的教學(xué)內(nèi)

容與要求給出。

第3部分為習(xí)題及參考答案：包括主教材課后習(xí)題參考答案和拓展習(xí)題及參考答案兩個

模塊。習(xí)題精簡，力求達(dá)到少而精，有效地鞏固所學(xué)知識。

本書由孔慶彥、沈杰、李志強(qiáng)主編。具體編寫分工如下：第1部分由孔慶彥編寫，第2

部分由沈杰、王碩寧編寫，第3部分由李志強(qiáng)、王革非編寫。最后由孔慶彥、王革非進(jìn)行了

統(tǒng)稿、定稿。中國鐵道出版社以及參加編寫工作的教師所在的單位對本書編寫工作的順利進(jìn)

行給予了很大的幫助，在此表示衷心感謝。

由于時間倉促和水平有限，書中難免有不足與疏漏之處，敬請專家、讀者不吝批評指正。

E-mail：KQY@。

編者

2014年12月

CONTENTS目錄

第1部分知識點總結(jié)

第1章VisualBasic程序設(shè)計語言基礎(chǔ)1

1.1VisualBasic語言概述1

1.2VisualBasic6.0操作基礎(chǔ)2

1.3建立應(yīng)用程序的步驟4

第2章VisualBasic面向?qū)ο缶幊谈攀?

2.1面向?qū)ο缶幊袒A(chǔ)6

2.2窗體和常用控件7

2.3鼠標(biāo)和鍵盤的事件過程11

第3章VisualBasic語言基礎(chǔ)13

3.1數(shù)據(jù)類型13

3.2變量和常量14

3.3運(yùn)算符和表達(dá)式15

3.4常用內(nèi)部函數(shù)17

3.5VisualBasic編碼規(guī)則19

第4章結(jié)構(gòu)化程序設(shè)計20

4.1結(jié)構(gòu)化程序設(shè)計概述20

4.2輸入輸出語句21

4.3順序結(jié)構(gòu)23

4.4選擇結(jié)構(gòu)23

4.5循環(huán)結(jié)構(gòu)26

4.6程序調(diào)試28

第5章數(shù)組和自定義類型30

5.1數(shù)組概述30

5.2靜態(tài)數(shù)組31

5.3動態(tài)數(shù)組32

5.4數(shù)組應(yīng)用33

·1·

VisualBasic程序設(shè)計與應(yīng)用實踐教程

5.5控件數(shù)組34

5.6用戶自定義數(shù)據(jù)類型35

第6章過程36

6.1Function過程36

6.2Sub過程37

6.3參數(shù)傳遞38

6.4過程的嵌套和遞歸39

6.5過程和變量的作用域39

第7章常用控件42

7.1標(biāo)準(zhǔn)控件42

7.2ActiveX控件46

第8章菜單設(shè)計51

8.1菜單結(jié)構(gòu)51

8.2菜單編輯器52

8.3下拉式菜單52

8.4彈出式菜單52

第9章多重窗體54

9.1設(shè)計多重窗體54

9.2與窗體有關(guān)的方法和語句55

9.3不同窗體間數(shù)據(jù)的訪問55

第10章數(shù)據(jù)文件56

10.1文件概述56

10.2順序文件57

10.3隨機(jī)文件59

10.4二進(jìn)制文件59

第11章數(shù)據(jù)庫編程61

11.1數(shù)據(jù)庫概述61

11.2創(chuàng)建數(shù)據(jù)庫62

11.3用控件訪問數(shù)據(jù)庫63

11.4記錄集對象66

11.5ADO編程模型簡介70

·2·

目錄

第12章VisualBasic圖形處理72

12.1圖形操作基礎(chǔ)72

12.2圖形方法73

第2部分實驗

模塊1主教材課后實驗75

課后實驗175

課后實驗276

課后實驗379

課后實驗480

課后實驗589

課后實驗695

課后實驗7100

課后實驗8106

課后實驗9109

課后實驗10110

課后實驗11112

課后實驗12115

模塊2拓展實驗117

拓展實驗1VisualBasic集成環(huán)境117

拓展實驗2建立簡單的VisualBasic應(yīng)用程序118

拓展實驗3控件的布局119

拓展實驗4窗體的屬性、方法和事件119

拓展實驗5文本框的屬性、方法和事件121

拓展實驗6鼠標(biāo)與鍵盤事件過程122

拓展實驗7表達(dá)式的構(gòu)成123

拓展實驗8常用函數(shù)123

拓展實驗9輸入輸出語句124

拓展實驗10單條件選擇結(jié)構(gòu)125

拓展實驗11多條件選擇結(jié)構(gòu)126

拓展實驗12循環(huán)結(jié)構(gòu)127

拓展實驗13循環(huán)嵌套128

拓展實驗14一維數(shù)組129

拓展實驗15二維數(shù)組130

拓展實驗16動態(tài)數(shù)組130

·3·

VisualBasic程序設(shè)計與應(yīng)用實踐教程

拓展實驗17控件數(shù)組132

拓展實驗18自定義類型133

拓展實驗19Sub過程135

拓展實驗20Function過程136

拓展實驗21遞歸137

拓展實驗22數(shù)組做參數(shù)138

拓展實驗23單選按鈕、復(fù)選框、框架、組合框和列表框的應(yīng)用139

拓展實驗24列表框和組合框的應(yīng)用140

拓展實驗25定時器的應(yīng)用142

拓展實驗26圖形框和圖像框的應(yīng)用144

拓展實驗27菜單設(shè)計146

拓展實驗28彈出式菜單設(shè)計148

拓展實驗29多重窗體的應(yīng)用149

拓展實驗30多重窗體數(shù)據(jù)的引用152

拓展實驗31順序文件的應(yīng)用155

拓展實驗32數(shù)據(jù)庫156

拓展實驗33VB圖形處理157

第3部分習(xí)題及參考答案

模塊1主教材課后習(xí)題參考答案160

課后習(xí)題1參考答案160

課后習(xí)題2參考答案161

課后習(xí)題3參考答案161

課后習(xí)題4參考答案162

課后習(xí)題5參考答案165

課后習(xí)題6參考答案165

課后習(xí)題7參考答案166

課后習(xí)題8參考答案167

課后習(xí)題9參考答案167

課后習(xí)題10參考答案168

課后習(xí)題11參考答案168

課后習(xí)題12參考答案168

模塊2拓展習(xí)題及參考答案169

拓展習(xí)題1169

拓展習(xí)題2173

拓展習(xí)題3178

·4·

目錄

拓展習(xí)題4182

拓展習(xí)題5196

拓展習(xí)題6209

拓展習(xí)題7222

拓展習(xí)題8231

拓展習(xí)題9234

拓展習(xí)題10235

拓展習(xí)題11241

拓展習(xí)題12242

拓展習(xí)題1參考答案244

拓展習(xí)題2參考答案245

拓展習(xí)題3參考答案245

拓展習(xí)題4參考答案246

拓展習(xí)題5參考答案251

拓展習(xí)題6參考答案254

拓展習(xí)題7參考答案259

拓展習(xí)題8參考答案261

拓展習(xí)題9參考答案262

拓展習(xí)題10參考答案262

拓展習(xí)題11參考答案263

拓展習(xí)題12參考答案263

參考文獻(xiàn)266

·5·

第1章VisualBasic程序設(shè)計語言基礎(chǔ)

第1部分知識點總結(jié)

第1章VisualBasic程序設(shè)計語言基礎(chǔ)

知識體系

1.1VisualBasic語言概述

計算機(jī)語言主要是軟件開發(fā)人員根據(jù)用戶需要開發(fā)應(yīng)用軟件的工具。

1.1.1VisualBasic的版本

VisualBasic6.0包括學(xué)習(xí)版（Learning）、專業(yè)版（Professional）和企業(yè)版（Enterprise）3

種版本。

1.1.2VisualBasic的特點

（1）擁有面向?qū)ο蟮目梢暬O(shè)計工具。

（2）支持面向?qū)ο蟪绦蛟O(shè)計方法。

（3）事件驅(qū)動的編程機(jī)制。

（4）支持結(jié)構(gòu)化程序設(shè)計。

（5）支持多種數(shù)據(jù)庫訪問。

（6）強(qiáng)大的多媒體和網(wǎng)絡(luò)功能。

（7）完備的幫助功能。

·1·

第1部分知識點總結(jié)

1.2VisualBasic6.0操作基礎(chǔ)

1.2.1VisualBasic6.0系統(tǒng)的安裝和卸載

1．運(yùn)行環(huán)境

VisualBasic6.0能夠運(yùn)行在WindowsXP/NT/Vista/7等操作系統(tǒng)下。

2．安裝

（1）將VisualBasic6.0系統(tǒng)光盤放入光盤驅(qū)動器，光盤中的安裝文件通常會自動執(zhí)行，

進(jìn)入安裝過程。如果光盤中的安裝文件沒有自動執(zhí)行，可以通過“我的電腦”或“資源管理

器”，找到VisualBasic6.0安裝系統(tǒng)所在位置，雙擊執(zhí)行Setup.exe文件，運(yùn)行Setup.exe文件

后，進(jìn)入VisualBasic6.0安裝過程。

（2）按照安裝向?qū)У奶崾荆瑔螕簟跋乱徊健卑粹o，進(jìn)入“最終用戶許可協(xié)議”對話框，

選擇“接受協(xié)議”選項后，單擊“下一步”按鈕。

（3）在“產(chǎn)品號和用戶ID”對話框中，輸入產(chǎn)品的ID號和用戶信息，單擊“下一步”

按鈕。

（4）在“安裝程序選項”對話框中，選擇“安裝VisualBasic6.0中文企業(yè)版”，并單擊

“下一步”按鈕。

（5）在版權(quán)確認(rèn)對話框中，單擊“繼續(xù)”按鈕。

（6）在確認(rèn)產(chǎn)品的ID號對話框中，單擊“確定”按鈕。

（7）在選擇安裝位置和安裝類型對話框中，可以單擊“更改文件夾”按鈕更改安裝文件

的位置；安裝類型可以選擇“典型安裝”或“自定義安裝”，單擊相應(yīng)安裝類型的圖標(biāo)，進(jìn)入

安裝過程。

（8）進(jìn)入系統(tǒng)安裝界面后，開始復(fù)制文件，直至系統(tǒng)安裝完畢。

3．卸載

通過控制面板添加/刪除程序選項，找到VisualBasic6.0中文版，選中并單擊“刪除”按

鈕，完成卸載VisualBasic6.0操作。

1.2.2VisualBasic6.0的啟動和退出

1．啟動VisualBasic6.0

通常采用以下幾種操作方法啟動VisualBasic6.0。

（1）在“開始”菜單的“程序”選項中，選擇“MicrosoftVisualBasic6.0中文版”級聯(lián)

菜單中的“MicrosoftVisualBasic6.0中文版”命令。

（2）通過資源管理器或“我的電腦”，在VisualBasic6.0安裝位置找到可執(zhí)行文件VB6.exe，

雙擊該文件。

（3）如果桌面上有VisualBasic6.0的快捷方式，雙擊該快捷方式。

VisualBasic6.0啟動后，顯示“新建工程”對話框，在“新建工程”對話框中包含“新建”

選項卡、“現(xiàn)存”選項卡、“最新”選項卡，對話框中顯示的內(nèi)容是“新建”選項卡的內(nèi)容。

·2·

第1章VisualBasic程序設(shè)計語言基礎(chǔ)

（1）“新建”選項卡：列出了VisualBasic6.0能夠建立的應(yīng)用程序類型，初學(xué)者可以選

擇默認(rèn)的選項“標(biāo)準(zhǔn)EXE”。

（2）“現(xiàn)存”選項卡：已經(jīng)存在的VisualBasic應(yīng)用程序文件名列表。

（3）“最新”選項卡：已經(jīng)存在的最新操作過的VisualBasic應(yīng)用程序文件名列表。

2．退出VisualBasic6.0

通常采用下面5種方法退出VisualBasic6.0。

（1）單擊系統(tǒng)控制菜單，選擇“關(guān)閉”命令。

（2）單擊VisualBasic6.0應(yīng)用程序窗口的“關(guān)閉”按鈕。

（3）單擊“文件”菜單，選擇“退出”命令。

（4）使用【Alt+F4】組合鍵。

（5）雙擊標(biāo)題欄中的系統(tǒng)控制菜單圖標(biāo)。

1.2.3VisualBasic6.0集成開發(fā)環(huán)境

VisualBasic6.0集成開發(fā)環(huán)境由標(biāo)題欄、菜單欄、工具欄、窗體設(shè)計窗口、工具箱、屬

性窗口、代碼窗口、工程資源管理器窗口、窗體布局窗口、立即窗口、本地窗口等組成。

1．標(biāo)題欄

標(biāo)題欄位于VisualBasic6.0集成開發(fā)環(huán)境的第一行，包含系統(tǒng)控制菜單、McirosoftVisual

Basic程序標(biāo)題、VisualBasic工作模式標(biāo)識、最小化按鈕、最大化按鈕/還原按鈕和關(guān)閉按鈕。

VisualBasic6.0有設(shè)計、運(yùn)行、Break等3種工作模式。

2．菜單欄

菜單欄包括了VisualBasic6.0用于開發(fā)應(yīng)用程序所需要的命令。

3．工具欄

VisualBasic6.0提供了“編輯”工具欄、“標(biāo)準(zhǔn)”工具欄、“窗體編輯器”工具欄和“調(diào)

試”工具欄。單擊“視圖”菜單，選擇“工具欄”子菜單中相應(yīng)的工具欄，若其前面出現(xiàn)√

標(biāo)記，表示此工具欄顯示在集成開發(fā)環(huán)境中，若其前面沒出現(xiàn)√標(biāo)記，表示此工具欄沒有在

集成界面中顯示。

4．窗體設(shè)計窗口

新建一個工程文件后，至少要包含一個窗體，窗體的名字為Form1。窗體就像一塊畫布，

根據(jù)應(yīng)用程序界面的需要，從工具箱中選擇所需要的工具，并添加到窗體中。

5．工具箱

VisualBasic6.0的工具箱提供了20個標(biāo)準(zhǔn)控件和一個“指針”圖標(biāo)，除“指針”圖標(biāo)用

于選擇窗體中的多個控件外，其余控件都可以添加到窗體中。默認(rèn)情況下，工具箱總是顯示

的，若要隱藏工具箱，可以單擊工具箱的“關(guān)閉”按鈕；若要顯示工具箱，可以選擇“視圖”

菜單中的“工具箱”命令或單擊“標(biāo)準(zhǔn)”工具欄中的“工具箱”按鈕。

6．屬性窗口

屬性窗口用于顯示和設(shè)置所選定的窗體或窗體中對象的屬性。屬性窗口由對象名稱列表

框、屬性名稱列表和屬性值列表以及屬性含義說明組成。如果要顯示屬性窗口，可以選擇“視

·3·

第1部分知識點總結(jié)

圖”菜單中的“屬性窗口”命令或單擊“標(biāo)準(zhǔn)”工具欄中的“屬性窗口”按鈕；如果要隱

藏屬性窗口，可以單擊屬性窗口中的“關(guān)閉”按鈕。

7．代碼窗口

代碼窗口由對象名稱列表框、事件過程列表框、代碼編輯區(qū)域組成。用戶可以通過下面3

種方法打開代碼窗口。

（1）雙擊窗體或窗體上的任意控件。

（2）單擊工程資源管理器窗口的“查看代碼”按鈕。

（3）選擇“視圖”菜單中的“代碼窗口”命令。

8．工程資源管理器窗口

工程文件及其所包含的文件用工程資源管理器進(jìn)行管理。工程資源管理器上方有3個按鈕，

分別是“查看代碼”按鈕、“查看對象”按鈕和“切換文件夾”按鈕。用戶可以選擇“視圖”

菜單中的“工程資源管理器”命令或單擊“標(biāo)準(zhǔn)”工具欄中的“工程資源管理器”按鈕顯示

工程資源管理器窗口；可以單擊工程資源管理器窗口的“關(guān)閉”按鈕隱藏資源管理器窗口。

9．窗體布局窗口

窗體布局窗口用來顯示或設(shè)置窗體在運(yùn)行模式時其所在屏幕中的位置。用戶可以選擇

“視圖”菜單中的“窗體布局窗口”命令或單擊“標(biāo)準(zhǔn)”工具欄中的“窗體布局窗口”按鈕

顯示窗口布局窗口?？梢詥螕舸绑w布局窗口的關(guān)閉按鈕隱藏窗體布局窗口。

10．立即窗口

立即窗口用來直接觀察表達(dá)式的運(yùn)算結(jié)果、簡單命令的執(zhí)行以及進(jìn)行程序測試的工作窗

口。用戶可以選擇“視圖”菜單中的“立即窗口”命令顯示立即窗口；可以單擊立即窗口中

的“關(guān)閉”按鈕關(guān)閉立即窗口。

11．其他窗口

VisualBasic集成開發(fā)環(huán)境還有本地窗口、對象瀏覽窗口、監(jiān)視窗口等，用戶可以通過“視

圖”菜單中的相關(guān)命令打開相應(yīng)的窗口。

1.3建立應(yīng)用程序的步驟

1.3.1新建一個工程文件

啟動VisualBasic6.0后，在“新建工程”對話框中選擇“新建”選項卡中的“標(biāo)準(zhǔn)EXE”

選項，單擊“打開”按鈕，新建一個工程；或選擇“文件”菜單中的“新建工程”命令，新

建一個工程，系統(tǒng)自動為新建立的工程提供一個名為Form1的窗體。

1.3.2設(shè)計界面

根據(jù)應(yīng)用程序的需要設(shè)計界面，并將工具箱中的控件添加到窗體中。

1.3.3設(shè)置對象屬性

在屬性窗口中設(shè)置對象的屬性，或在代碼中設(shè)置對象的屬性，格式為：

·4·

第1章VisualBasic程序設(shè)計語言基礎(chǔ)

對象名稱.屬性名=屬性值

1.3.4編寫事件過程

在代碼窗口中，首先確定要編寫代碼的對象，然后在事件過程列表中選擇要編寫代碼的

事件過程，把正確的代碼輸入到代碼編寫區(qū)域即可。

1.3.5保存文件

選擇“文件”菜單中的“保存工程”命令或單擊“標(biāo)準(zhǔn)”工具欄中的“保存工程”按鈕

，在“文件另存為”對話框中單擊“保存在”列表設(shè)置保存位置，“保存類型”列表中給出

文件類型，文件名輸入框中需要輸入要保存的文件名。

1.3.6運(yùn)行應(yīng)用程序

用戶可以通過下面幾種方式運(yùn)行應(yīng)用程序。

（1）單擊“標(biāo)準(zhǔn)”工具欄中的“啟動”按鈕。

（2）按【F5】功能鍵。

（3）選擇“運(yùn)行”菜單中的“啟動”命令。

在程序運(yùn)行過程中，隨時可以單擊“標(biāo)準(zhǔn)”工具欄中的“中斷”按鈕中斷程序的運(yùn)行。

用戶可以通過下面幾種方式結(jié)束正在運(yùn)行的工程文件。

（1）單擊“標(biāo)準(zhǔn)”工具欄中的“結(jié)束”按鈕。

（2）選擇“運(yùn)行”菜單中的“結(jié)束”命令。

（3）單擊此窗體的“關(guān)閉”按鈕。

（4）通過工程文件的事件過程代碼結(jié)束工程文件的運(yùn)行，在要結(jié)束工程文件的事件過程

中，執(zhí)行結(jié)束語句：

End

1.3.7生成可執(zhí)行文件

VisualBasic工程文件運(yùn)行無誤后，可以將其編譯成可執(zhí)行文件（.exe）。

選擇“文件”菜單中的“生成工程文件名.exe”命令，在“生成工程”對話框中，確認(rèn)

保存位置并給出生成后的文件名，單擊“確定”按鈕。

·5·

第1部分知識點總結(jié)

第2章VisualBasic面向?qū)ο缶幊谈攀?/p>

知識體系

2.1面向?qū)ο缶幊袒A(chǔ)

2.1.1類與對象

類和對象是面向?qū)ο蟪绦蛟O(shè)計中兩個最基本的元素。

類是具有相同數(shù)據(jù)特征和行為特征的所有事物的統(tǒng)稱，類所具有的數(shù)據(jù)特征稱為屬性，

類所具有的行為特征稱為方法。

對象是類的一個實例，對象具有屬性、事件和方法三要素。類包含了有關(guān)對象的數(shù)據(jù)特

征和行為信息，它是對象的藍(lán)圖和框架，屬性指對象的數(shù)據(jù)特征，方法指對象的行為特征。

對象的屬性由對象所基于的類決定。

2.1.2子類與繼承性

在面向?qū)ο笙到y(tǒng)中，可以用類去定義一個新類，如果根據(jù)類A定義了類B，則稱類A為

父類，類B為子類。一個子類可以擁有其父類的全部功能，即類B繼承了類A的屬性和方

法，把這種特性稱為繼承性，同時類B又可以擁有自己的屬性和方法。

2.1.3VisualBasic中的類和對象

1．VisualBasic中的類

VisualBasic提供了大量可以直接使用的類，從控件的存在形式可以分為標(biāo)準(zhǔn)控件、

·6·

第2章VisualBasic面向?qū)ο缶幊谈攀?/p>

ActiveX控件和可插入對象3類。

2．VisualBasic中的對象

將工具箱中的控件添加到窗體中，就創(chuàng)建了相應(yīng)類的對象，窗體也是一種特殊的對象。

（1）屬性

在VisualBasic中，對象的屬性可以在屬性窗口中設(shè)置，也可以在代碼中設(shè)置。

（2）事件、事件過程及事件驅(qū)動

事件是對象所擁有的，由系統(tǒng)預(yù)先定義好的特定動作。在VisualBasic中，常用的事件

有單擊（Click）、雙擊（DblClick）、裝載（Load）、卸載（Unload）等。對象響應(yīng)事件以后的

操作需要代碼完成，這段代碼稱作事件過程，其格式為：

Sub對象名稱_事件名([參數(shù)列表])

發(fā)生事件時要執(zhí)行的程序代碼

EndSub

（3）方法

方法是對象所擁有的過程，在建立應(yīng)用程序時，程序員可以直接調(diào)用。調(diào)用對象方法的

格式為：

[對象名稱.]方法名[參數(shù)]

2.1.4可視化和面向?qū)ο箝_發(fā)程序的構(gòu)成

一個Windows應(yīng)用程序是由若干窗口構(gòu)成的，每個窗口上都有若干控件。每個控件都有

若干事件，每個事件將對應(yīng)一段程序代碼。同樣，用可視化方法開發(fā)的VisualBasic應(yīng)用程

序也是這樣構(gòu)成的。

2.2窗體和常用控件

2.2.1通用屬性

（1）名稱（Name）屬性：名稱屬性是所有對象都具有的屬性，作為對象的唯一標(biāo)識在事

件過程代碼中被引用。

（2）Caption（標(biāo)題）屬性：Caption屬性值確定了對象上顯示的文本內(nèi)容。

（3）Enabled（可用性）屬性：Enabled屬性決定應(yīng)用程序在運(yùn)行模式時對象是否可用。

（4）Visible（可見性）屬性：Visible屬性決定應(yīng)用程序在運(yùn)行模式時對象是否可見。

（5）Left屬性和Top屬性：Left屬性和Top屬性表示對象的左頂點的坐標(biāo)值，用來確定

對象的位置。

（6）Width屬性和Height屬性：Width屬性和Height屬性表示對象的大小。

（7）ForeColor屬性和BackColor屬性：ForeColor屬性用來設(shè)置對象的前景顏色（即正

文顏色），BackColor屬性用來設(shè)置對象上除正文以外顯示區(qū)域的顏色（即背景顏色）。

（8）Font屬性：Font屬性改變對象上文本的外觀。在屬性窗口中以字體對話框的形式設(shè)

置對象的字體外觀。在代碼窗口中字體的外觀以具體屬性值設(shè)置。

FontName：用于設(shè)置對象的字體名稱，其值是用雙引號括起來的字體名稱。

FontSize：用于設(shè)置對象的字體大小，其值是數(shù)值。

·7·

第1部分知識點總結(jié)

FontBold：用于設(shè)置對象的字體粗體效果，其值是True或False。

FontItalic：用于設(shè)置對象的字體斜體效果，其值是True或False。

FontUnderline：用于設(shè)置對象的字體下畫線效果，其值是True或False。

FontStrikethru：用于設(shè)置對象的字體刪除線效果，其值是True或False。

2.2.2對象默認(rèn)屬性

表1-2-1給出了常用對象的默認(rèn)屬性。

表1-2-1對象的默認(rèn)屬性

對象默認(rèn)屬性對象默認(rèn)屬性

Text（文本框）TextLabel（標(biāo)簽）Caption

Command（命令按鈕）DefaultPicture（圖形框）Picture

Option（單選按鈕）ValueImage（圖像框）Picture

Check（復(fù)選框）ValueTimer（計時器）Enabled

2.2.3通用事件

常用的事件包括Click（單擊）、DblClick（雙擊）、Change（改變）等。

（1）Click（單擊）事件：單擊對象，觸發(fā)該對象的單擊事件。

（2）DblClick（雙擊）事件：雙擊對象，觸發(fā)該對象的雙擊事件。

（3）Change（改變）事件：對象中的文本內(nèi)容發(fā)生改變時，觸發(fā)該對象的Change事件。

2.2.4常用控件

1．窗體（Form）

窗體既是類也是對象，在設(shè)計模式下，可以在窗體中添加需要的對象。

（1）常用屬性

名稱（Name）屬性：窗體的名稱，只能通過屬性窗口更改窗體的名稱屬性。

Caption（標(biāo)題）屬性：窗體標(biāo)題欄上顯示的文本內(nèi)容。

Enabled（可用性）屬性：決定程序運(yùn)行時，窗體是否響應(yīng)用戶的鼠標(biāo)或鍵盤操作。

Left屬性和Top屬性：其值決定了在運(yùn)行模式下，窗體在屏幕中的位置。

Width屬性和Height屬性：其值決定了窗體大小。

ForeColor（前景色）屬性：設(shè)置窗體的前景顏色（即正文顏色）。

BackColor（背景色）屬性：設(shè)置窗體上正文以外顯示區(qū)域的顏色。

AutoRedraw（自動重繪）：在運(yùn)行模式下，在窗體上已經(jīng)制作好的圖形，在最小化

窗體或改變窗體尺寸之后再恢復(fù)原窗體大小，圖形會消失，如果將該屬性設(shè)為True，

則恢復(fù)窗體大小時重新顯示圖形。另外，如果在窗體的Load事件中，含有Print方

法輸出時，必須將AutoRedraw屬性設(shè)置為True，應(yīng)用程序運(yùn)行時才能在窗體中輸

出Print方法要輸出的內(nèi)容，其默認(rèn)屬性值為False。

Icon（系統(tǒng)控制圖標(biāo)）：設(shè)置窗體標(biāo)題欄的系統(tǒng)控制圖標(biāo)。

BorderStyle（邊界類型）：設(shè)置窗體邊界類型。

Picture（加載圖形）：在窗體上加載圖形。

·8·

第2章VisualBasic面向?qū)ο缶幊谈攀?/p>

WindowState（窗體狀態(tài)）：設(shè)置窗體在運(yùn)行模式下呈現(xiàn)的狀態(tài)。

MaxButton（最大化按鈕）：決定窗體上最大化按鈕是否可用。

MinButton（最小化按鈕）：決定窗體上最小化按鈕是否可用。

ControlBox（系統(tǒng)控制框）：設(shè)置窗體系統(tǒng)控制菜單是否顯示。

Movable（可移動）：設(shè)置窗體是否可移動。

Font屬性：用來改變窗體上輸出文本的外觀效果。

Visible（可見性）：設(shè)置窗體運(yùn)行模式下是否可見。

（2）常用事件

Click（單擊）事件：工程文件運(yùn)行后，單擊窗體的空白處觸發(fā)該事件。

DblClick（雙擊）事件：工程文件運(yùn)行后，雙擊窗體的空白處觸發(fā)該事件。

Load（裝載）事件：窗體被裝載時，由系統(tǒng)自動觸發(fā)窗體的該事件。

UnLoad（卸載）事件：窗體卸載時自動觸發(fā)窗體的該事件。

Activate（活動）事件：在窗體激活時觸發(fā)該事件。

Deactivate（非活動）事件：當(dāng)其他窗體被激活時，本窗體將觸發(fā)該事件。

（3）常用方法

Print方法：用于在窗體上輸出文本字符。其格式為：

[對象名稱.]Print[表達(dá)式列表][,|;]

其中，對象名稱是窗體名稱（Form）時，可以省略。表達(dá)式列表為可選項，表達(dá)式之

間可以用“,”或“;”分隔。以“,”分隔的表達(dá)式以標(biāo)準(zhǔn)格式輸出；以“;”分隔的表達(dá)式

以緊湊格式輸出。Print方法末尾可以是“,”或“;”或無符號，決定后續(xù)Print方法輸出內(nèi)

容的位置。

Cls（清屏）方法：用于清除窗體中的內(nèi)容。其格式為：

[對象名稱.]Cls

Move方法：Move方法用于移動窗體以及改變窗體的大小。其格式為：

[對象名稱.]MoveLeft,[Top,[Width,[Height]]]

Hide方法：Hide方法用于隱藏窗體。其格式為：

[對象名稱.]Hide

Show方法：用于顯示窗體。其格式為：

[對象名稱.]Show

2．標(biāo)簽（Label）

標(biāo)簽上顯示的文本信息是Caption屬性的值。

（1）常用屬性

標(biāo)簽除了擁有通用屬性外，還擁有下面常用的屬性。

BorderStyle（邊框樣式）屬性：設(shè)置標(biāo)簽有無邊框。

Alignment（文本對齊）屬性：設(shè)置標(biāo)題文本的對齊方式。

BackStyle屬性：設(shè)置背景樣式。

AutoSize屬性：設(shè)置標(biāo)簽是否能夠自動調(diào)整大小以顯示所有的標(biāo)題文本信息。

WordWrap屬性：設(shè)置標(biāo)題文本是否自動換行。

·9·

第1部分知識點總結(jié)

（2）常用方法

標(biāo)簽擁有Move方法，可以在運(yùn)行模式下移動標(biāo)簽的位置和改變標(biāo)簽的大小。

（3）常用事件

標(biāo)簽可以響應(yīng)單擊（Click）、雙擊（DblClick）等事件。

3．文本框（Text）

（1）常用屬性

文本框沒有Caption屬性，除通用屬性外，還具有其特有的屬性。

Text屬性：設(shè)置或返回文本框中文本內(nèi)容。

MaxLength屬性：設(shè)置文本框中輸入文本的最大長度。

MultiLine屬性：設(shè)置文本框中的文本內(nèi)容是否支持多行顯示。

ScrollBars屬性：設(shè)置文本框中滾動條的樣式。

PasswordChar屬性：設(shè)置用來代替顯示文本框中的文本內(nèi)容，通常也稱為占位符。

Locked屬性：設(shè)置文本框中的文本內(nèi)容在運(yùn)行模式下是否可以被編輯。

SelStart屬性：文本框中選定文本的開始位置，默認(rèn)值為0，從第一個字符開始。

SelLength屬性：文本框中選定文本的長度。

SelText屬性：文本框中選定文本的內(nèi)容。

（2）常用方法

SetFocus方法是把焦點移到文本框中，便于文本框接收輸入的文本信息。其格式為：

對象名稱.SetFocus

（3）常用事件

文本框主要的事件還有Change、GotFocus、LostFocus等。

Change事件：當(dāng)文本框中的內(nèi)容發(fā)生改變時，觸發(fā)此事件。

GotFocus事件：當(dāng)將焦點（光標(biāo)）從其他對象移到此文本框時，觸發(fā)此事件。

LostFocus事件：當(dāng)將焦點（光標(biāo)）從此文本框移到其他對象時，觸發(fā)此事件。

4．命令按鈕（Command）

命令按鈕是用戶與應(yīng)用程序交互中最常用的一種控件。

（1）常用屬性

Caption屬性：設(shè)置命令按鈕的標(biāo)題文本。設(shè)置屬性時在標(biāo)題文本的后面加上“&熱

鍵字符”可以設(shè)置熱鍵。

Style屬性：確定命令按鈕的外觀。

ToolTipText屬性：用來給命令按鈕作注釋，解釋其作用。

TabIndex屬性：設(shè)置按【Tab】鍵時，焦點在各個對象間移動的順序。

Cancel屬性：其值為True時，在運(yùn)行模式下，按【Esc】鍵，執(zhí)行此命令按鈕的單

擊事件。默認(rèn)值為False。

Default屬性：確定哪一個命令按鈕是窗體的默認(rèn)命令按鈕。

（2）常用事件

命令按鈕最常用的事件是Click（單擊）事件。

·10·

第2章VisualBasic面向?qū)ο缶幊谈攀?/p>

2.3鼠標(biāo)和鍵盤的事件過程

2.3.1鼠標(biāo)的事件過程

鼠標(biāo)事件是由用戶操作鼠標(biāo)引發(fā)的能夠被各種對象識別的事件，主要有MouseDown、

MouseUp和MouseMove等，這組事件在被觸發(fā)時，會傳遞參數(shù)給事件過程。

（1）MouseDown事件：按下任意一個鼠標(biāo)按鈕時觸發(fā)該事件。

（2）MouseUp事件：釋放任意一個鼠標(biāo)按鈕時觸發(fā)該事件。

（3）MouseMove事件：移動鼠標(biāo)時觸發(fā)該事件。

1．事件過程形式

與3個鼠標(biāo)事件對應(yīng)的事件過程為：

PrivateSub對象名稱_MouseDown(ButtonAsInteger,ShiftAsInteger,

XAsSingle,YAsSingle)

事件過程代碼

EndSub

PrivateSub對象名稱_MouseUp(ButtonAsInteger,ShiftAsInteger,

XAsSingle,YAsSingle)

事件過程代碼

EndSub

PrivateSub對象名稱_MouseMove(ButtonAsInteger,ShiftAsInteger,

XAsSingle,YAsSingle)

事件過程代碼

EndSub

2．說明

（1）Button：指示用戶按下或釋放了哪個鼠標(biāo)按鈕。

（2）Shift參數(shù)：指示用戶按下或釋放鼠標(biāo)的同時，【Shift】、【Ctrl】和【Alt】哪個或哪幾

個鍵同時被按下。

（3）X參數(shù)和Y參數(shù)：指示當(dāng)前鼠標(biāo)的位置。

2.3.2鍵盤的事件過程

在VisualBasic中，重要的鍵盤事件有KeyPress、KeyDown、KeyUp。

（1）KeyPress事件：用戶按下并釋放一個會產(chǎn)生ASCII碼的按鍵時被觸發(fā)。

（2）KeyDown事件：用戶按下鍵盤上任意一個鍵時被觸發(fā)。

（3）KeyUp事件：用戶釋放鍵盤上任意一個鍵時被觸發(fā)。

1．KeyPress事件

（1）事件過程形式

PrivateSub對象名稱_KeyPress(KeyAsciiAsInteger)

事件過程代碼

EndSub

（2）說明

參數(shù)KeyAscii為所按鍵對應(yīng)的ASCII碼值。KeyPress事件過程接收到的是用戶按鍵的

·11·

第1部分知識點總結(jié)

ASCII碼字符。

2．KeyUp事件和KeyDown事件

當(dāng)焦點在某個對象上，同時用戶按下鍵盤上的任意鍵時，觸發(fā)對象的KeyDown事件；釋

放按鍵，觸發(fā)KeyUp事件。

（1）事件過程形式

PrivateSub對象名稱_KeyDown(KeyCodeAsInteger,ShiftAsInteger)

事件過程代碼

EndSub

PrivateSub對象名稱_KeyUp(KeyCodeAsInteger,ShiftAsInteger)

事件過程代碼

EndSub

（2）說明

KeyCode參數(shù)值是用戶所操作鍵的掃描碼，傳遞給事件過程的是用戶所操作的物理鍵。

Shift參數(shù)與鼠標(biāo)事件中的Shift參數(shù)意義相同。

·12·

第3章VisualBasic語言基礎(chǔ)

第3章VisualBasic語言基礎(chǔ)

知識體系

3.1數(shù)據(jù)類型

表1-3-1歸納了VisualBasic支持的基本數(shù)據(jù)類型。

·13·

第1部分知識點總結(jié)

表1-3-1VisualBasic基本數(shù)據(jù)類型

數(shù)據(jù)類型名稱類型關(guān)鍵字類型符占用字節(jié)數(shù)表示范圍

整型Integer%2-215~215-1

長整型Long&4-231~231-1

單精度型Single!4-3.4×1038~3.4×1038，精度達(dá)7位

雙精度型Double#8-1.7×10308~1.7×10308，精度達(dá)15位

貨幣型Currency@8-296~296-1，精度達(dá)28位

字節(jié)型Byte10~28-1（0~255）

字符型String$與字符串長度有關(guān)0~65535個字符

邏輯型Boolean2True與False

日期型Date801,01,100~12,31,9999

對象型Object4任何對象引用

變體型Variant根據(jù)需要分配

3.2變量和常量

3.2.1變量

變量是值可以改變的數(shù)據(jù)，在執(zhí)行應(yīng)用程序期間，用變量臨時存儲數(shù)據(jù)。

1.變量的命名規(guī)則

（1）變量名必須以字母或漢字（中文系統(tǒng)中可用）開頭，由字母、漢字、數(shù)字或下畫線組成。

（2）不能使用VisualBasic中的關(guān)鍵字作為變量名。

2．變量的聲明

（1）變量的聲明

Dim<變量名1>[As<類型關(guān)鍵字>][,<變量名2>[As<類型關(guān)鍵字>]],…

或

Dim<變量名>[<類型符>][,…]

其中：

<變量名>：應(yīng)符合變量名的命名規(guī)則。

<類型關(guān)鍵字>：可以是表1-3-1中所列出的類型關(guān)鍵字。

[As<類型關(guān)鍵字>]和[<類型符>]：為可選項。若省略，則默認(rèn)變量為Variant類型。

（2）隱式聲明

如果沒有強(qiáng)制要求變量聲明，那么變量可以不加聲明而直接使用，稱為隱式聲明。

3．變量的默認(rèn)值

變量被聲明后，未賦值之前，變量的值就是其默認(rèn)值。所有數(shù)值類型的變量，默認(rèn)值都

是0；字符型變量和變體型變量的默認(rèn)值為空字符串（""）；邏輯型變量的默認(rèn)值為False。

3.2.2常量

1．直接常量

根據(jù)數(shù)據(jù)的表現(xiàn)形式，將直接常量劃分為數(shù)值常量、字符常量、日期常量和邏輯常量。

·14·

第3章VisualBasic語言基礎(chǔ)

2．用戶自定義的符號常量

用Const語句定義用戶定義的符號常量，其格式為：

Const<符號常量名1>[As<類型關(guān)鍵字>]=<表達(dá)式1>[,…]

其中：

（1）<符號常量名>：符號常量的名稱，其命名規(guī)則與變量名命名規(guī)則相同。

（2）As<類型關(guān)鍵字>：為可選項，說明常量所屬數(shù)據(jù)類型。

（3）<表達(dá)式>：可以是數(shù)值常量、字符串常量以及帶運(yùn)算符的表達(dá)式。

3．系統(tǒng)內(nèi)部符號常量

系統(tǒng)所提供的所有內(nèi)部符號常量，在代碼中可以直接使用。

3.3運(yùn)算符和表達(dá)式

3.3.1算術(shù)運(yùn)算符和算術(shù)表達(dá)式

由算術(shù)運(yùn)算符連接的表達(dá)式稱為算術(shù)表達(dá)式。表1-3-2給出了算術(shù)運(yùn)算符的含義及實例。

表1-3-2算術(shù)運(yùn)算符含義及實例

運(yùn)算符含義優(yōu)先級實例結(jié)果

^乘方運(yùn)算12^416

-負(fù)號2-(2*4)-8

*乘33*618

/除39/24.5

\整除49\24

Mod取模（取余）59Mod21

+加69+211

-減62-9-7

3.3.2字符運(yùn)算符和字符表達(dá)式

由字符運(yùn)算符連接的表達(dá)式稱為字符表達(dá)式。表1-3-3給出了字符運(yùn)算符的含義及實例。

表1-3-3字符運(yùn)算符含義及實例

運(yùn)算符含義實例結(jié)果

&非字符型數(shù)據(jù)也能參加連接運(yùn)算"A1"&"B1""A1B1"

+操作數(shù)必須是字符型數(shù)據(jù)"A1"+"B1""A1B1"

3.3.3關(guān)系運(yùn)算符和關(guān)系表達(dá)式

表1-3-4給出了關(guān)系運(yùn)算符的含義及實例。

表1-3-4關(guān)系運(yùn)算符含義及實例

運(yùn)算符含義實例結(jié)果

=等于"xyz"="xyd"False

<>不等于"xyz"<>"xyd"True

>大于3>100False

·15·

第1部分知識點總結(jié)

續(xù)表

運(yùn)算符含義實例結(jié)果

>=大于等于"xyz">="xyz"True

<小于67<0False

<=小于等于"xyz"<="xyd"False

Like字符串匹配"xyzde"Like"xy*"True

3.3.4邏輯運(yùn)算符和邏輯表達(dá)式

表1-3-5給出了邏輯運(yùn)算符的含義及實例。

表1-3-5邏輯運(yùn)算符含義及實例

運(yùn)算符含義