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

1、visualbasic6.0程序設(shè)計(jì)教程第一章visual basic 程序設(shè)計(jì)概述主要內(nèi)容l 窗體（form）窗口 l 屬性(properties)窗口l 工程資源管理器(project explorer)窗口（代碼查看、查看對(duì)象、切換文件夾按鈕）l 代碼(code)窗口 l 立即(immediate)窗口 l 窗體布局(form layout)窗口l 工具箱(toolbox)窗口l 工具欄的定制 l 用戶自定義常用控件的名稱前綴和默認(rèn)名稱什么是visual basicvisual basic 6.0中文版是一種應(yīng)用程序開發(fā)工具，它的功能就是用來編程編制適合在windows95/98/nt操

2、作系統(tǒng)下的應(yīng)用程序。首先是”visual”,”visual”一詞在辭典上的含義是”看的、視覺的、用于看的 ”，引伸到計(jì)算機(jī)程序設(shè)計(jì)領(lǐng)域中就變?yōu)椤笨梢暬某绦蛟O(shè)計(jì)”，microsoft公司的其他冠以visual的產(chǎn)品也都含有這個(gè)意思。何謂”可視化程序設(shè)計(jì)”？它指的是一種開發(fā)圖形用戶界面的方法，使用這種方法，程序員不須編寫大量代碼去描述界面元素的外觀和位置，只要把預(yù)先建立的界面元素用鼠標(biāo)拖放到屏幕上適當(dāng)?shù)奈恢眉纯?。visual basic是在原有basic語(yǔ)言的基礎(chǔ)上進(jìn)一步發(fā)，至今包含了數(shù)百條語(yǔ)句、函數(shù)及關(guān)鍵詞，其中很多和windows guie直接關(guān)系。專業(yè)人員可以用visual basic實(shí)現(xiàn)

3、其他任何windows編程語(yǔ)言的功能，而初學(xué)者只要掌握 幾個(gè)關(guān)鍵詞就可以建立實(shí)用的應(yīng)用程序。所以，visual basic 這兩個(gè)單詞連在一起，就可以從中得到關(guān)于它的一個(gè)簡(jiǎn)單的概念使用basic語(yǔ)言進(jìn)行可視化程序開發(fā)的工具。 1.1 vb的功能特點(diǎn)1.1.1 引例運(yùn)行myvb夾中的vb1ex1_1lbc01_1.vbp程序代碼：dim step1 as integerdim step2 as integerpublic sub center() 將標(biāo)簽控件移到窗體中央label1.top = (form1.height - label1.height) / 2label1.left = (fo

4、rm1.width - label1.width) / 2label1.move label1.left, label1.topend subpublic sub mymoveleftright() 左右移動(dòng)過程label1.move label1.left + 50 * step2, label1.topif label1.left form1.width thenstep2 = -1elseif label1.left form1.height then 到達(dá)窗體底部step1 = -1elseif label1.top 0 then到達(dá)窗體頂部step1 = 1end ifend sub

5、private sub cmdauto_click() 上下自動(dòng)按鈕timer1.interval = 200 0.2秒激活執(zhí)行一次過程mymove（上下移動(dòng))timer2.interval = 0 撤銷左右自動(dòng)移動(dòng)call centerend subprivate sub cmdhand_click() 手動(dòng)按鈕timer1.interval = 0 撤銷上下自動(dòng)移動(dòng)timer2.interval = 0 撤銷左右自動(dòng)移動(dòng)call mymove 執(zhí)行手動(dòng)移動(dòng)程end subprivate sub cmdleferight_click() 左右自動(dòng)按鈕timer2.interval = 200

6、 0.2秒激活執(zhí)行一次過程左右移動(dòng)過程timer1.interval = 0 撤銷上下自動(dòng)移動(dòng)過程call centerend subprivate sub form_load()step1 = 1timer1.interval = 0step2 = 1cmdleferight.tabindex = 0 設(shè)置焦點(diǎn)在命令控件cmdleferightform1.picture = loadpicture(club01.jpg)end subprivate sub timer1_timer() 定時(shí)器1事件call mymove 調(diào)用上下移動(dòng)過程end subprivate sub timer2_t

7、imer()定時(shí)器2事件call mymoveleftright 調(diào)用左右移動(dòng)過程end sub引例2 燈光字體閃爍運(yùn)行myvb夾中的vb1ex1_2lbc1_2.vbpprivate sub form_load()image2.left = image1.leftimage2.top = image1.topimage2.height = image1.heightimage2.width = image1.widthend subprivate sub timer1_timer()image2.visible = not image2.visibleform1.caption = 燈光閃爍

8、 + date$ + + time$ label1.forecolor = rgb(500 * rnd, 500 * rnd, 500 * rnd) 框架字體變色顯示end sub1.1.2 vb功能和特點(diǎn)1具有面向?qū)ο蟮目梢暬O(shè)計(jì)工具在vb中，應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)的方法（object oriented programming）,把程序和數(shù)據(jù)封裝起來視為一個(gè)對(duì)象，每個(gè)對(duì)象都是可視的。程序員在設(shè)計(jì)時(shí)只需要用現(xiàn)有的工具根據(jù)界面設(shè)計(jì)的要求，直接在屏幕上“畫出”窗口、菜單、命令按鈕等不同類型的對(duì)象，并為每個(gè)對(duì)象設(shè)置屬性。程序員的編程工作僅編寫針對(duì)對(duì)象要完成的事件過程的代碼。術(shù)語(yǔ)：對(duì)象：對(duì)象是vb程序

9、的組件，如控件、窗體或一段包含編程語(yǔ)句的代碼模塊。在vb中對(duì)象分全局使用對(duì)象和用戶界面對(duì)象。全局使用對(duì)象有：app(應(yīng)用程序)、clipborad(剪貼板)、dubeg(調(diào)試窗口)、printer(打印機(jī))、screen(屏幕)。用戶界面對(duì)象有：form(窗體)、mdiform(多文檔窗體)、control(控件).屬性： 能夠區(qū)分控件是因?yàn)閷傩詻Q定了控件的外觀和行為。屬性是有值的，例如顏色、文本標(biāo)簽、大小和在窗體的中的位置。在窗體中放置控件時(shí)，可以設(shè)置它的屬性使其有別用其他控件。form窗體： 也稱窗口，它由vb程序屏幕的背景和命令按鈕、滾動(dòng)條等組件組成。根據(jù)程序的性質(zhì)和復(fù)雜程度程度的不同，

10、程序中可能包括一個(gè)或多個(gè)窗體。2事件驅(qū)動(dòng)的編程機(jī)制傳統(tǒng)的編程方式是一種面向過程，按程序事先設(shè)計(jì)的流程運(yùn)行。但在圖形用戶界面的應(yīng)用程序中，用戶的動(dòng)作即事件掌握著程序的流程。事件#1 事件#2 事件#3事件#4 事件#5 windows 捕獲事件 windows事件#1 事件#2 事件#3應(yīng)用程序#1 應(yīng)用程序#2術(shù)語(yǔ)：事件：事件是在程序執(zhí)行時(shí)所發(fā)生的活動(dòng)，例如，單擊鼠標(biāo)或擊鍵。事件驅(qū)動(dòng)編程用于編寫響應(yīng)windows事件的程序。為事件編寫代碼后，在程序運(yùn)行期間，當(dāng)該事件發(fā)生時(shí)程序就響應(yīng)。如果沒有為某個(gè)事件編寫代碼，則當(dāng)其發(fā)生的時(shí)候，程序?qū)indows傳送給它的該事件不做響應(yīng)。3提供了易學(xué)易用的應(yīng)

11、用程序集成開發(fā)環(huán)境在vb集成開發(fā)環(huán)境中，用戶可設(shè)計(jì)界面、編寫代碼、調(diào)試程序，把應(yīng)用程序編譯成可執(zhí)行文件，直至把應(yīng)用程序制成安裝盤，以便能夠在脫離vb系統(tǒng)的windows環(huán)境中運(yùn)行，為用戶提供了友好的開發(fā)環(huán)境。術(shù)語(yǔ)代碼：代碼是程序指令集合的另一種稱呼。4結(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言vb具有豐富的數(shù)據(jù)類型、眾多的內(nèi)部函數(shù)、模塊化的、結(jié)構(gòu)化的程序設(shè)計(jì)語(yǔ)言，結(jié)構(gòu)清晰，簡(jiǎn)單易學(xué)。5強(qiáng)大的數(shù)據(jù)庫(kù)功能vb中利用數(shù)據(jù)控件可以訪問多種數(shù)據(jù)庫(kù)系統(tǒng)，如microsoft access、btreve、dbase、microsoft foxpro和paradox等，也可訪問microsoft excel、lotus1-2-3等

12、多種電子表格。vb6.0新增了功能強(qiáng)大、使用方便的ado(active database object)技術(shù)。ado包括了現(xiàn)有的odbc,而且占用內(nèi)存少，訪問速度更快。同時(shí)提供的ado控件，不但可以用最少的代碼創(chuàng)建數(shù)據(jù)庫(kù)應(yīng)用程序，也可以取代data 和rdo控件。支持多種數(shù)據(jù)庫(kù)系統(tǒng)的訪問。6active技術(shù)active技術(shù)發(fā)展了原有的ole技術(shù)，它使開發(fā)人員擺脫了特定語(yǔ)言的束縛，方便地使用其它應(yīng)用程序提供的功能。使用vb能夠開發(fā)集聲音、圖像、動(dòng)畫、字處理、電子表格、web等對(duì)象與一體的應(yīng)用程序。術(shù)語(yǔ)ole： 代表object linking and embedding。許多windows應(yīng)用以

13、ole對(duì)象的形式提供他們的數(shù)據(jù)，可以在其他支持ole的應(yīng)用程序中嵌入這些對(duì)象。activx技術(shù)將很快代替ole技術(shù)，事實(shí)上，microsoft稱activex控件為“以前的ole控件”。7網(wǎng)絡(luò)功能vb6.0最重要的新特性之一，是提供了dhtml(dynamic html)設(shè)計(jì)工具。這種技術(shù)可以使web頁(yè)面設(shè)計(jì)者動(dòng)態(tài)的創(chuàng)建和編輯頁(yè)面，使用戶在vb中開發(fā)多功能的網(wǎng)絡(luò)應(yīng)用軟件。8多個(gè)應(yīng)用程序向?qū)?application wizard)vb的應(yīng)用程序向?qū)Э梢宰詣?dòng)創(chuàng)建不同類型、不同功能的應(yīng)用程序。有應(yīng)用程序向?qū)А惭b向?qū)?、?shù)據(jù)對(duì)象向?qū)?、?shù)據(jù)窗體向?qū)Аis應(yīng)用程序和dhtml等。術(shù)語(yǔ)向?qū)В阂徊讲降靥岢鰡?/p>

14、題并提示你做出響應(yīng)。根據(jù)問題的答案，向?qū)梢粋€(gè)符合指定標(biāo)準(zhǔn)的應(yīng)用程序。vb提供許多向?qū)В畛Ｓ玫氖菓?yīng)用程序向?qū)А?完備的help聯(lián)機(jī)幫助功能在vb中，利用幫助菜單和f1功能鍵，用戶可隨時(shí)方便地得到所需的幫助信息；vb幫助窗口中顯示了有關(guān)的示例代碼，通過復(fù)制、粘貼操作可獲取大量的示例代碼，為用戶的學(xué)習(xí)和使用提供了捷徑。1.2 vb 的安裝和啟動(dòng)1.2.1 安裝1. 系統(tǒng)要求vb6.0是windows 9x以上或windowsnt下的一個(gè)應(yīng)用程序，對(duì)軟、硬件沒有特殊要求，只要能運(yùn)行windows 9x以上或windowsnt就可安裝運(yùn)行vb6.0。vb6.0右三種版本，即學(xué)習(xí)版、專業(yè)版和企業(yè)版

15、。企業(yè)版功能最全。專業(yè)版包括了學(xué)習(xí)班了學(xué)習(xí)版的功能。2. 安裝1.1.2 啟動(dòng)單擊“開始”按鈕選擇“程序”菜單，單擊“microsoft visual basic 6.0中文版”程序，就可啟動(dòng)vb6.0了。在“新建工程”窗口中三個(gè)選項(xiàng)卡：“新建”、“現(xiàn)存”和“最新”。單擊“新建”選項(xiàng)卡中的“標(biāo)準(zhǔn) exe”圖標(biāo)即可進(jìn)入建立應(yīng)用程序環(huán)境。在“新建”選項(xiàng)卡下，可建立新工程。在“現(xiàn)存”選項(xiàng)卡中可選擇打開現(xiàn)有工程。在“最新”選項(xiàng)卡中列出了最近使用過的工程。術(shù)語(yǔ)標(biāo)準(zhǔn)exestandard exe應(yīng)用程序是可以編譯或解釋執(zhí)行的應(yīng)用程序。工程工程（project）是構(gòu)成應(yīng)用程序所有文件的集合。單個(gè)的應(yīng)用程序可

16、能由許多文件組成，而工程是這些文件的集合。其中一些文件包含代碼，一些文件包含各窗體中屏幕的描述，另一些包括高級(jí)的編程信息，這些信息用于同操作系統(tǒng)中的其他程序的模塊進(jìn)行通信。1.3 集成開發(fā)環(huán)境1. 標(biāo)題欄標(biāo)題欄中的標(biāo)題為“工程1-microsoft visual baisc設(shè)計(jì)“此時(shí)的集成開發(fā)環(huán)境處于設(shè)計(jì)模式。在進(jìn)入其他狀態(tài)時(shí)，方括號(hào)中的文字將作相應(yīng)的變化。vb由三種工作模式:設(shè)計(jì)模式：可編輯代碼，可編輯界面。運(yùn)行模式：不可編輯代碼、不可編輯界面。中斷模式：可編輯代碼，但不可編輯界面。單擊“啟動(dòng)”按鈕可繼續(xù)運(yùn)行；單擊“結(jié)束”按鈕停止程序運(yùn)行。2. 菜單欄(1) 文件(file)(2) 編輯(e

17、dit)(3) 視圖(view)(4) 工程(project)(5) 格式(format)(6) 調(diào)試(debug)(7) 運(yùn)行(run)(8) 查詢(query)(9) 圖表(diagram)(10) 工具(tools)(11) 外接程序(add-ins)(12) 窗口(windows)(13) 幫助(help)3. 工具欄1.3.1 窗體（form）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“對(duì)象窗口” 或alt+v再按b鍵窗體是建立vb應(yīng)用程序的主要部分，用戶通過與窗體上的控件部件交互可得到結(jié)果。一個(gè)應(yīng)用程序至少有一個(gè)窗體，用戶可在應(yīng)用程序中擁有多個(gè)窗體。除了一般窗體外，還有一種mdi(multi

18、ple document interface)多文檔窗體。它可以包含子窗體，每個(gè)子窗體都是獨(dú)立的。窗體的默認(rèn)名form1,form2,。如果用戶自己給窗體命名一般在名字前加前綴frm（建議，以便識(shí)別對(duì)象）。介紹vb中的長(zhǎng)度單位twip（緹）twip是屏幕度量的單位?？梢哉J(rèn)為twip就是屏幕上的一個(gè)點(diǎn)，但不同的屏幕和顯示卡支持不同的分辨率，也就是有不同數(shù)目的點(diǎn)。twip是與分辨率無(wú)關(guān)的單位，它對(duì)應(yīng)的是想象的屏幕上的極小的點(diǎn)（比最高分辨率時(shí)的點(diǎn)還要?。?。因此，將窗體設(shè)置為7400twip時(shí)，窗體并不需要7400個(gè)屏幕點(diǎn)（像素）。設(shè)置窗體窗口的尺寸和位置時(shí)，注意在工具欄右邊顯示的位置座標(biāo)和尺寸。這些

19、值是成對(duì)出現(xiàn)的。第一對(duì)值代表窗體位置，其中的第一個(gè)值時(shí)窗體距屏幕左側(cè)的twip數(shù)，第二個(gè)數(shù)時(shí)窗體距離屏幕頂端的twip數(shù)。第二對(duì)值是尺寸坐標(biāo)，它代表窗體的寬與高（twip）。窗體的位置屬性表示窗體離屏幕左端和頂端的twip述，被命名為left和top。窗體的尺寸坐標(biāo)屬性表示窗體的寬與高（twip），即width和height。在窗體窗口編輯區(qū)中移動(dòng)窗體或調(diào)整窗體大小時(shí)，visual basic會(huì)自動(dòng)修改屬性窗口中相應(yīng)屬性的值。1.3.2 屬性（properties）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“屬性窗口” 或alt+v再按w鍵屬性窗口有四個(gè)部分構(gòu)成：（1）對(duì)象列表框：當(dāng)擊其右邊的下拉鈕可打

20、開所選窗體所含對(duì)象的列表。該列表分左右兩部分，左邊為對(duì)象名，右邊為控件名。（2）屬性顯示排列方式：“按字母序”和“按分類序”兩個(gè)選項(xiàng)卡。（3）屬性列表框：列出所選對(duì)象在設(shè)計(jì)模式中可更改的屬性及默認(rèn)值。他分成左右兩部分：左邊為屬性名，右邊為其屬性的屬性值。不同的對(duì)象，屬性列表框所列出的屬性也不相同。（4）屬性含義說明：當(dāng)在屬性列表框中選取某個(gè)屬性時(shí)，在該區(qū)顯示所選屬性的含義。1.3.3工程資源管理器（project explorer）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單擊“工程資源管理器窗口” 或alt+v再按p鍵工程資源管理器窗口下有三個(gè)按鈕：（1）“查看代碼”按鈕：按此按鈕，可切換到代碼窗口，顯示

21、和編輯代碼。（2）“查看對(duì)象”按鈕：按此按鈕，可切換到窗體窗口，顯示和編輯對(duì)象。（3）“切換文件夾”按鈕：切換文件夾顯示的方式。工程資源管理器窗口下的列表窗口，以層次列表形式列出組成這個(gè)工程的所有文件。主要有兩種類型的文件：(1)窗體文件（.frm文件）：該文件存儲(chǔ)窗體上使用的所有控件對(duì)象和有關(guān)的屬性、對(duì)象相應(yīng)的事件過程、程序代碼。一個(gè)應(yīng)用程序至少包含一個(gè)窗體文件。（2）標(biāo)準(zhǔn)模塊文件（.bas文件）：所與模塊級(jí)變量和用戶自定義的通用過程。通用過程是指可被應(yīng)用程序各處調(diào)用的過程。1.3.4 代碼（code）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“代碼窗口” 或alt+v再按c鍵還有兩外兩種常用的打開代

22、碼窗口的方法：（1）從工程資源管理器窗口中選擇一個(gè)窗體或標(biāo)準(zhǔn)模塊，并單級(jí)“查看代碼”按鈕。（2）在窗體窗口中，可雙擊一個(gè)控件或窗體本身。代碼窗口主要包括：（1）“對(duì)象”下拉列表框：顯示所選對(duì)象的名稱?？蓡螕粲疫叺南吕粹o，來顯示此窗口的對(duì)象名。其中的“通用”表示與特定的對(duì)象無(wú)關(guān)的通用代碼，一般在此聲明模塊級(jí)變量或用戶編寫自定義過程。（2）“過程”下拉列表框：列出所有對(duì)應(yīng)于“對(duì)象”列表框中對(duì)象的事件過程名（和可顯示用戶自定義過程名）。其中的“聲明”表示聲明模塊級(jí)變量。在“對(duì)象”列表框中選擇一個(gè)對(duì)象，在“過程”列表框中選擇一個(gè)事件過程名，即可夠成一個(gè)選中“對(duì)象”的事件過程模板。（3）“代碼”框：在

23、此框中輸入程序代碼。（4）“過程查看”按鈕：只能顯示所選的一個(gè)過程。（5）“全模塊查看”按鈕：顯示模塊中全部過程。1.3.5 立即（immediate）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“立即窗口” 或alt+v再按i鍵為調(diào)試應(yīng)用程序提供的，在ide之中運(yùn)行程序才有效。1.3.6 窗體布局（form layout）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“窗體布局窗口”或alt+v再按f鍵1.3.7 工具箱（toolbox）窗口啟動(dòng)：?jiǎn)螕簟耙晥D”菜單，單記“工具箱”或alt+v再按x鍵vb把工具箱里面形如按鈕的“東西”叫做“控件”（controls）,或稱為activx對(duì)象，也稱為對(duì)象。工具箱中通常提供

24、20個(gè)標(biāo)準(zhǔn)控件。這20個(gè)控件的名稱和系統(tǒng)默認(rèn)名及用戶給他們重新命名的前綴部分（建議，以便識(shí)別控件）如下表：控件名稱系統(tǒng)默認(rèn)（name）用戶命名的前綴標(biāo)簽(label)label1lbl框架(frame)frame1fra檢查框(checkbox)check1chk組合框(combobox)combo1cbo水平滾動(dòng)條(hscorllbox)hscorll1hsb時(shí)鐘(timer)timer1tmr目錄列表框(dirlistbox)dir1dir形狀控件（shape）shape1shp圖像控件(image)image1img對(duì)象鏈接與嵌入(ole)-ole控件ole1ole圖片框(picture

25、box)picture1pic文本框(textbox)text1txt命令按鈕(commandbutton)command1cmd單選按鈕(optionbutton)option1opt列表框(listbox)list1lst垂直滾動(dòng)條(vscrollbox)vscroll1vsb驅(qū)動(dòng)器列表框(drivelistbox)drive1drv文件列表框(filelistbox)file1fil直線控件(line)line1lin數(shù)據(jù)控件（data）data1dat選擇工具窗體form1frm菜單mnu模塊mod用戶自定義數(shù)據(jù)類型typ可在工具箱中添加新的其他控件。方法是單擊“工程”菜單，單擊部件命

26、令，選擇要裝入的控件。第二章 簡(jiǎn)單的vb程序設(shè)計(jì)主要內(nèi)容l 對(duì)象和類l 屬性、事件、方法l 應(yīng)用程序的建立方法和運(yùn)行l(wèi) 窗體、標(biāo)簽、文本框、命令按鈕l 一些常用方法：print、cls、move、setfocusl 工程的管理及環(huán)境設(shè)置l 程序調(diào)試與排錯(cuò)1.初期的程序設(shè)計(jì)高運(yùn)行效率、少占用內(nèi)存為目標(biāo)2.結(jié)構(gòu)化程序設(shè)計(jì)程序的可讀性、可維護(hù)性為目標(biāo)程序=算法+數(shù)據(jù)結(jié)構(gòu) 面向過程的程序設(shè)計(jì)3.面向?qū)ο蟮某绦蛟O(shè)計(jì)降低程序的復(fù)雜性、提高軟件的開法效率和改善工作界面為目標(biāo)程序=對(duì)象+消息 面向?qū)ο蟮某绦蛟O(shè)計(jì)2.1對(duì)象的有關(guān)概念2.1.1對(duì)象和類1.對(duì)象對(duì)象在現(xiàn)實(shí)生活中到處可見，例如，一個(gè)人、一輛汽車、一臺(tái)

27、電腦都是一個(gè)對(duì)象。因此，對(duì)象是具有某些特征的具體事物的抽象。每個(gè)對(duì)象都具有描述其特征的屬性，及附屬于它的行為。對(duì)象還可分為很多小對(duì)象，例如車輪也是一個(gè)對(duì)象，它由外胎、內(nèi)胎、尺寸等屬性。對(duì)象是類的一個(gè)實(shí)例，繼承了類的屬性、方法。vb中常用的對(duì)象有:窗體、控件等。2.類類是創(chuàng)建對(duì)象實(shí)例的模板,是同種對(duì)象的集合與抽象，它包含了創(chuàng)建對(duì)象的屬性描述和行為特征的定義。類是對(duì)象的定義，而對(duì)象是類的一個(gè)實(shí)例。類的一組屬性和方法定義了類的界面，它封裝了用于類的全部信息。當(dāng)應(yīng)用程序在某處由類創(chuàng)建一個(gè)對(duì)象，用戶只要使用對(duì)象的屬性和方法進(jìn)行相應(yīng)的操作，而不必關(guān)心其內(nèi)部是如何實(shí)現(xiàn)的。面向?qū)ο蟮某绦蛟O(shè)計(jì)主要建立在類和對(duì)象

28、的基礎(chǔ)上。通常的面向?qū)ο蟮某绦蛟O(shè)計(jì)中的類是由程序員設(shè)計(jì)的。而在vb重，類可由系統(tǒng)設(shè)計(jì)好，也可由程序員自己設(shè)計(jì)。在vb中，工具箱上的可視類圖標(biāo)是vb系統(tǒng)設(shè)計(jì)好的標(biāo)準(zhǔn)控件類，此外，vb還可在“工程”菜單的“部件”項(xiàng)中加入大量的activex控件。通過將類實(shí)例化，可以得到真正的控件對(duì)象。也就是說當(dāng)在窗體上畫好一個(gè)控件時(shí)，就將類轉(zhuǎn)換成對(duì)象，即創(chuàng)建了一個(gè)控件對(duì)象，簡(jiǎn)稱為控件。除了通過控件類產(chǎn)生控件對(duì)象外,vb還提供了系統(tǒng)對(duì)象，例如，打印機(jī)（printer）、剪貼板（clipbord）、屏幕（screen）、應(yīng)用程序（app）錯(cuò)誤（err）等。窗體是一個(gè)特例，它既是類也是對(duì)象。當(dāng)向一個(gè)工程添加一個(gè)窗體時(shí)，

29、實(shí)質(zhì)就是由窗體類創(chuàng)建了一個(gè)窗體對(duì)象。21.2 對(duì)象的建立和編輯1.對(duì)象的建立在窗體上建立對(duì)象的步驟如下：(1）鼠標(biāo)定位在工具箱內(nèi)要制作控件對(duì)象的對(duì)應(yīng)的圖標(biāo)上，單擊進(jìn)行選擇；(2)將鼠標(biāo)移到窗體上所需的位置處，按下鼠標(biāo)左鍵拖拽到所需的大小后釋放鼠標(biāo)。也可雙擊工具箱上的某個(gè)控件類圖標(biāo)，即可在窗體的中心處形成一個(gè)默認(rèn)大小的對(duì)象。2.對(duì)象的選定單擊窗體上的對(duì)象，即可選中該對(duì)象；被選中的對(duì)象，對(duì)象的邊框上將出現(xiàn)8個(gè)蘭色的方塊，稱為控制柄。操縱這些控制柄可改變對(duì)象的大小。要同時(shí)選中多個(gè)對(duì)象進(jìn)行操作，有兩種方法：方法一：拖動(dòng)鼠標(biāo)指針，將欲選定的對(duì)象包圍在一個(gè)虛框中然后釋放鼠標(biāo)按鈕即可。方法二：先選定一個(gè)對(duì)象

30、，按ctrl鍵，再逐一單擊其他要選定的控件。3.復(fù)制或刪除對(duì)象（1）復(fù)制對(duì)象 選中要復(fù)制的對(duì)象，單擊工具欄的“復(fù)制”按鈕，再單擊“粘貼”按鈕，這時(shí)顯示是否要?jiǎng)?chuàng)建控件數(shù)組對(duì)話框，單擊對(duì)話框中的“否”按鈕，這樣就復(fù)制了標(biāo)題相同而名稱不同的對(duì)象了。（2）刪除對(duì)象 選中刪除的對(duì)象，然后按del鍵。4.對(duì)象的命名每個(gè)對(duì)象系統(tǒng)都給它確定了默認(rèn)的名字，這在第一章介紹工具箱中的標(biāo)準(zhǔn)控件已經(jīng)列表介紹了。用戶可以在控件的屬性窗口中的name屬性中自己重新定義控件的名字?？丶话慵由峡丶熬Y，以便見名知道控件的類型，同時(shí)長(zhǎng)度應(yīng)小于等于255個(gè)字符。21.3 對(duì)象的屬性、事件和方法每個(gè)vb控件都是具有屬于自己的屬

31、性、事件和方法的對(duì)象。可以把屬性看成一個(gè)對(duì)象的性質(zhì)，把事件看成對(duì)象的響應(yīng)，把方法看成對(duì)象的動(dòng)作。因此，屬性、事件、方法構(gòu)成了對(duì)象的三個(gè)要素。1.屬性 對(duì)象的性質(zhì)，即用來描述和反映對(duì)象特征的參數(shù)?？梢酝ㄟ^以下兩種方法設(shè)置對(duì)象的屬性：在設(shè)計(jì)階段，通過屬性窗口直接來設(shè)置對(duì)象的屬性。在程序代碼中通過賦值實(shí)現(xiàn)，其格是為： 對(duì)象名.屬性名=屬性值例如：commd1.caption=”確定” text1.text=”好人一生平安” text1.fontname=”宋體”2.事件 、事件過程和事件驅(qū)動(dòng)（1）事件響應(yīng)對(duì)象的動(dòng)作稱為事件，它發(fā)生在用戶與應(yīng)用程序交互時(shí)。也就是說事件時(shí)發(fā)生在該對(duì)象上的事情。系統(tǒng)為每個(gè)

32、對(duì)象預(yù)先定義好了一系列的事件，如單擊控件、鼠標(biāo)移動(dòng)、鍵盤按下等。常用控件事件一覽表事件描述activeate窗體獲得焦點(diǎn)時(shí)發(fā)生,它發(fā)生在gotfocus事件之前。deactivate另一個(gè)窗體獲得焦點(diǎn)時(shí)發(fā)生，它發(fā)生在lostfocus事件之后。mousedown按下鼠標(biāo)按鈕click單擊鼠標(biāo)按鈕mouseup松開鼠標(biāo)按鈕dblclick雙擊鼠標(biāo)按鈕mousemove移動(dòng)鼠標(biāo)initialize窗體首次生成時(shí)發(fā)生load窗體裝入到活動(dòng)內(nèi)存并顯示到屏幕上時(shí)發(fā)生unload應(yīng)用程序利用代碼將窗體從窗口中刪除時(shí)發(fā)生。paint當(dāng)用戶移走覆蓋窗體的對(duì)象（如圖標(biāo)）導(dǎo)致窗體重繪時(shí)發(fā)生resize窗體、圖片框

33、大小發(fā)生改變時(shí)發(fā)生change文本框、標(biāo)簽、滾動(dòng)條、組合框等內(nèi)容發(fā)生改變時(shí)發(fā)生kepress按鍵盤時(shí)發(fā)生timer定時(shí)器事件說明：對(duì)于可接受鼠標(biāo)事件的控件來說，事件發(fā)生的順序?yàn)閙ousedown，click，mouseup，dblclick。（2）事件過程 當(dāng)在某個(gè)對(duì)象上發(fā)生了某個(gè)事件后，應(yīng)用程序就要處理這個(gè)事件，而處理的步驟就是運(yùn)行事件過程（用戶編寫的程序代碼,就是事件的處理程序）。它是針對(duì)某個(gè)對(duì)象而言的過程。事件過程的形式如下：private sub 對(duì)象名_事件名（參數(shù)列表）end sub當(dāng)用戶對(duì)一個(gè)對(duì)象發(fā)出一個(gè)動(dòng)作時(shí)，可能會(huì)同時(shí)在該對(duì)象上發(fā)生多個(gè)事件。寫程序時(shí)并不是都要對(duì)這些事件編寫代

34、碼，只要編寫用戶對(duì)某些事件感興趣的過程代碼。沒有編寫代碼的事件為空事件，系統(tǒng)也不會(huì)處理該過程。(3)事件驅(qū)動(dòng)程序設(shè)計(jì) 在vb中，程序在執(zhí)行后系統(tǒng)等待某個(gè)事件的發(fā)生，一旦發(fā)生了某事件就去執(zhí)行處理此事件的事件過程，待該事件過程執(zhí)行完后，系統(tǒng)又處于等待某個(gè)事件發(fā)生的狀態(tài)，這就是事件驅(qū)動(dòng)程序設(shè)計(jì)方式。vb程序的執(zhí)行步驟如下：1）啟動(dòng)應(yīng)用程序，裝載和顯示窗體2）窗體（或窗體上的控件）等待事件的發(fā)生；3）事件發(fā)生時(shí)，執(zhí)行對(duì)應(yīng)的事件過程；4）重復(fù)執(zhí)行步驟（2）和（3）;5）直到遇到“end”結(jié)束語(yǔ)句結(jié)束程序的運(yùn)行或按“結(jié)束”強(qiáng)行停止程序的運(yùn)行。3.方法 面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言，為程序設(shè)計(jì)人員提供了一種特殊的

35、過程和函數(shù)（稱為方法）。在vb中已將一些通用的過程和函數(shù)編寫好并封裝起來，作為方法供用戶直接調(diào)用。方法的調(diào)用格式：對(duì)象.方法名參數(shù)列表如省略了對(duì)象，表示為當(dāng)前對(duì)象，一般為窗體。例如：form1.print ”歡迎光臨”2.2建立簡(jiǎn)單的應(yīng)用程序建立一個(gè)用用程序分以下幾個(gè)步驟：（1）建立用戶界面的對(duì)象（2）對(duì)象屬性的設(shè)置（3）對(duì)象事件過程及編碼（4）保存和運(yùn)行程序例2.1 在myvb下 vb2ex2_1lbc02_1.vbp2.2.1 建立用戶界面的對(duì)象按例2.1表述2.2.2 對(duì)象屬性的設(shè)置按例2.1表述并演示下表:對(duì)象屬性的設(shè)置默認(rèn)控件標(biāo)題（caption）文本（text）字號(hào)（fontsiz

36、e）磅值form1大小寫字母轉(zhuǎn)換無(wú)定義12label1輸入字符串無(wú)定義12label2轉(zhuǎn)換無(wú)定義12text1無(wú)定義空白10text2無(wú)定義空白10command1清屏無(wú)定義10command2結(jié)束無(wú)定義10“無(wú)定義”表示該對(duì)象無(wú)此屬性，“空白”表示清除原屬性2.2.3 對(duì)象事件過程及編程private sub cmdexit_click() 結(jié)束按鈕endend subprivate sub cmdnew_click() 清屏按鈕txtinput = text屬性是文本框的默認(rèn)屬性txtresult = txtresult 相當(dāng)于 txtresult.texttxtinput.setfocu

37、s 焦點(diǎn)落在txtinput文本框上end subprivate sub txtinput_keypress(keyascii as integer) 輸入文本框按鍵事件dim aa as string * 1aa = chr$(keyascii) 按下的字符返回其ascii碼值select case aacase a to zaa = chr$(keyascii + 32) 轉(zhuǎn)成小寫字母case a to zaa = chr(keyascii - 32) 轉(zhuǎn)成大寫字母case 空格字符不轉(zhuǎn)換case elseaa = * 其他字符轉(zhuǎn)換成*end selecttxtresult.text =

38、txtresult.text + aa 轉(zhuǎn)換內(nèi)容放在結(jié)果文本框內(nèi)end sub2.2.4 保存和運(yùn)行程序1保存工程第一次保存文件或欲對(duì)文件改名存盤時(shí)，分別選擇“文件”菜單下的“form1另存為”（窗體文件）命令和“工程另存為”（工程文件）命令；在彈出的對(duì)話框里填入存儲(chǔ)目錄，窗體文件名，工程文件名并按保存按鈕即可。以后保存文件只要按工具欄上的保存圖標(biāo)即可。注：工程文件的擴(kuò)展名為 .vbp,窗體文件的擴(kuò)展名為.frm。系統(tǒng)默認(rèn)將它們保存在vb98的文件目錄中。如要修改或運(yùn)行該文件，只要選擇“文件”菜單的“打開工程”命令，輸入要打開的工程文件名并按“打開”按鈕即可?；蛘叽蜷_保存工程文件的目錄雙擊工程

39、文件圖標(biāo)也可。2程序的運(yùn)行vb程序可以以兩種模式運(yùn)行，即編譯模式和解釋模式。（1）編譯運(yùn)行模式選擇“文件”菜單的“生成exe”命令后，系統(tǒng)讀取程序中全部代碼，將其轉(zhuǎn)換為機(jī)器代碼，并保存在.exe的可執(zhí)行文件中，供以后多次運(yùn)行。（2）解釋運(yùn)行模式選擇“運(yùn)行”菜單的“啟動(dòng)”命令（或按f5鍵、或單擊“啟動(dòng)”按鈕），系統(tǒng)讀取事件激發(fā)的那段事件過程代碼，將其轉(zhuǎn)換成機(jī)器代碼，然后執(zhí)行該機(jī)器代碼。由于轉(zhuǎn)換后的機(jī)器代碼不保存，如需要運(yùn)行，必須再解釋一次，因此運(yùn)行速度比編譯運(yùn)行模式慢。2.3 窗體和基本控件2.3.1 基本屬性1.name名稱屬性創(chuàng)建的對(duì)象有它默認(rèn)的名稱。在程序中，控件名是作為對(duì)象的標(biāo)識(shí)而引用，

40、不會(huì)顯示在窗體上?？稍趯傩源翱谥匦滦薷膎ame的屬性值從而達(dá)到修改控件名稱的目的。2.caption標(biāo)題屬性該屬性決定了在控件上顯示的內(nèi)容。3.height、width、top和left屬性height、width屬性，決定了控件的高度和寬度。top和left屬性決定了控件距離窗體的上邊框距離和距離窗體的左邊邊框的距離（如果是窗體則是針對(duì)屏幕而言）。在窗體上設(shè)計(jì)控件時(shí)，vb自動(dòng)提供了默認(rèn)的坐標(biāo)系統(tǒng)，窗體的上邊框?yàn)樽鴺?biāo)橫軸，右方向?yàn)闄M軸正方向，左邊框?yàn)樽鴺?biāo)縱軸，向下方向?yàn)榭v軸正方向。窗體左上角頂點(diǎn)為坐標(biāo)原點(diǎn)。默認(rèn)長(zhǎng)度單位為twip(緹)。應(yīng)用程序要使窗體在屏幕的中央顯示，可用如下代碼：form.

41、left=(screen.width-form.width)/2form.top=(screen.height-form.height)/24.enabled屬性決定控件是否可操作。 當(dāng)設(shè)置為false時(shí),呈暗淡色,禁止用戶進(jìn)行操作。當(dāng)設(shè)置為為true時(shí)，允許用戶操作，并能對(duì)做出的操作做出響應(yīng)。.5. visible屬性運(yùn)行時(shí)控件是否可見。當(dāng)設(shè)置為false時(shí), 用戶看不到控件，但控件本身存在。可以通過在程序中設(shè)置這個(gè)屬性，使控件需要時(shí)出現(xiàn)，不需要時(shí)不出現(xiàn)。6. font屬性fontname字體 fontsize字體大小 fontbold是否是粗體fontitalic是否斜體 fontstri

42、kethru是否加一刪除線fontunderline是否帶下劃線例2.2 mvb下 vb2ex2_2lbc02_2.vbp在窗體上建立兩個(gè)命令按鈕，名稱分別是command1和mand1的font屬性用代碼實(shí)現(xiàn)。從屬性窗口設(shè)置command2的font屬性為隸書、斜體、四號(hào)。private sub form_load()form1.top = (screen.height - form1.height) / 2 使窗體在屏幕的中央form1.left = (screen.width - form1.width) / 2command1.caption = 確定comma

43、nd1.fontname = 黑體command1.fontsize = 20 數(shù)值command1.fontbold = true 粗體command1.fontitalic = true 斜體command1.fontunderline = true 下劃線command1.fontstrikethru = true 中穿劃線command1.enabled = false 按鈕不可用 。默認(rèn)可用用代碼設(shè)定command2的屬性command2.caption = 取消command2.fontname = 隸書command2.fontsize = 20command2.fontbold

44、 = truecommand2.fontitalic = truecommand2.fontunderline = trueend sub7. forecolor前景顏色屬性設(shè)置控件的前景顏色（即正文顏色）. 其值是一個(gè)16進(jìn)制常數(shù)，用戶可以在調(diào)色板中直接選擇所需顏色。8. backcolor背景顏色屬性9. backstyle背景風(fēng)格屬性transparent：透明顯示，即控件背景顏色顯示不出來。1-opaque: 不透明,此時(shí)可為控件設(shè)置背景顏色。10. borderstyle邊框風(fēng)格屬性0-none：控件周圍沒有邊框 1-fixed single：控件帶有單邊框。上述屬性值和意義僅適合于

45、label、text、picture等控件，對(duì)于窗體、line、shape的borderstyle屬性有其他不同范圍的值和的意義。11. alignment屬性控件上正文水平對(duì)齊方式 0: 正文左對(duì)齊 1: 正文右對(duì)齊2: 正文居中（vb常數(shù)分別為vbleftjustify、vbrightjustify、vbcenter）12. autosize屬性控件是否根據(jù)正文自動(dòng)調(diào)整大小。 false：保持原設(shè)計(jì)時(shí)的大小，若正文太長(zhǎng)自動(dòng)裁減掉。 true: 自動(dòng)調(diào)整控件的大小。13. wordwarp屬性 只有當(dāng)autosize 屬性值設(shè)置為true時(shí)，wordwarp屬性才生效。true: 按正文字體

46、大小和多少在垂直方向上改變顯示區(qū)域的大小。在水平方向上不發(fā)生變化。false: 表示在水平方向上按正文長(zhǎng)度放大和縮小；垂直方向上以字體大小來縮放顯示區(qū)域。14mousepointer 屬性該屬性值表示在鼠標(biāo)移動(dòng)某個(gè)特定控件上時(shí)，被顯示的鼠標(biāo)指針類型。設(shè)置的值的范圍為015，若值為99時(shí)，用戶可通過設(shè)置屬性mouseicon的值來改變指針顯示的圖標(biāo)。15mouseicon屬性用戶自己定義鼠標(biāo)圖標(biāo)，文件類型為.ico或.cur。只有當(dāng)mousepointer=99時(shí)，mouseicon設(shè)置才有效。16tabindex決定了按tab鍵時(shí)，焦點(diǎn)在各個(gè)控件間移動(dòng)的順序。各個(gè)控件默認(rèn)tabindex屬性的

47、值就是以控件建立時(shí)的順序,第一個(gè)建立的控件的tabindex屬性值為0?？梢酝ㄟ^代碼或?qū)傩源翱谥兄匦略O(shè)定tabindex屬性值。例2.3 myvb下的 vb2ex2_3lbc02_3.vbp有5個(gè)標(biāo)簽，其名稱默認(rèn)值為label1label5,每個(gè)標(biāo)簽的寬度和高度相同，有關(guān)屬性設(shè)置如下：控件屬性設(shè)置默認(rèn)控件名（name）標(biāo)題（caption）有關(guān)屬性設(shè)置form1顏色、對(duì)齊、鼠標(biāo)屬性例mousepointer=99 mouseicon=key04.icolabel1左對(duì)齊alignment=0,bordstyle=1label2居中alignment=2,bordstyle=1label3自動(dòng)a

48、utosize=true,wordwrap=false, bordstyle=1label4背景白backcolor=&h00ffffff&, bordstyle=0label5前景紅forecolor=&h000000ff&, bordstyle=0部分代碼private sub form_load()form1.name = 標(biāo)簽顏色、對(duì)齊、鼠標(biāo)屬性用編程實(shí)現(xiàn)例鼠標(biāo)置于對(duì)象區(qū)域時(shí)才顯示此區(qū)域定制的鼠標(biāo)指針圖標(biāo)form1.top = (screen.height - form1.height) / 2form1.left = (screen.width - form1.width) / 2f

49、orm1.mousepointer = 99form1.mouseicon = loadpicture(app.path + key04.ico) 鼠標(biāo)置于左邊對(duì)齊標(biāo)簽區(qū)域位置時(shí)鼠標(biāo)指針圖標(biāo)label1.mousepointer = 99label1.mouseicon = loadpicture(app.path + pc04.ico)鼠標(biāo)置于中間對(duì)齊標(biāo)簽區(qū)域位置時(shí)鼠標(biāo)指針圖標(biāo)label2.mousepointer = 99label2.mouseicon = loadpicture(app.path + trash02b.ico)label1.alignment = 0 文字左對(duì)齊labe

50、l1.borderstyle = 1 有邊框label2.alignment = 2 文字中間對(duì)齊label2.borderstyle = 1 有邊框label4.backcolor = &hffffff 背景白色label4.borderstyle = 0 無(wú)邊框label5.forecolor = &hff 顯示紅色文字label5.borderstyle = 0 無(wú)邊框label3.autosize = truelabel3.wordwrap = true 垂直方向改變標(biāo)簽大小label3.fontname = 黑體 以下設(shè)定該標(biāo)簽標(biāo)題文字的屬性label3.fontsize = 48l

51、abel3.fontbold = truelabel3.fontitalic = truelabel3.borderstyle = 1lblautoalignment.alignment = 1end sub17.控件默認(rèn)屬性反映該控件最重要的屬性，使用時(shí)可省略屬性名。部分控件的默認(rèn)屬性表控件名屬性名控件名屬性名文本框text標(biāo)簽caption命令按鈕caption圖形、圖片picture單選按鈕value復(fù)選框value例如：label.caption=朱子家訓(xùn)與label=朱子家訓(xùn)都是設(shè)置標(biāo)簽控件的caption屬性值為“朱子家訓(xùn)”。 2.3.2 窗體1主要屬性（1）caption設(shè)置在窗

52、體的標(biāo)題欄上顯示的內(nèi)容（2）maxbutton、minbutton。這兩個(gè)屬性的值默認(rèn)值為true，窗體標(biāo)題欄右角上的最大（最小）按鈕都有。當(dāng)maxbutton（minbutton）設(shè)置為false時(shí)，窗體標(biāo)題欄右角上的最大（最?。┌粹o消失即不可能通過單擊此處的最大化（最小化）按鈕來改變窗體的大小?？赏瑫r(shí)設(shè)置兩個(gè)屬性為false。（3）icon、controlbox icon用來改變窗體標(biāo)題欄左上角的控制菜單的圖標(biāo)。默認(rèn)為vb程序的圖標(biāo)。controlbox的默認(rèn)值為true即窗體有控制菜單。當(dāng)設(shè)置為false時(shí)，窗體無(wú)控制菜單，同時(shí)標(biāo)題欄上的最大、小、關(guān)閉按鈕及圖標(biāo)都消失了。（4）pictu

53、re、autoredrawpicture 用來在窗體上加載一張圖片，注意加載的圖片能否覆蓋整個(gè)窗體，取決于窗體的大小和圖片的大小。autoredraw ,默認(rèn)值為false。當(dāng)在load等事件代碼中，有用繪圖方法繪出的圖形和輸出語(yǔ)句輸出的數(shù)據(jù)時(shí)，一定要設(shè)置autoredraw的值為true，否則在窗體上不可能看見用繪圖方法繪出的圖形和輸出的內(nèi)容。（5）borderstyle 0(none) ：無(wú)邊框，窗體無(wú)法移動(dòng)和改變大小，標(biāo)題欄和標(biāo)題欄上的按鈕都沒有。1(fixed single)：窗體有單線邊框，可移動(dòng)，不可改變大小，有關(guān)閉按鈕和控制菜單。2(sizeable): 默認(rèn)值。窗體有雙線邊框，可移動(dòng)并可改變大小，在默認(rèn)情況下標(biāo)題欄上的按鈕控制菜單都有。3(fixeddialog): 窗體為固定對(duì)話框，可移動(dòng)，不可改變大小，有關(guān)閉按鈕和控制菜單。與1基本無(wú)差別。4(fixed tool window):窗體外觀和工具條相似（表現(xiàn)在標(biāo)題欄的高度笮一些（較少了120緹），可移動(dòng)，不