程序設(shè)計(jì)基礎(chǔ)全集前言VisualBasic是目前進(jìn)行Windows應(yīng)用程序設(shè)計(jì)的最佳工具之一，也是最佳的程序設(shè)計(jì)入門(mén)語(yǔ)言，這一看法已經(jīng)得到普遍認(rèn)可。非計(jì)算機(jī)專業(yè)計(jì)算機(jī)基礎(chǔ)教學(xué)的3個(gè)不同層次，分別解決的是“操作技能”、“思維訓(xùn)練”、“綜合應(yīng)用能力”問(wèn)題。學(xué)習(xí)一門(mén)程序設(shè)計(jì)語(yǔ)言，主要目的是要提高讀者分析歸納、解決問(wèn)題的能力，在思維訓(xùn)練方面受益，并使得讀者通過(guò)更系統(tǒng)、深入的學(xué)習(xí)后開(kāi)發(fā)實(shí)用程序成為可能。因此，本書(shū)在內(nèi)容上精選了VisualBasic6.0中最基礎(chǔ)、最常用并實(shí)用的部分；在編排和風(fēng)格上力圖體現(xiàn)循序漸進(jìn)、深入淺出的特點(diǎn)；以樣本程序示例教學(xué)，階段性構(gòu)筑讀者的成就感，使得艱苦的程序設(shè)計(jì)工作升華為一種藝術(shù)創(chuàng)作，提供了一條通往程序設(shè)計(jì)高手的捷徑。前言本書(shū)的編寫(xiě)得到了浙江省高校計(jì)算機(jī)教學(xué)研究會(huì)的大力支持。本書(shū)共分9章，第1、第7章由浙江科技學(xué)院的羅朝盛教授編寫(xiě)，第2、第3、第4、第6章由浙江工業(yè)大學(xué)的胡同森副教授編寫(xiě)，第5章由浙江理工大學(xué)的莊紅副教授編寫(xiě)，第8章由胡同森和浙江師范大學(xué)的朱建新編寫(xiě)，第9章由杭州電子科技大學(xué)的郭艷華副教授編寫(xiě)。附錄部分包括ASCII字符集、VisualBasic常用系統(tǒng)函數(shù)、VisualBasic常用屬性、VisualBasic常用事件、VisualBasic常用方法以及部分對(duì)象能使用的常用方法，為大家使用VisualBasic進(jìn)行程序設(shè)計(jì)提供查找資料的方便。全書(shū)由浙江工業(yè)大學(xué)陳慶章?lián)沃骶?，由胡同森統(tǒng)稿。前言另外，與本教材配套使用的另一本教學(xué)或自學(xué)參考書(shū)《VisualBasic學(xué)習(xí)及實(shí)踐指導(dǎo)》將在2005年春季前出書(shū)。書(shū)中將有本教材習(xí)題的參考答案和《VisualBasic學(xué)習(xí)及實(shí)踐指導(dǎo)》中附加習(xí)題的參考答案。此書(shū)是教師教學(xué)、學(xué)生或讀者自學(xué)非常實(shí)用的輔助參考書(shū)。希望所有讀者和從事計(jì)算機(jī)基礎(chǔ)教學(xué)的各位同仁，對(duì)本書(shū)多提寶貴意見(jiàn)，使其逐步完善。在此，預(yù)致我們深深的謝意。

本書(shū)編委會(huì)2004年7月

編委會(huì)名單主任：方永平

副主任：胡維華

委員(以姓氏筆畫(huà)為序)陳慶章何欽銘項(xiàng)小仙趙建民俞瑞釗蔣聯(lián)海雷煒樓程富主編：陳慶章

編著者：胡同森羅朝盛莊紅郭艷華朱建新目錄第1章

VisualBasic6.0程序設(shè)計(jì)概述

第2章

程序設(shè)計(jì)基礎(chǔ)

第3章

結(jié)構(gòu)化程序設(shè)計(jì)與數(shù)組

第4章

函數(shù)與過(guò)程

第5章

常用控件

第6章

圖形控件和圖形方法

第7章

對(duì)話框和菜單程序設(shè)計(jì)

第8章

文

件

第9章

數(shù)據(jù)庫(kù)與數(shù)據(jù)訪問(wèn)技術(shù)

第1章VisualBasic6.0程序設(shè)計(jì)概述

1.1VisualBasic簡(jiǎn)介1.2VisualBasic6.0可視化編程環(huán)境1.3VisualBasic中的基本概念1.4窗體1.5VisualBasic程序的組成及工作方式1.6一個(gè)簡(jiǎn)單的VisualBasic程序的創(chuàng)建實(shí)例1.7小結(jié)VisualBasic的發(fā)展過(guò)程

Basic（BeginnersAll-PurposeSymbolInstructionCode——初學(xué)者通用指令代碼）語(yǔ)言，是早期微型計(jì)算機(jī)中廣泛使用的計(jì)算機(jī)程序設(shè)計(jì)高級(jí)語(yǔ)言。VisualBasic在原有Basic語(yǔ)言的基礎(chǔ)上進(jìn)一步發(fā)展，綜合了Basic語(yǔ)言和Windows操作系統(tǒng)的優(yōu)點(diǎn)，把它們?nèi)诤显谝黄?，為初學(xué)者在Windows環(huán)境下編寫(xiě)應(yīng)用程序提供了良好的開(kāi)發(fā)環(huán)境?！癡isual”的原意是指“可視的”或“看得見(jiàn)的”，是為用戶開(kāi)發(fā)圖形用戶界面（GUI）提供的一種方法。用戶不需要編寫(xiě)大量代碼去描述界面元素的外觀和位置，而只要把預(yù)先建立的對(duì)象加到屏幕上的適當(dāng)位置，再進(jìn)行簡(jiǎn)單的設(shè)置即可。VisualBasic的發(fā)展過(guò)程1991年，微軟公司推出了VisualBasic1.0版，這在當(dāng)時(shí)引起了很大的轟動(dòng)。許多專家把VisualBasic的出現(xiàn)當(dāng)作是軟件開(kāi)發(fā)史上的一個(gè)具有劃時(shí)代意義的事件。其實(shí)，現(xiàn)在看來(lái)，VisualBasic1.0的功能實(shí)在是太弱了。但在當(dāng)時(shí)，它是第一個(gè)“可視”的編程軟件。1992年初，發(fā)布VisualBasicProfessionalToolkit，其中包含了一組由微軟公司和其他公司開(kāi)發(fā)的自定義控件。這時(shí)，面向?qū)ο蠛蛷?fù)用性開(kāi)始成為軟件開(kāi)發(fā)中的重要概念。同年，又發(fā)布了MicrosoftVisualBasic2.0，其中包含了變體數(shù)據(jù)類型、預(yù)定義True、False常量和對(duì)象變量。1993年，VisualBasic3.0的推出，新增了標(biāo)準(zhǔn)數(shù)據(jù)控件，帶有Jet1.1版本的數(shù)據(jù)庫(kù)引擎。1995年，微軟公司又推出了VisualBasic4.0。該版本不但大量改寫(xiě)了原來(lái)的VisualBasic，還加入了OLE技術(shù)并能夠生成對(duì)象；同時(shí)還支持32位自定義控件OCX，并可從VisualBasic應(yīng)用程序中訪問(wèn)其他軟件環(huán)境下生成的數(shù)據(jù)，如MicrosoftWord、MicrosoftExcel等。VisualBasic的發(fā)展過(guò)程1997年，微軟公司推出了VisualBasic5.0，它支持MicrosoftCOM標(biāo)準(zhǔn)，可以生成ActiveX控件，并有明顯創(chuàng)新，開(kāi)發(fā)人員可以用VisualBasic生成自己的自定義控件和DLL。1998年，微軟公司又推出了VisualBasic6.0。較以前版本而言，其功能和性能都大大增強(qiáng)了，它還提供了新的、靈巧的數(shù)據(jù)庫(kù)和Web開(kāi)發(fā)工具，如增加了新的SQLServer交互方法，包括數(shù)據(jù)庫(kù)的訪問(wèn)，使用數(shù)據(jù)庫(kù)的新工具和控件等。VisualBasic的發(fā)展過(guò)程VisualBasic5.0/6.0有3種版本，分別為學(xué)習(xí)版、專業(yè)版和企業(yè)版。◆

學(xué)習(xí)版：它是最基本的版本，允許編寫(xiě)許多類型的程序，與其他版本相比，所帶工具較少?！?/p>

專業(yè)版：為專業(yè)人員而設(shè)計(jì)，它不僅包含了學(xué)習(xí)版的全部?jī)?nèi)容，還包含了許多其他功能，如具有創(chuàng)建ActiveX控件和ActiveX文檔的能力；提供Internet開(kāi)發(fā)功能，具有更多使用數(shù)據(jù)庫(kù)的工具。◆

企業(yè)版：這是VisualBasic6.0最完善的版本，該版本主要用于開(kāi)發(fā)企業(yè)級(jí)分布式應(yīng)用程序，它包含了許多附加工具，提供了完全集成SQLServer的所有工具。這3個(gè)版本是在相同的基礎(chǔ)上建立起來(lái)的，以滿足不同層次用戶的需要。對(duì)大多數(shù)用戶來(lái)說(shuō)，專業(yè)版就可以滿足要求。本書(shū)使用的是VisualBasic6.0的企業(yè)版（中文），書(shū)中介紹的內(nèi)容盡量做到與版本無(wú)關(guān)。VisualBasic的特點(diǎn)

VisualBasic是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)語(yǔ)言，能用于Windows環(huán)境下的各種應(yīng)用軟件的開(kāi)發(fā)，是目前較為流行的應(yīng)用軟件開(kāi)發(fā)平臺(tái)，具有許多明顯的特點(diǎn)與優(yōu)點(diǎn)，現(xiàn)歸納如下：1．提供了面向?qū)ο蟮目梢暬幊坦ぞ遃isualBasic采用的是面向?qū)ο蟮某绦蛟O(shè)計(jì)方法（OOP），它把程序和數(shù)據(jù)封裝在一起而視作為一個(gè)對(duì)象。VisualBasic提供了可視化的設(shè)計(jì)工具，把Windows界面設(shè)計(jì)的復(fù)雜性“隱藏”起來(lái)，開(kāi)發(fā)人員只需按設(shè)計(jì)要求，用系統(tǒng)提供的工具，在屏幕上畫(huà)出各種對(duì)象，并設(shè)置這些對(duì)象的屬性，這樣就可以在屏幕上“畫(huà)”出所需的用戶界面，不必為界面設(shè)計(jì)而編寫(xiě)大量的程序代碼，因而大大提高程序設(shè)計(jì)的效率。

VisualBasic的特點(diǎn)2．事件驅(qū)動(dòng)的編程方式傳統(tǒng)的程序設(shè)計(jì)是一種面向過(guò)程的方式，程序總是按事先設(shè)計(jì)好的流程運(yùn)行，用戶不能隨意改變、控制程序的流向。在VisualBasic中，用戶的動(dòng)作——事件控制著程序的流向，每個(gè)事件都能驅(qū)動(dòng)一段程序的運(yùn)行。程序員只需編寫(xiě)響應(yīng)用戶動(dòng)作的代碼，而各個(gè)動(dòng)作之間不一定有聯(lián)系，這樣的應(yīng)用程序代碼一般比較短，所以程序易于編寫(xiě)與維護(hù)。3．結(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言VisualBasic具有豐富的數(shù)據(jù)類型和結(jié)構(gòu)化程序結(jié)構(gòu)，其特點(diǎn)是：(1)增強(qiáng)了數(shù)值和字符串處理功能，比傳統(tǒng)的Basic語(yǔ)言有許多的改進(jìn)。(2)提供了豐富的圖形及動(dòng)畫(huà)指令，可方便地繪制各種圖形。(3)提供了定長(zhǎng)和動(dòng)態(tài)（變長(zhǎng)）數(shù)組，有利于簡(jiǎn)化內(nèi)存管理。(4)增加了遞歸過(guò)程調(diào)用，使程序更為簡(jiǎn)練。(5)提供了一個(gè)可供應(yīng)用程序調(diào)用的包含多種類型的圖標(biāo)庫(kù)。(6)具有完善的調(diào)試、運(yùn)行出錯(cuò)處理。VisualBasic的特點(diǎn)4．提供了易學(xué)易用的應(yīng)用程序集成開(kāi)發(fā)環(huán)境在VisualBasic的集成開(kāi)發(fā)環(huán)境中，用戶可設(shè)計(jì)界面、編寫(xiě)代碼、調(diào)試程序，直至將應(yīng)用程序編譯成可執(zhí)行文件在Windows上運(yùn)行，使用戶在友好的開(kāi)發(fā)環(huán)境中工作。5．支持多種數(shù)據(jù)庫(kù)系統(tǒng)的訪問(wèn)利用VisualBasic的數(shù)據(jù)控件，可訪問(wèn)MicrosoftAccess、Dbase、MicrosoftFoxPro、Paradox等，也可以訪問(wèn)MicrosoftExcel、Lotusl1-2-3等多種電子表格。VisualBasic的特點(diǎn)6．支持動(dòng)態(tài)數(shù)據(jù)交換（DDE）、動(dòng)態(tài)鏈接庫(kù)（DLL）和對(duì)象的鏈接與嵌入（OLE）動(dòng)態(tài)數(shù)據(jù)交換是MicrosoftWindows除了剪貼板和動(dòng)態(tài)鏈接函數(shù)庫(kù)以外，在Windows內(nèi)部交換數(shù)據(jù)的第三種方式。利用這項(xiàng)技術(shù)可在VisualBasic開(kāi)發(fā)的應(yīng)用程序與其他Windows應(yīng)用程序之間建立數(shù)據(jù)通信。動(dòng)態(tài)鏈接庫(kù)中存放了所有Windows應(yīng)用程序可以共享的代碼和資源，這些代碼或函數(shù)可以用多種語(yǔ)言寫(xiě)成。VisualBasic利用這項(xiàng)技術(shù)可以調(diào)用幾乎任何語(yǔ)言產(chǎn)生的DLL，也可以調(diào)用Windows應(yīng)用程序接口（API）函數(shù)，以實(shí)現(xiàn)SDK所能實(shí)現(xiàn)的功能。7．完備的Help聯(lián)機(jī)幫助功能與Windows環(huán)境下的其他軟件一樣，在VisualBasic中，利用幫助菜單和功能鍵，用戶可隨時(shí)方便地得到所需的幫助信息。VisualBasic幫助窗口中顯示了有關(guān)的示例代碼，通過(guò)復(fù)制、粘貼操作可獲得大量的示例代碼，為用戶的學(xué)習(xí)和使用提供了極大的方便。

VisualBasic6.0的新特性

VisualBasic6.0與以前的版本不同，它是VisualStudio家族的一個(gè)組件，保留了VisualBasic5.0的優(yōu)點(diǎn)，如在開(kāi)發(fā)環(huán)境上的改進(jìn)，增加了工作組，在代碼編輯器中提供了控件屬性／方法的自動(dòng)提示，能編譯生成本機(jī)代碼，大大提高程序的執(zhí)行速度等。同時(shí)，VisualBasic6.0在數(shù)據(jù)訪問(wèn)技術(shù)、Internet技術(shù)及智能化向?qū)Х矫娑加辛嗽S多新的特性。下面對(duì)VisualBasic6.0的新特性作一個(gè)簡(jiǎn)單的概括。1．?dāng)?shù)據(jù)訪問(wèn)的新特性VisualBasic6.0在數(shù)據(jù)訪問(wèn)技術(shù)方面比VisualBasic5.0有了很大的增強(qiáng)，首先，它采用了一種新的數(shù)據(jù)訪問(wèn)技術(shù)ADO（ActiveDataObject），使之能更好地訪問(wèn)本地和遠(yuǎn)程的數(shù)據(jù)庫(kù)。其次，在數(shù)據(jù)環(huán)境方面，允許程序員可視化地創(chuàng)建和操作ADO連接及命令，為程序員操縱數(shù)據(jù)源提供了很大的方便。另外，增加了ADO控件和集成的可視化數(shù)據(jù)庫(kù)工具。

VisualBasic6.0的新特性

2．Internet功能的增強(qiáng)Internet是當(dāng)今發(fā)展的潮流，VisualBasic6.0在Internet方面的增強(qiáng)使得它已成為當(dāng)前最強(qiáng)有力的開(kāi)發(fā)工具之一。(1)IIS程序設(shè)計(jì)：用VisualBasic6.0的專業(yè)版和企業(yè)版可直接創(chuàng)建IIS應(yīng)用程序，響應(yīng)用戶的要求。(2)DHTML的設(shè)計(jì)：利用VisualBasic6.0，程序員可直接通過(guò)VisualBasic代碼來(lái)實(shí)現(xiàn)動(dòng)態(tài)網(wǎng)頁(yè)的設(shè)計(jì)。(3)InternetExplorer4.x對(duì)下載ActiveX文檔的支持。3．控件、語(yǔ)言和向?qū)Х矫娴男略鎏匦?1)DataGrid、DataList、DataCombo等新增的數(shù)據(jù)控件：相當(dāng)于DataBase（簡(jiǎn)稱DB）版本的DBGrid、OLEDBList和DBCombo，所不同的是它們都支持新的ADO控件。(2)可以創(chuàng)建自己的數(shù)據(jù)源和數(shù)據(jù)綁定對(duì)象。(3)函數(shù)可以將數(shù)組作為返回值，并且可以為可變大小的數(shù)組賦值。(4)新增了安裝向?qū)?、?shù)據(jù)對(duì)象向?qū)?、?shù)據(jù)窗體向?qū)б约皯?yīng)用程序向?qū)?。這些新增的向?qū)В梢允归_(kāi)發(fā)人員設(shè)計(jì)出更優(yōu)秀的應(yīng)用程序。

VisualBasic6.0的新特性

4．高度可移植化的代碼代碼的可移植性是面向?qū)ο缶幊痰囊粋€(gè)重要特點(diǎn)。VisualBasic6.0集成了VisualComponentManager（簡(jiǎn)稱VCM，中文含義為可視化組件管理器）和VisualModeler（可視化模塊設(shè)計(jì)器）。通過(guò)VCM，可以在VisualBasic的工程中方便地組織、查找、插入各種窗體、模板、類模塊，甚至整個(gè)工程，為代碼的重新利用提供了很大的方便。而VisualModeler則可以將設(shè)計(jì)器和組件轉(zhuǎn)化成VisualC++或VisualBasic的代碼，它與VCM結(jié)合可以將VisualBasic中寫(xiě)的類，在其他工程甚至VisualC++的工程中使用。5．創(chuàng)建ActiveX控件更加輕松方便用VisualBasic6.0創(chuàng)建的ActiveX控件，其外觀和行為均和用C語(yǔ)言編寫(xiě)的控件一樣，可以用在VisualC++、VisualBasic、Delphi，甚至Word和Access中。6．在線幫助更加完善VisualBasic6.0有兩張光盤(pán)的文檔資料，里邊包括VisualBasic6.0程序員設(shè)計(jì)手冊(cè)、全文搜索索引、VisualBasic文檔以及VisualBasic程序樣例等。

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口

VisualBasic6.0集成開(kāi)發(fā)環(huán)境（IDE），提供了整套工具，方便用戶開(kāi)發(fā)應(yīng)用程序。它在一個(gè)公共環(huán)境里集成了許多不同的功能，例如設(shè)計(jì)、編輯、編譯和調(diào)試。下面介紹VisualBasic6.0的集成開(kāi)發(fā)環(huán)境。當(dāng)啟動(dòng)VisualBasic6.0時(shí)，可以見(jiàn)到如圖1-1所示的窗口，其中會(huì)提示選擇要建立的工程類型。

圖1-1VisualBasic6.0中可以建立的工程類型

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口使用VisualBasic6.0可以生成下列13種類型的應(yīng)用程序（圖中僅看到10種，通過(guò)滾動(dòng)條可看到另外3種）：在圖1-1的窗口中有3個(gè)選項(xiàng)卡：(1)新建：這個(gè)選項(xiàng)卡中列出了11種可生成的工程類型。(2)現(xiàn)存：這個(gè)選項(xiàng)卡中列出了可以選擇和打開(kāi)的現(xiàn)有工程。(3)最新：這個(gè)選項(xiàng)卡中列出了最近使用過(guò)的工程，用戶可以選擇和打開(kāi)一個(gè)需要的工程。當(dāng)選擇“新建”選項(xiàng)卡中的“標(biāo)準(zhǔn)EXE”圖標(biāo)并單擊“打開(kāi)”按鈕，可以打開(kāi)如圖1-2所示的VisualBasic集成開(kāi)發(fā)環(huán)境窗口。

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口圖1-2VisualBasic6.0集成開(kāi)發(fā)環(huán)境

菜單欄工具欄標(biāo)題欄工具箱工程管理窗口屬性窗口布局窗口立即窗口窗體設(shè)計(jì)窗口VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口需要說(shuō)明的是正常啟動(dòng)時(shí)，可能見(jiàn)不到圖1-2中的“立即”窗口。在VisualBasic集成環(huán)境中的其他類似窗口，都可以通過(guò)“視圖”菜單中的相應(yīng)命令來(lái)打開(kāi)和關(guān)閉。1．標(biāo)題欄標(biāo)題欄位于主窗口最上面的一行，如圖1-3所示。標(biāo)題欄中間顯示窗口標(biāo)題及工作模式，VisualBasic有3種工作模式：設(shè)計(jì)（Design）模式、運(yùn)行（Run）模式和中斷（Break）模式。啟動(dòng)時(shí)它顯示“工程1-MicrosoftVisualBasic[設(shè)計(jì)]”，表示它處于程序設(shè)計(jì)模式。(1)設(shè)計(jì)模式：可進(jìn)行用戶界面的設(shè)計(jì)和代碼的編制，以完成應(yīng)用程序的開(kāi)發(fā)，如圖1-2所示。(2)運(yùn)行模式：運(yùn)行應(yīng)用程序，這時(shí)不可編輯代碼，也不可編輯界面。此時(shí)，標(biāo)題欄中的標(biāo)題為：“工程1MicrosoftVisualBasic[運(yùn)行]”。(3)中斷模式：應(yīng)用程序運(yùn)行暫時(shí)中斷，這時(shí)可以編輯代碼，但不可編輯界面。此時(shí)，標(biāo)題欄中的標(biāo)題為：“工程1MicrosoftVisualasic[break]”。按F5鍵或單擊工具欄的“繼續(xù)”按鈕

，程序繼續(xù)運(yùn)行；單擊“結(jié)束”按鈕

，程序停止運(yùn)行。

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口2．菜單欄VisualBasic集成開(kāi)發(fā)環(huán)境的菜單欄中包含使用VisualBasic所需要的命令。它除了提供標(biāo)準(zhǔn)“文件”、“編輯”、“視圖”、“窗口”和“幫助”菜單之外，還提供了編程專用的功能菜單，如“工程”、“格式”、“調(diào)試”、“外接程序”等菜單，總共13項(xiàng)菜單，如圖1-3所示。工具欄標(biāo)題欄菜單欄圖1-3VisualBasic6.0集成開(kāi)發(fā)環(huán)境的主窗口

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口VisualBasic6.0集成開(kāi)發(fā)環(huán)境中的基本菜單有：(1)文件：包含打開(kāi)和保存工程以及生成可執(zhí)行文件的命令。(2)編輯：包含編輯命令和其他一些格式化、編輯代碼的命令，以及其他編輯功能命令。(3)視圖：包含顯示和隱藏IDE元素的命令。(4)工程：包含在工程中添加構(gòu)件、引用Windows對(duì)象和工具箱新工具的命令。(5)格式：包含對(duì)齊窗體控件的命令。(6)調(diào)試：包含一些通用的調(diào)試命令。(7)運(yùn)行：包含啟動(dòng)、設(shè)置斷點(diǎn)和終止當(dāng)前應(yīng)用程序運(yùn)行的命令。(8)查詢：包含操作數(shù)據(jù)庫(kù)表時(shí)的查詢命令以及其他數(shù)據(jù)訪問(wèn)命令。(9)圖表：包含操作VisualBasic工程時(shí)的圖表處理命令。(10)工具：包含建立ActiveX控件時(shí)需要的工具命令，并可以啟動(dòng)菜單編輯器以及配置環(huán)境選項(xiàng)。(11)外接程序：包含可以隨意增刪的外接程序。缺省時(shí)這個(gè)菜單中只有“可視化數(shù)據(jù)管理器”選項(xiàng)。通過(guò)“外接程序管理器”命令可以增刪外接程序。(12)窗口：包含屏幕窗口布局命令。(13)幫助：提供相關(guān)幫助信息。

VisualBasic6.0的集成開(kāi)發(fā)環(huán)境主窗口3．工具欄工具欄在編程環(huán)境下提供對(duì)于常用命令的快速訪問(wèn)。單擊工具欄上的按鈕，即可執(zhí)行該按鈕所代表的操作。在缺省模式下，啟動(dòng)VisualBasic之后將顯示“標(biāo)準(zhǔn)”工具欄。其他工具欄，如“編輯”、“窗體設(shè)計(jì)”和“調(diào)試”工具欄可以從“視圖”菜單中的“工具欄”命令中移進(jìn)或移出。工具欄緊貼在菜單欄下方，或以垂直條狀緊貼在左邊框上，如圖1-3所示。如果用鼠標(biāo)將工具欄從某欄下面移開(kāi)，則它能“懸”在窗口中。一般情況下，工具欄在菜單欄的正下方。

窗體設(shè)計(jì)窗口

“窗體設(shè)計(jì)窗口”也稱為對(duì)象窗口。Windows的應(yīng)用程序運(yùn)行后都會(huì)打開(kāi)一個(gè)窗口，窗體設(shè)計(jì)窗口是應(yīng)用程序最終面向用戶的窗口，是屏幕中央的主窗口。通過(guò)在窗體中添加控件并設(shè)置相應(yīng)的屬性來(lái)完成應(yīng)用程序界面的設(shè)計(jì)。每個(gè)窗口必須有一個(gè)窗體名字，系統(tǒng)啟動(dòng)后就會(huì)自動(dòng)創(chuàng)建一個(gè)窗體（缺省名為Form1），用戶可通過(guò)“工程/添加窗體”來(lái)創(chuàng)建新窗體或?qū)⒁延械拇绑w添加到工程中。每個(gè)窗體保存后都有一個(gè)窗體文件名（擴(kuò)展名為.Frm）。應(yīng)注意窗體名即窗體的“Name”屬性和窗體文件名的區(qū)別。

工具箱

系統(tǒng)啟動(dòng)后缺省的General工具箱就會(huì)出現(xiàn)在屏幕左邊，其中每個(gè)圖標(biāo)表示一種控件，共有20個(gè)常用“部件”（即控件），如圖1-4所示。

指針（選擇對(duì)象）

————

—————

圖片框（PictureBox）

標(biāo)簽（Label）

——————

——————文本框（TextBox）

框架（Frame）

——————

——

命令按鈕（CommandButton）

復(fù)選框（CheckBox）

———

————

單選按鈕（OptionButton）

組合框（ComboBox）

———

———————

列表框（ListBox）

水平滾動(dòng)條（HscrollBar）——

—————

垂直滾動(dòng)條（VscrollBar）

定時(shí)器（Timer）

—————

——

驅(qū)動(dòng)器列表框（DriveListBox）

目錄列表框（DirListBox）

—

————

文件列表框（FileListBox）

形狀（Shape）

——————

—————————

畫(huà)線（Line）

圖像框（Image）—————

———————數(shù)據(jù)庫(kù)（Data）

圖1-4VisualBasic工具箱中的常用控件類型工具箱用戶可以將不在工具箱中的其他ActiveX控件放到工具箱中。通過(guò)“工程”菜單中的“部件”命令或從“工具箱”快捷菜單中選定“部件”選項(xiàng)卡，就會(huì)顯示系統(tǒng)安裝的所有ActiveX控件清單。要將某控件加入到當(dāng)前選項(xiàng)卡中，需單擊要選定控件前面的方框，如圖1-5所示，然后單擊“確定”按鈕，選定的ActiveX控件就會(huì)添加到工具欄中。

圖1-5“部件”對(duì)話框

工程資源管理器

工程是指用于創(chuàng)建一個(gè)應(yīng)用程序的文件的集合。工程資源管理器列出了當(dāng)前工程中的窗體和模塊，如圖1-6所示。在工程資源管理器窗口中有3個(gè)按鈕，分別表示“查看代碼”、“查看對(duì)象”和“切換文件夾”。(1)單擊“查看代碼”按鈕，可打開(kāi)“代碼編輯器”查看代碼。(2)單擊“查看對(duì)象”按鈕，可打開(kāi)“窗體設(shè)計(jì)器”查看正在設(shè)計(jì)的窗體。(3)單擊“切換文件夾”按鈕，則可以隱藏或顯示包含在對(duì)象文件夾中個(gè)別項(xiàng)目列表。

工程資源管理器圖1-6工程資源管理器

圖1-7屬性設(shè)置窗口

屬性窗口

屬性是指對(duì)象的特征，如大小、標(biāo)題或顏色等數(shù)據(jù)。在VisualBasic6.0設(shè)計(jì)模式中，屬性窗口列出了當(dāng)前選定窗體或控件的屬性及其值，用戶可以對(duì)這些屬性值進(jìn)行設(shè)置。例如，要設(shè)置Command1命令按鈕上顯示的字符串，可以找到屬性窗口的“Caption”屬性，輸入“開(kāi)始”之類的字符串，如圖1-7所示。

窗體布局窗口

窗體布局窗口顯示在屏幕右下角。用戶可使用表示屏幕的小圖像來(lái)布置應(yīng)用程序中各窗體相對(duì)于主窗體的位置。圖1-8顯示了桌面上兩個(gè)窗體放置及其相對(duì)位置。右鍵單擊小屏幕，彈出快捷菜單，可通過(guò)該快捷菜單來(lái)對(duì)窗體啟動(dòng)位置進(jìn)行設(shè)計(jì)，如要設(shè)計(jì)窗體Form1啟動(dòng)位置居屏幕中心，其操作如圖1-9所示。

圖1-8窗體布局窗口

圖1-9設(shè)計(jì)窗體啟動(dòng)位置

代碼編輯窗口

在設(shè)計(jì)模式中，通過(guò)雙擊窗體或窗體上的任何對(duì)象或單擊“工程資源管理器”窗口中的“查看代碼”按鈕都可打開(kāi)代碼編輯器窗口。代碼編輯器是輸入應(yīng)用程序代碼的編輯器，應(yīng)用程序的每個(gè)窗體或標(biāo)準(zhǔn)模塊都有一個(gè)單獨(dú)的代碼編輯器窗口，如圖1-10所示。

圖1-10代碼編輯器窗口

立即窗口

例如：(1)在立即窗口中使用賦值符給變量賦值。即輸入：X=3.14:Y=2:Z=30:P=True:K=False(2)使用“？表達(dá)式”或“Print表達(dá)式”輸出其表達(dá)式的值。操作如下：?X+Y5.14 '輸出結(jié)果

PrintInt(X)+Y/24 '輸出結(jié)果?NotPOrKAndPOrY>ZFalse '輸出結(jié)果

立即窗口

在VisualBasic集成環(huán)境中，運(yùn)行“視圖/立即窗口”命令或按Ctrl+G組合鍵即可打開(kāi)如圖1-11所示的窗口?！傲⒓础贝翱谑荲isualBasic所提供的一個(gè)系統(tǒng)對(duì)象，稱為Debug對(duì)象，作為調(diào)試程序使用。它只有方法，不具備任何事件和屬性。通常使用是Print方法，使用格式為：Debug.print[輸出項(xiàng)列表]例如：Debug.print“VB程序設(shè)計(jì)”運(yùn)行后在立即窗口輸出：VB程序設(shè)計(jì)在設(shè)計(jì)狀態(tài)可以在立即窗口中進(jìn)行一些簡(jiǎn)單的命令操作，如變量賦值，用“？”或Print（兩者等價(jià)）輸出一些表達(dá)式的值。

圖1-11立即窗口

立即窗口

操作結(jié)果如圖1-12所示。

此外，VisualBasic6.0中還有2個(gè)非常有用的附加窗口：“本地”和“監(jiān)視”窗口，它們都是為調(diào)試應(yīng)用程序提供的，本地窗口和監(jiān)視窗口只在運(yùn)行工作模式下才有效。

圖1-12在“立即”窗口中的操作實(shí)例

可視化編程

傳統(tǒng)的編程方法使用的是面向過(guò)程、按順序進(jìn)行的機(jī)制，其缺點(diǎn)是程序員始終要關(guān)心什么時(shí)候發(fā)生什么事情，處理Windows環(huán)境下事件驅(qū)動(dòng)方式的工作量太大。VisualBasic采用的是面向?qū)ο?、事件?qū)動(dòng)的編程機(jī)制。程序員只需編寫(xiě)響應(yīng)用戶動(dòng)作的程序，如移動(dòng)鼠標(biāo)、單擊鼠標(biāo)等，編寫(xiě)代碼相對(duì)較少。VisualBasic使用的可視化編程方法，是面向?qū)ο缶幊碳夹g(shù)的簡(jiǎn)化版。VisualBasic提供多種控件支持可視化編程，利用它們可以快速創(chuàng)建強(qiáng)大的應(yīng)用程序而不需涉及不必要的細(xì)節(jié)。在VisualBasic環(huán)境中，程序員不僅可以利用控件來(lái)創(chuàng)建對(duì)象，而且還可以建立自己的控件，這是Windows環(huán)境下編程的新概念。對(duì)象與類

1．對(duì)

象對(duì)象（Object）是代碼和數(shù)據(jù)的集合?？梢园褜?duì)象看成日常生活中的各種物體，如一支鋼筆、一輛汽車、一臺(tái)電腦都是一個(gè)對(duì)象。一臺(tái)電腦又可以拆分為主板、CPU、內(nèi)存、外設(shè)等部件，這些部件又都分別是一個(gè)對(duì)象，因此電腦對(duì)象可以說(shuō)是由多個(gè)“子”對(duì)象組成的，它可以稱為是一個(gè)對(duì)象容器（Container）。在VisualBasic6.0中，對(duì)象可以由系統(tǒng)設(shè)置好，直接供用戶使用，也可以由程序員自己設(shè)計(jì)。VisualBasic設(shè)計(jì)好的對(duì)象有：窗體、各種控件、菜單、屏幕、剪貼板等。用戶使用最多的是窗體和控件。對(duì)象與類2．類類是同一種對(duì)象的統(tǒng)稱，是一個(gè)抽象的整體概念，也是創(chuàng)建對(duì)象實(shí)例的模板，而對(duì)象則是類的實(shí)例化。屬于同一類的所有對(duì)象具有同一組屬性、方法與事件，只是其屬性值不同，對(duì)事件的響應(yīng)不同（取決于程序員的編程）。譬如，汽車是一個(gè)籠統(tǒng)的名稱，是整體概念，我們把汽車看成一個(gè)“類”，一輛輛具體的汽車（比如你的汽車、我的汽車）就是這個(gè)類的實(shí)例，也就是屬于這個(gè)類的對(duì)象。VisualBasic中工具箱上的控件是類，畫(huà)在窗體中的各控件則是類的事例化，即是對(duì)象。

屬

性

屬性是對(duì)象的性質(zhì)，對(duì)象中的數(shù)據(jù)就保存在屬性中。屬性是用來(lái)描述和反映對(duì)象特征的參數(shù)。每一種對(duì)象都有其屬性，屬性值決定了對(duì)象的外觀和行為。例如，“控件名稱”（Name）、“顏色”（Color）及“是否可見(jiàn)”（Visible）等屬性決定了對(duì)象展現(xiàn)給用戶的界面具有什么樣的外觀及功能。不同的對(duì)象具有的屬性不盡相同，如命令按鈕有“Caption”屬性而無(wú)“Text”屬性，文本框無(wú)“Caption”屬性而有“Text”屬性?？丶傩缘脑O(shè)置一般有兩條途徑：(1)如果在界面設(shè)計(jì)時(shí)設(shè)置對(duì)象的屬性，需要使用屬性窗口。這時(shí)只要在屬性窗口中選中要修改的屬性，然后在右列中鍵入新的值即可設(shè)置對(duì)象的屬性。如標(biāo)簽、文本框、列表框、圖片框控件的字體、顏色等屬性。(2)如果要在程序運(yùn)行中動(dòng)態(tài)地更改對(duì)象的屬性，可以使用VisualBasic的賦值語(yǔ)句，在代碼窗口中通過(guò)編程設(shè)置，其格式為：對(duì)象名.屬性名=屬性值其中“對(duì)象名.屬性名”是VisualBasic中引用對(duì)象屬性的方法，如下述代碼可以設(shè)置標(biāo)簽控件Label1的標(biāo)題為“第一個(gè)應(yīng)用程序”：Label1.Caption="第一個(gè)應(yīng)用程序"

方

法

方法是面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言為編程者提供的用來(lái)完成特定操作的過(guò)程和函數(shù)。在VisualBasic中已將一些通用的過(guò)程和函數(shù)編寫(xiě)好并封裝起來(lái)，作為方法供用戶直接調(diào)用，這給用戶的編程帶來(lái)了極大的方便。因?yàn)榉椒ㄊ敲嫦驅(qū)ο蟮模栽谡{(diào)用時(shí)一般要指明對(duì)象。對(duì)象方法的調(diào)用格式為：[對(duì)象.]方法[參數(shù)名表]其中，若省略了對(duì)象，表示是當(dāng)前對(duì)象，一般指窗體。例如：在窗體Form1上打印輸出“VisualBasic程序設(shè)計(jì)”

可使用窗體的Print方法Form1.Print"VisualBasic程序設(shè)計(jì)"若當(dāng)前窗體是Form1，則可寫(xiě)為：Print"VisualBasic程序設(shè)計(jì)"

對(duì)象事件與事件過(guò)程

1．事件事件是VisualBasic預(yù)先定義的、對(duì)象能夠識(shí)別的動(dòng)作。每個(gè)控件都可以對(duì)一個(gè)或多個(gè)事件進(jìn)行識(shí)別和響應(yīng)，如窗體加載事件（Load）、鼠標(biāo)單擊事件（Click）、鼠標(biāo)雙擊事件（DblClick）等。事件是一種預(yù)先定義好的特定動(dòng)作，由用戶或系統(tǒng)激活，在多數(shù)情況下，事件是通過(guò)用戶的交互操作產(chǎn)生的。例如，窗體上有一個(gè)名為“CmdOK”的命令按鈕對(duì)象，當(dāng)鼠標(biāo)指針被移動(dòng)時(shí)，系統(tǒng)將跟蹤鼠標(biāo)指針的位置，當(dāng)鼠標(biāo)在該對(duì)象上單擊一下，系統(tǒng)就給鼠標(biāo)指針?biāo)赶虻膶?duì)象發(fā)送一個(gè)Click事件，如果該事件已編寫(xiě)了程序代碼，系統(tǒng)則執(zhí)行過(guò)程的程序代碼，執(zhí)行結(jié)束后，控制權(quán)交還給系統(tǒng)，并等待下一個(gè)事件。

對(duì)象事件與事件過(guò)程2．事件過(guò)程事件過(guò)程是用來(lái)完成事件發(fā)生后所要執(zhí)行的操作。當(dāng)一個(gè)對(duì)象察覺(jué)到某一事件發(fā)生時(shí)（如Click等），就會(huì)對(duì)事件產(chǎn)生響應(yīng)，即執(zhí)行一段程序代碼，所執(zhí)行的這段程序代碼就稱為事件過(guò)程。對(duì)于窗體對(duì)象，其事件過(guò)程的形式如下：SubForm_事件過(guò)程名[（參數(shù)列表）]…（事件過(guò)程代碼）EndSub對(duì)于除窗體以外的對(duì)象，其事件過(guò)程的形式如下：Sub對(duì)象名_事件過(guò)程名[（參數(shù)列表）]…（事件過(guò)程代碼）EndSub例如，單擊名為cmdOk命令按鈕，使命令按鈕變?yōu)椴豢梢?jiàn)，則對(duì)應(yīng)的事件過(guò)程如下：SubcmdOK_Click()Cmd0k.Visible=FalseEndSub

窗體的結(jié)構(gòu)

同Windows環(huán)境下的應(yīng)用程序窗口一樣，VisualBasic中的窗體也具有控制菜單、標(biāo)題欄、“最大化”按鈕、“最小化”按鈕、“關(guān)閉”按鈕以及邊框等，如圖1-13所示。窗體的操作與Windows下的窗口操作一樣。通過(guò)鼠標(biāo)左鍵拖動(dòng)標(biāo)題欄可以移動(dòng)窗體；鼠標(biāo)對(duì)準(zhǔn)窗體邊框，當(dāng)出現(xiàn)雙向箭頭時(shí)拖動(dòng)鼠標(biāo)可以改變窗體的大小。建立新窗體后，它的大小、背景顏色、標(biāo)題及窗體名稱等特征需要根據(jù)應(yīng)用程序的要求進(jìn)行設(shè)置。

窗體的結(jié)構(gòu)圖1-13窗體的結(jié)構(gòu)

“最小化”按鈕“最大化”按鈕“關(guān)閉”按鈕圖標(biāo)控制菜單框邊框樣式標(biāo)題窗體的屬性

窗體的基本屬性有：Name、Left、Top、Height、Width、Visible、Enabled、Font、ForeColor、BackColor等。在VisualBasic中的大多數(shù)控件基本上都有這些屬性，在以后介紹其他對(duì)象時(shí)，這些屬性還將詳細(xì)介紹。1．Name屬性VisualBasic中任何對(duì)象都有Name屬性，在程序代碼中通過(guò)該屬性來(lái)引用、操作具體的對(duì)象。首次在工程中添加窗體時(shí)，該窗體的名稱被缺省為Form1；添加第二個(gè)窗體，其名稱被缺省為Form2，依此類推。最好給Name屬性設(shè)置一個(gè)有實(shí)際意義的名稱，如給一個(gè)程序的主控窗體命名為“MainFrm”。這樣在程序代碼中的意義就很清楚，程序的可讀性就好。

窗體的屬性

2．Left、Top屬性窗體運(yùn)行在屏幕中，屏幕是窗體的容器，因此窗體的Left、Top屬性值是相對(duì)屏幕左上角的坐標(biāo)值。對(duì)于控件，Left、Top屬性值則是相對(duì)“容器”左上角的坐標(biāo)值，其缺省單位是twip。1twip=1/20點(diǎn)=1/1440in=1/567cm3．Height、Width屬性返回或設(shè)置對(duì)象的高度和寬度。對(duì)于窗體，指的是窗口的高度和寬度，包括邊框和標(biāo)題欄。對(duì)于控件，這些屬性使用控件所在“容器”的度量單位。圖1-14是屏幕（Screen）、窗體（Form1）和命令按鈕（Ok）的Left、Top、Height、Width屬性表示，讀者要注意Left、Top屬性值是相對(duì)“容器”左上角的坐標(biāo)值。在VisualBasic中除了用屏幕、窗體作“容器”外，還有框架和圖片框?qū)ο罂勺鳌叭萜鳌薄?/p>

窗體的屬性圖1-14對(duì)象的Left、Top、Height、Width屬性Screen.HeightForm1.TopForm1.HeightOk.HeightOk.TopOk.LeftOk.WidthForm1.WidthForm1.LeftScreen.Width窗體的屬性例1-1在窗體Form1被加載時(shí)，將其大小設(shè)置為屏幕大小的1/2，并居中顯示。通過(guò)窗體的Load事件來(lái)實(shí)現(xiàn)的程序代碼為：PrivateSubForm_Load() Form1.Width=Screen.Width/2 '設(shè)置窗體的寬度，Screen為屏幕對(duì)象

Form1.Height=Screen.Height/2'設(shè)置窗體的高度。'在水平方向上居中顯示。Form1.Left=(Screen.Width-Form1.Width)/2 '在垂直方向上居中顯示。Form1.Top=(Screen.Height-Form1.Height)/2EndSub

窗體的屬性4．Caption標(biāo)題屬性決定出現(xiàn)在窗體的標(biāo)題欄上的文本內(nèi)容，也是當(dāng)窗體被最小化后出現(xiàn)在窗體圖標(biāo)下的文本。如圖1-13中窗體的Caption屬性值是“VB窗體”5．字體Font屬性組uFontName屬性是字符型，決定對(duì)象上正文的字體（缺省為宋體）。uFontSize屬性是整型，決定對(duì)象上正文的字體大?。ㄈ笔?磅）。uFontBold屬性是邏輯型，決定對(duì)象上正文是否是粗體（缺省為False）。uFontItalic屬性是邏輯型，決定對(duì)象上正文是否是斜體（缺省為False）。uFontStrikeThru屬性是邏輯型，決定對(duì)象上正文是否加一刪除線（缺省為False）。uFontUnderLine屬性是邏輯型，決定對(duì)象上正文是否帶下劃線（缺省為False）。窗體的屬性注意：如果使用窗體或其他“容器”對(duì)象無(wú)效，則在其中的所有控件也將無(wú)效。

例1-2下面的程序是當(dāng)文本框Text1不包含任何文本時(shí)，使命令按鈕CmdOk無(wú)效。PrivateSubText1_Change() IfText1.Text=""Then '查看文本框是否為空

CmdOK.Enabled=False '使按鈕無(wú)效

Else CmdOK.Enabled=True '使按鈕有效

EndIfEndSub

窗體的屬性7．Visible屬性用于確定一個(gè)窗體或控件為可見(jiàn)或隱藏。要在啟動(dòng)時(shí)隱藏一個(gè)對(duì)象，可在設(shè)計(jì)時(shí)將Visible屬性設(shè)置為False，還可在代碼中設(shè)置該屬性使控件在運(yùn)行時(shí)隱藏。8．BackColor屬性和ForeColor屬性BackColor屬性用于返回或設(shè)置對(duì)象的背景顏色，F(xiàn)oreColor屬性用于返回或設(shè)置在對(duì)象里顯示圖片和文本的前景顏色，它們是十六進(jìn)制長(zhǎng)整型數(shù)據(jù)，在VisualBasic中通常用Windows運(yùn)行環(huán)境的紅-綠-藍(lán)（RGB）顏色方案，使用調(diào)色板或在代碼中使用RGB或QBColor函數(shù)指定標(biāo)準(zhǔn)RGB顏色。例如，將窗體Form1的背景色設(shè)置為紅色，則可使用：Form1.BackColor=RGB(255,0,0)也可用十六進(jìn)制長(zhǎng)整型數(shù)據(jù)或VisualBasic系統(tǒng)內(nèi)部常量給BackColor屬性賦值。例如：Form1.BackColor=&HFF&它等價(jià)于：Form1.BackColor=vbRed

窗體的屬性9．MaxButton——“最大化”按鈕和MinButton——“最小化”按鈕當(dāng)其值為T(mén)ure時(shí)，有“最大化”或“最小化”按鈕；其值為False時(shí)，則無(wú)。10．Icon控制圖標(biāo)屬性返回或設(shè)置窗體左上角顯示或最小化時(shí)顯示的圖標(biāo)，它必須在ControlBox屬性設(shè)置為T(mén)ure才有效。缺省設(shè)置的圖標(biāo)是，單擊屬性窗口中Icon屬性值后面的按鈕，打開(kāi)“加載圖標(biāo)”對(duì)話框，允許打開(kāi)一個(gè)圖標(biāo)文件（*.Ico和*.Cur）作為這個(gè)屬性的值。11．ControlBox控制菜單框?qū)傩云渲翟O(shè)置為T(mén)ure時(shí)，有控件菜單；設(shè)置為False時(shí)，則無(wú)控件菜單，同時(shí)窗體也無(wú)“最大化”按鈕和“最小化”按鈕，即使MaxButton屬性和MinButton屬性設(shè)置為T(mén)ure。窗體的屬性12．Picture圖片屬性設(shè)置窗體中要顯示的圖片。一般可顯示所有類型的圖片文件。13．BorderStyle邊框風(fēng)格屬性

通過(guò)改變BorderStyle屬性，可以控制窗體如何調(diào)整大小，它可取6種值，如表1-1所示。

屬性值意義數(shù)值系統(tǒng)常量0VbBSNone無(wú)（沒(méi)有邊框或與邊框相關(guān)的元素）1VbFixedSingle固定單邊框?？梢园刂撇藛慰颉?biāo)題欄、“最大化”按鈕和“最小化”按鈕。只有使用“最大化”和“最小化”按鈕才能改變窗體大小2VbSizable（缺省值）可調(diào)整大小的邊框3VbFixedDoubleialog固定對(duì)話框?？梢园刂撇藛慰蚝蜆?biāo)題欄，不包含“最大化”和“最小化”按鈕，不能改變窗體尺寸4vbFixedToolWindow固定工具窗口。不能改變窗體尺寸，顯示“關(guān)閉”按鈕并用縮小的字體顯示標(biāo)題欄，窗體不在任務(wù)欄中顯示5vbSizableToolWindow可變尺寸工具窗口?？梢愿淖兇绑w大小，顯示“關(guān)閉”按鈕并用縮小的字體顯示標(biāo)題欄，窗體不在任務(wù)欄中顯示表1-1窗體對(duì)象BorderStyle屬性的取值及意義

窗體的屬性14．WindowsState屬性設(shè)置窗體運(yùn)行的狀態(tài)，它可取3種值，對(duì)應(yīng)于3種狀態(tài)，如表1-2所示。15．AutoRedraw屬性該屬性決定窗體被隱藏或被另一窗口覆蓋之后重新顯示時(shí)，是否重新還原該窗體被隱藏或覆蓋以前的畫(huà)面。即是否重畫(huà)如Circle、Line、Pset和Print等方法的輸出。當(dāng)AutoRedraw屬性為T(mén)rue時(shí)，重新還原該窗體以前的畫(huà)面；為False時(shí)，則不重畫(huà)。

屬性值說(shuō)明數(shù)值系統(tǒng)常量0VbNormal正常窗口狀態(tài)，有窗口邊界1vbMinimized最小化狀態(tài)，以圖標(biāo)方式運(yùn)行2vbMaximized最大化狀態(tài)，無(wú)邊框，充滿整個(gè)屏幕窗體的屬性注意：在窗體Load事件中如果要使用Print方法在窗體上打印輸出，就必須先將窗體的AutoRedraw屬性設(shè)置為T(mén)rue；否則窗體啟動(dòng)后將沒(méi)有輸出結(jié)果。這是因?yàn)榇绑w是在Load事件執(zhí)行完后才顯示的。讀者一下子要記住這些屬性，是有一定困難的，要熟悉并應(yīng)用這些窗體屬性，最好的辦法是上機(jī)實(shí)踐。在“屬性”窗口中更改窗體的一些屬性，然后運(yùn)行該應(yīng)用程序并觀察修改的效果。窗體的事件

與窗體有關(guān)的事件較多，VisualBasic6.0中有30多個(gè)，讀者只需掌握一些常用事件，了解這些事件的觸發(fā)機(jī)制。下面對(duì)幾個(gè)常用窗體事件作一下介紹：1．Click事件在程序運(yùn)行時(shí)單擊窗體內(nèi)的某個(gè)位置，VisualBasic將調(diào)用窗體的Form_Click事件。如果單擊的是窗體內(nèi)的控件，則只能調(diào)用相應(yīng)控件的Click事件。2．DblClick事件

程序運(yùn)行時(shí)雙擊窗體內(nèi)的某個(gè)位置，就觸發(fā)了兩個(gè)事件，第一次按動(dòng)鼠標(biāo)時(shí)，觸發(fā)Click事件，第二次產(chǎn)生DblClick事件。

窗體的事件3．Load事件在程序運(yùn)行時(shí)，當(dāng)窗體被裝入工作區(qū)時(shí)，將觸發(fā)它的Load事件，所以該事件通常用來(lái)在啟動(dòng)應(yīng)用程序時(shí)對(duì)控件屬性和變量初始化。4．Unload事件卸載窗體時(shí)觸發(fā)該事件。5．Resize事件當(dāng)窗體大小發(fā)生改變時(shí)，將觸發(fā)一個(gè)Resize事件。6．Activate事件當(dāng)窗體由非活動(dòng)窗體變?yōu)榛顒?dòng)窗體，即當(dāng)窗體得到焦點(diǎn)時(shí)觸發(fā)該事件。

窗體的方法

窗體常用的方法有：Print（打印輸出）、Cls（清除）、Show（顯示）、Hide（隱藏）以及（Move）移動(dòng)等。1．Print方法用于在窗體上輸出信息，其使用格式為：窗體名.Print[輸出項(xiàng)列表]例如：Printx,y,"WINDOWS"，則在窗體上輸出x,y的值和“WINDOWS”。關(guān)于Print方法的使用在節(jié)作詳細(xì)介紹。2．Cls（清除）方法Cls方法用來(lái)清除運(yùn)行時(shí)在窗體上顯示的文本或圖形，它有如下格式：窗體名.ClsCls方法用來(lái)清除運(yùn)行時(shí)在窗體上顯示的文本或圖形，當(dāng)使用C1s方法后，窗體的當(dāng)前坐標(biāo)屬性CurrentX和CurrentY被設(shè)置為0。

窗體的方法3．Move（移動(dòng)）方法Move方法用來(lái)在屏幕上移動(dòng)窗體，它有如下格式：窗體名.MoveLeft[,Top[,Width[,Height]]]其中，Left、Top、With、Height均為單精度數(shù)值型數(shù)據(jù)，分別用來(lái)表示窗體相對(duì)于屏幕左邊緣的水平坐標(biāo)、相對(duì)于屏幕頂部的垂直坐標(biāo)、窗體的新寬度和新高度。Move方法至少需要一個(gè)Left參數(shù)值，其余均可省略。如果要指定其余參數(shù)值，則必須按順序依次給定前面的參數(shù)值。例如，不能只指定Width值，而不指定Left和Top值，但允許只指定前面部分的參數(shù)，而省略后面部分。例如，允許只指定Left和Top，而省略Width和Height，此時(shí)窗體的寬度和高度在移動(dòng)后保持不變。

窗體的方法例1-3使用Move方法移動(dòng)一個(gè)窗體。雙擊窗體，窗體移動(dòng)并定位在屏幕的左上角，同時(shí)窗體的長(zhǎng)寬也縮小一倍。為了實(shí)現(xiàn)這一功能，可以在窗體Forml的“代碼”窗口中輸入下列代碼：PrivateSubForm_DblClick()Form1.Move0,0,Form1.Width/2,Form1.Height/2EndSub

窗體的方法4．Show（顯示）方法Show方法用于在屏幕上顯示一個(gè)窗體，使指定的窗體在屏幕上可見(jiàn)，調(diào)用

Show方法與設(shè)置窗體Visible屬性為

True具有相同的效果。其調(diào)用格式如下：窗體名.Show[vbModal|vbModeless]【說(shuō)明】(1)該方法有一個(gè)可選參數(shù)，它有兩種可能值：vbModal或vbModeless，若未指定參數(shù)，則缺省為vbModal。Show方法的可選參數(shù)表示從當(dāng)前窗口或?qū)υ捒蚯袚Q到其他窗口或?qū)υ捒蛑坝脩舯仨毑扇〉膭?dòng)作。當(dāng)參數(shù)為vbModal時(shí)，要求用戶必須對(duì)當(dāng)前的窗口或?qū)υ捒蜃龀鲰憫?yīng)，才能切換到本應(yīng)用程序的其他窗口。(2)如果要顯示的窗體事先未裝入，系統(tǒng)將自動(dòng)調(diào)用Load命令裝入該窗體再顯示。窗體的方法5．Hide（隱藏）方法Hide方法用于使指定的窗體不顯示，但不從內(nèi)存中刪除窗體。其調(diào)用格式為：窗體名.Hide當(dāng)一個(gè)窗體從屏幕上隱去時(shí)，其Visible屬性被設(shè)置成False，并且該窗體上的控件也變得不可訪問(wèn)，但對(duì)運(yùn)行程序間的數(shù)據(jù)引用無(wú)影響。若要隱去的窗體沒(méi)有裝入，則Hide方法會(huì)裝入該窗體但不顯示。下面是一個(gè)使用Hide和Show方法的例子。

窗體的方法例1-4實(shí)現(xiàn)將指定的窗體在屏幕上進(jìn)行顯示或隱藏的切換。為了實(shí)現(xiàn)這一功能，可以在窗體Forml的“代碼”窗口中輸入下列代碼：PrivateSubForm_Click()Form1.Hide '隱藏窗體

MsgBox"單擊確定按鈕，使窗體重現(xiàn)屏幕" '顯示信息

Form1.Show '重現(xiàn)窗體EndSub窗體還有Line、Pset、Circle和Refresh等方法，這些方法將在第6章詳細(xì)討論。多窗體

建立新工程時(shí)，系統(tǒng)會(huì)自動(dòng)創(chuàng)建一個(gè)窗體，但除了簡(jiǎn)單的練習(xí)外，真正的商業(yè)化的應(yīng)用程序均需要使用多個(gè)窗體。因此，還需要了解關(guān)于多窗體的基本操作。(1)添加窗體。選擇“工程”菜單中“添加窗體”命令，VisualBasic將顯示如圖1-15所示的窗口；選擇“窗體”后單擊“打開(kāi)”按鈕即添加了新窗體。此后如打開(kāi)“工程資源管理器”，會(huì)顯示新增的窗體，如圖1-16所示。

圖1-15“添加窗體”窗口

圖1-16“工程資源管理器”窗口

多窗體(2)刪除窗體。右擊需刪除的窗體，在彈出的快捷菜單中選擇“移除...”選項(xiàng)。(3)運(yùn)行時(shí)顯示窗體。運(yùn)行時(shí)顯示窗體通過(guò)調(diào)用Show方法實(shí)現(xiàn)。如執(zhí)行語(yǔ)句“Form2.Show”

顯示窗體Form2。(4)關(guān)閉窗體。通過(guò)調(diào)用Unload方法實(shí)現(xiàn)。如執(zhí)行語(yǔ)句“UnloadForm2”關(guān)閉窗體Form2。(5)設(shè)置啟動(dòng)對(duì)象。一個(gè)工程（如工程1）若有多個(gè)窗體，其缺省狀態(tài)下通常由Form1啟動(dòng)，但可以通過(guò)選擇“工程”菜單的“工程1屬性”選項(xiàng)，在打開(kāi)的對(duì)話框中設(shè)置啟動(dòng)對(duì)象，如圖1-17所示。VisualBasic的啟動(dòng)對(duì)象可以是任何一個(gè)窗體，也可是一個(gè)用戶定義的主過(guò)程Submain，該過(guò)程必須寫(xiě)在標(biāo)準(zhǔn)模塊中。讀者詳見(jiàn)第4章。

多窗體圖1-17“工程屬性”對(duì)話框

與窗體加載與卸載過(guò)程相關(guān)的事件

在窗體加載與卸載過(guò)程中，系統(tǒng)將發(fā)生一系列的窗體事件，主要的事件名稱及事件發(fā)生的先后順序如圖1-18和圖1-19所示，它們分別說(shuō)明了在窗體加載和卸載過(guò)程中所用的語(yǔ)句、方法以及所觸發(fā)的事件的先后順序。

圖1-18窗體的加載過(guò)程Show方法Activate自動(dòng)建立Load語(yǔ)句建立窗體顯示在屏幕上裝入內(nèi)存所觸發(fā)的事件InitializeLoadResizePaintGotFocus隱藏窗體從內(nèi)存中刪除UnLoad方法Hide方法QueryUnloadUnloadTerminate圖1-19窗體的卸載過(guò)程DeActivateLostFocusVisualBasic應(yīng)用程序的組成

一個(gè)VisualBasic的應(yīng)用程序也稱為一個(gè)工程，由若干問(wèn)所組成。其中工程文件（*.Vbp）用來(lái)管理構(gòu)成應(yīng)用程序的所有文件，如：窗體文件（.Frm）、標(biāo)準(zhǔn)模塊文件（.Bas）、類模塊文件（.Cls）等等，它們的關(guān)系如圖1-20所示?！菊f(shuō)明】(1)每個(gè)窗體文件（也稱窗體模塊）包含窗體本身的數(shù)據(jù)（屬性）、方法和事件過(guò)程（即代碼部分，其中有為響應(yīng)特定事件而執(zhí)行的指令）。窗體還包含控件，每個(gè)控件都有自己的屬性、方法和事件過(guò)程集。除了窗體和各控件的事件過(guò)程，窗體模塊還可包含通用過(guò)程，是用戶自定義的子過(guò)程和函數(shù)過(guò)程，它對(duì)來(lái)自任何事件過(guò)程的調(diào)用都做出響應(yīng)。

(2)標(biāo)準(zhǔn)模塊是由那些與特定窗體或控件無(wú)關(guān)的代碼組成的另一類型的模塊。如果一個(gè)過(guò)程可能用來(lái)響應(yīng)幾個(gè)不同對(duì)象中的事件，應(yīng)該將這個(gè)過(guò)程放在標(biāo)準(zhǔn)模塊中，而不必在每一個(gè)對(duì)象的事件過(guò)程中重復(fù)相同的代碼。VisualBasic應(yīng)用程序的組成

(3)類模塊與窗體模塊類似，只是沒(méi)有可見(jiàn)的用戶界面。可以使用類模塊創(chuàng)建含有方法和屬性代碼的自己的對(duì)象，這些對(duì)象可被應(yīng)用程序內(nèi)的過(guò)程調(diào)用。標(biāo)準(zhǔn)模塊只包含代碼，而類模塊既包含代碼又包含數(shù)據(jù)，可視為沒(méi)有物理表示的控件。

一個(gè)或若干個(gè)標(biāo)準(zhǔn)模塊（.Bas）文件VB工程（*.Vbp）類模塊(.Cls)文件一個(gè)或若干個(gè)窗體模塊(*.Frm)文件1各種控件2.窗體及控件的事件過(guò)程3.自定義子過(guò)程（Sub）4.自定義函數(shù)過(guò)程（Function）1.自定義子過(guò)程（Sub）2.自定義函數(shù)過(guò)程（Function）圖1-20VisualBasic應(yīng)用程序中各文件的關(guān)系

VisualBasic應(yīng)用程序的組成除了上面的文件外，一個(gè)工程還包括以下幾個(gè)附屬文件，它們沒(méi)法在工程資源管理窗口中查看或管理。(1)窗體的二進(jìn)制數(shù)據(jù)文件（.frx）：如果窗體上控件的數(shù)據(jù)屬性含有二進(jìn)制屬性（例如圖片或圖標(biāo)），當(dāng)保存窗體文件時(shí)，就會(huì)自動(dòng)產(chǎn)生同名的.frx文件。(2)資源文件（.res）：包含著不必重新編輯代碼就可以改變的位圖、字符串和其他數(shù)據(jù)。該文件是可選項(xiàng)。(3)ActiveX控件的文件（.ocx）：ActiveX控件的文件是一段設(shè)計(jì)好的可以重復(fù)使用的程序代碼和數(shù)據(jù)，可以添加到工具箱，并可像其他控件一樣在窗體中使用。該文件是可選項(xiàng)。VisualBasic應(yīng)用程序的工作方式

VisualBasic應(yīng)用程序采用的是以事件驅(qū)動(dòng)應(yīng)用程序的工作方式。事件是窗體或控件所能識(shí)別的動(dòng)作。在響應(yīng)事件時(shí)，事件驅(qū)動(dòng)應(yīng)用程序執(zhí)行相應(yīng)事件的程序代碼。VisualBasic的每一個(gè)窗體和控件都有一個(gè)預(yù)定義的事件集。如果其中有一個(gè)事件發(fā)生，并且在關(guān)聯(lián)的事件過(guò)程中存在代碼，VisualBasic則執(zhí)行該代碼

注意：有些事件伴隨其他事件發(fā)生。例如，在DblClick事件發(fā)生時(shí)，Click、MouseDown和MouseUp事件也會(huì)發(fā)生。

創(chuàng)建應(yīng)用程序的步驟

創(chuàng)建VisualBasic應(yīng)用程序一般有以下幾個(gè)步驟：(1)新建工程。(2)創(chuàng)建應(yīng)用程序界面。使用工具箱在窗體上放置所需控件，其中，窗體是用戶進(jìn)行界面設(shè)計(jì)時(shí)在其上放置控件的窗口，它是創(chuàng)建應(yīng)用程序界面的基礎(chǔ)。(3)設(shè)置屬性值。通過(guò)這一步驟來(lái)改變對(duì)象的外觀和行為。屬性值可通過(guò)屬性窗口設(shè)置，也可通過(guò)程序代碼設(shè)置。(4)對(duì)象事件過(guò)程的編程。通過(guò)代碼窗口為對(duì)象的相關(guān)事件編寫(xiě)代碼。(5)保存文件。運(yùn)行調(diào)試程序之前，一般要先保存文件。(6)程序運(yùn)行與調(diào)試。測(cè)試所編程序，若運(yùn)行結(jié)果有錯(cuò)或?qū)τ脩艚缑娌粷M意，則可通過(guò)前面的步驟修改，繼續(xù)測(cè)試直到運(yùn)行結(jié)果正確、用戶滿意為止，再次保存修改后的程序。

1.6一個(gè)簡(jiǎn)單的VisualBasic程序的創(chuàng)建實(shí)例

本節(jié)通過(guò)一個(gè)簡(jiǎn)單的VisualBasic程序建立與調(diào)試實(shí)例，向讀者介紹VisualBasic應(yīng)用程序的開(kāi)發(fā)過(guò)程，VisualBasic集成開(kāi)發(fā)環(huán)境的使用。使讀者初步掌握VisualBasic程序的開(kāi)發(fā)過(guò)程，理解VisualBasic程序的運(yùn)行機(jī)制。讀者可以通過(guò)上機(jī)，自己動(dòng)手建立一個(gè)簡(jiǎn)單的VisualBasic程序。

例1-5設(shè)計(jì)一個(gè)程序，當(dāng)程序運(yùn)行后，在窗體的正中間顯示“你好！請(qǐng)輸入你的姓名”，焦點(diǎn)定在其下的文本框中（如圖1-21所示），當(dāng)用戶輸入姓名并單擊“確定”按鈕后，在窗體中用黑體、12磅、紅色字顯示“XXX同學(xué)，你好！祝你學(xué)好VB程序設(shè)計(jì)”，同時(shí)窗體上出現(xiàn)兩個(gè)命令按鈕“繼續(xù)”和“結(jié)束”，其中“XXX”是用戶輸入的姓名，例如，當(dāng)用戶輸入“王五”，單擊“確定”按鈕后，就會(huì)出現(xiàn)如圖1-22所示的界面，如果單擊“繼續(xù)”按鈕，則又回到初始運(yùn)行狀態(tài)；單擊“結(jié)束”按鈕即結(jié)束程序運(yùn)行。1.6一個(gè)簡(jiǎn)單的VisualBasic程序的創(chuàng)建實(shí)例

分析：本應(yīng)用程序的界面設(shè)計(jì)用到了3個(gè)VisualBasic基本控件，即命令按鈕、標(biāo)簽和文本框，這3個(gè)基本控件是VisualBasic程序設(shè)計(jì)中使用最多的控件，下面首先對(duì)這3個(gè)控件作些簡(jiǎn)單介紹，更詳細(xì)的介紹讀者可閱讀5.1節(jié)。

圖1-21程序運(yùn)行后初始界面圖1-22單擊窗體后的程序界面

1.6一個(gè)簡(jiǎn)單的VisualBasic程序的創(chuàng)建實(shí)例1．命令按鈕命令按鈕（CommandBttion）是用來(lái)接受用戶的操作信息，激發(fā)某些事件，實(shí)現(xiàn)一個(gè)命令的啟動(dòng)、中斷和結(jié)束等操作的。命令按鈕在工具箱中的圖標(biāo)為

，在程序設(shè)計(jì)中該類對(duì)象名的前綴為cmd。命令按鈕的基本屬性：Name、Height、Width、Top、Left、Enabled、Visible、Font等，與窗體的使用相同，顯示在命令按鈕上的信息是標(biāo)題屬性（Caption屬性）。通常使用的是單擊事件（Click事件）。2．標(biāo)簽標(biāo)簽（Label）控件可以顯示用戶不能直接改變的文本，在窗體上顯示說(shuō)明性信息。標(biāo)簽在工具箱中的圖標(biāo)為。

1.6一個(gè)簡(jiǎn)單的VisualBasic程序的創(chuàng)建實(shí)例3．文本框文本框（TextBox）通常用于顯示用戶輸入的信息，作為接受用戶輸入數(shù)據(jù)的接口；也可以在設(shè)計(jì)或運(yùn)行時(shí)，通過(guò)對(duì)控件的Text屬性賦值。文本框在工具箱中的圖標(biāo)為。用戶在文本框中輸入的信息存放在“Text”屬性中，程序中可通過(guò)對(duì)文本框Text屬性賦值，修改顯示在文本框中的內(nèi)容。Text屬性值為字符型（String）。文本框常用到Change事件、LostFocus事件和KeyPress事件。用戶改變文本框的內(nèi)容或通過(guò)代碼改變“Text”屬性的設(shè)置時(shí)，將觸發(fā)Change事件。當(dāng)用戶用“Tab”鍵或鼠標(biāo)選擇窗體上的其他對(duì)象而離開(kāi)文本框時(shí)，將觸發(fā)LostFocus事件。當(dāng)進(jìn)行文本輸入時(shí)，每一次鍵盤(pán)輸入，都將使文本框接受一個(gè)ASCII碼字符，而發(fā)生KeyPress事件。

啟動(dòng)VisualBasic6.0，將出現(xiàn)“新建工程”對(duì)話框（如圖1-1所示），從中選擇“標(biāo)準(zhǔn)EXE”，單擊“打開(kāi)”按鈕，即進(jìn)入VisualBasic的“設(shè)計(jì)工作模式”，這時(shí)VisualBasic創(chuàng)建了一個(gè)帶有單個(gè)窗體的新工程。系統(tǒng)默認(rèn)工程為“工程1”，圖1-2所示的即為系統(tǒng)集成開(kāi)發(fā)環(huán)境窗口。根據(jù)題的要求，在界面上拖放2個(gè)標(biāo)簽、1個(gè)文本框，3個(gè)命令按鈕。按表1-3設(shè)置對(duì)象的相關(guān)屬性。

表1-3各對(duì)象控件的屬性設(shè)置

對(duì)象默認(rèn)名設(shè)置對(duì)象名稱（“Name”屬性）標(biāo)題屬性（“Caption”屬性）其他屬性Form1使用對(duì)象默認(rèn)名一個(gè)簡(jiǎn)單的VB程序

Text1無(wú)定義Text為空串Label1你好！請(qǐng)輸入你的姓名

Label2空串AutoSize=True，Visible=FalseCommand1確定

Command2繼續(xù)Visible=FalseCommand3結(jié)束Visible=False按表1-3設(shè)置好控件屬性，并調(diào)整好各控件的位置，如圖1-23所示。這樣便初步完成了應(yīng)用程序的界面設(shè)計(jì)。通過(guò)按F5鍵或選擇“運(yùn)行”菜單的“啟動(dòng)”命令或單擊工具欄中的“運(yùn)行”按鈕

，查看運(yùn)行界面，如圖1-24所示。此時(shí)程序不能響應(yīng)用戶的操作，這就需要編寫(xiě)相關(guān)事件的代碼。

圖1-23程序的界面設(shè)計(jì)圖1-24程序運(yùn)行最初界面

在設(shè)計(jì)窗口，雙擊命令按鈕進(jìn)入代碼編輯窗口編寫(xiě)程序代碼，或通過(guò)“資源管理窗口”的“查看代碼”按鈕，也可以進(jìn)入代碼窗口。單擊“選擇對(duì)象”下拉列表框的下拉按鈕，從中選擇“Command1”對(duì)象，再?gòu)摹斑x擇事件”下拉列表框中選擇“Click“事件，則在代碼窗口中會(huì)出現(xiàn)事件過(guò)程的框架，如圖1-25所示。圖1-25代碼窗口

在命令按鈕的單擊事件中寫(xiě)入如下代碼：PrivateSubCommand1_Click()'確定命令按鈕單擊事件過(guò)程

Command1.Visible=False'將Command1不顯示

Text1.Visible=False'將Text1不顯示

Label1.Visible=False'將Label1不顯示

Label2.Visible=True'將Label2不顯示

Label2.AutoSize=True‘

將Label2設(shè)置自動(dòng)改變大小，以適應(yīng)顯示的文字

Label2.FontSize=12'設(shè)置Label2的字體為12磅

Label2.FontName=“黑體”'設(shè)置Label2的字體為黑體

Label2.ForeColor=vbRed'設(shè)置Label2的前景顏色

Label2.Caption=Text1.Text&"同學(xué)，你好！祝你學(xué)好VB程序設(shè)計(jì)"

Command2.Visible=True'將Command2顯示

Command3.Visible=True'將Command3顯示EndSub

PrivateSubCommand2_Click()'繼續(xù)命令按鈕單擊事件過(guò)程

Command2.Visible=FalseCommand3.Visible=FalseLabel1.Visible=TrueLabel2.Visible=FalseCommand1.Visible=TrueText1.Visible=TrueEndSubPriv