【文章內(nèi)容簡(jiǎn)介】 圖 112所示。 n 此外， VisualBasic 2個(gè)非常有用的附加窗口： “ 本地” 和 “ 監(jiān)視 ” 窗口，它們都是為調(diào)試應(yīng)用程序提供的，本地窗口和監(jiān)視窗口只在運(yùn)行工作模式下才有效。 圖112在“立即”窗口中的操作實(shí)例可視化編程 n 傳統(tǒng)的編程方法使用的是面向過(guò)程、按順序進(jìn)行的機(jī)制，其缺點(diǎn)是程序員始終要關(guān)心什么時(shí)候發(fā)生什么事情，處理 Windows環(huán)境下事件驅(qū)動(dòng)方式的工作量太大。n VisualBasic采用的是面向?qū)ο蟆⑹录?qū)動(dòng)的編程機(jī)制。程序員只需編寫響應(yīng)用戶動(dòng)作的程序，如移動(dòng)鼠標(biāo)、單擊鼠標(biāo)等，編寫代碼相對(duì)較少。n VisualBasic使用的可視化編程方法，是面向?qū)ο缶幊碳夹g(shù)的簡(jiǎn)化版。 VisualBasic提供多種控件支持可視化編程，利用它們可以快速創(chuàng)建強(qiáng)大的應(yīng)用程序而不需涉及不必要的細(xì)節(jié)。n 在 VisualBasic環(huán)境中，程序員不僅可以利用控件來(lái)創(chuàng)建對(duì)象，而且還可以建立自己的控件，這是 Windows環(huán)境下編程的新概念。對(duì)象與類 216。 1．對(duì) 象n 對(duì)象（ Object） 是代碼和數(shù)據(jù)的集合?？梢园褜?duì)象看成日常生活中的各種物體，如一支鋼筆、一輛汽車、一臺(tái)電腦都是一個(gè)對(duì)象。一臺(tái)電腦又可以拆分為主板、 CPU、 內(nèi)存、外設(shè)等部件，這些部件又都分別是一個(gè)對(duì)象，因此電腦對(duì)象可以說(shuō)是由多個(gè) “ 子 ”對(duì)象組成的，它可以稱為是一個(gè)對(duì)象容器（ Container）。n 在 VisualBasic，對(duì)象可以由系統(tǒng)設(shè)置好，直接供用戶使用，也可以由程序員自己設(shè)計(jì)。 Visual Basic設(shè)計(jì)好的對(duì)象有：窗體、各種控件、菜單、屏幕、剪貼板等。用戶使用最多的是窗體和控件。對(duì)象與類216。 2．類n 類是同一種對(duì)象的統(tǒng)稱，是一個(gè)抽象的整體概念，也是創(chuàng)建對(duì)象實(shí)例的模板，而對(duì)象則是類的實(shí)例化。屬于同一類的所有對(duì)象具有同一組屬性、方法與事件，只是其屬性值不同，對(duì)事件的響應(yīng)不同（取決于程序員的編程）。n 譬如，汽車是一個(gè)籠統(tǒng)的名稱，是整體概念，我們把汽車看成一個(gè) “ 類 ” ，一輛輛具體的汽車（比如你的汽車、我的汽車）就是這個(gè)類的實(shí)例，也就是屬于這個(gè)類的對(duì)象。n VisualBasic中工具箱上的控件是類，畫在窗體中的各控件則是類的事例化，即是對(duì)象。 屬 性 n 屬性是對(duì)象的性質(zhì)，對(duì)象中的數(shù)據(jù)就保存在屬性中。屬性是用來(lái)描述和反映對(duì)象特征的參數(shù)。每一種對(duì)象都有其屬性，屬性值決定了對(duì)象的外觀和行為。例如， “ 控件名稱 ” （ Name）、 “ 顏色 ” （Color） 及 “ 是否可見 ” （ Visible） 等屬性決定了對(duì)象展現(xiàn)給用戶的界面具有什么樣的外觀及功能。不同的對(duì)象具有的屬性不盡相同，如命令按鈕有 “ Caption” 屬性而無(wú) “ Text” 屬性，文本框無(wú)“ Caption” 屬性而有 “ Text” 屬性。n 控件屬性的設(shè)置一般有兩條途徑：n (1)如果在界面設(shè)計(jì)時(shí)設(shè)置對(duì)象的屬性，需要使用屬性窗口。這時(shí)只要在屬性窗口中選中要修改的屬性，然后在右列中鍵入新的值即可設(shè)置對(duì)象的屬性。n 如標(biāo)簽、文本框、列表框、圖片框控件的字體、顏色等屬性。n (2)如果要在程序運(yùn)行中動(dòng)態(tài)地更改對(duì)象的屬性，可以使用 VisualBasic的賦值語(yǔ)句，在代碼窗口中通過(guò)編程設(shè)置，其格式為：n 對(duì)象名 .屬性名 =屬性值n 其中 “ 對(duì)象名 .屬性名 ” 是 Visual Basic中引用對(duì)象屬性的方法，如下述代碼可以設(shè)置標(biāo)簽控件 Label1的標(biāo)題為 “ 第一個(gè)應(yīng)用程序 ” ：n =第一個(gè)應(yīng)用程序 方 法 n 方法是面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言為編程者提供的用來(lái)完成特定操作的過(guò)程和函數(shù)。在 Visual Basic中已將一些通用的過(guò)程和函數(shù)編寫好并封裝起來(lái)，作為方法供用戶直接調(diào)用，這給用戶的編程帶來(lái)了極大的方便。因?yàn)榉椒ㄊ敲嫦驅(qū)ο蟮模栽谡{(diào)用時(shí)一般要指明對(duì)象。對(duì)象方法的調(diào)用格式為：[對(duì)象 .]方法 [參數(shù)名表 ]n 其中，若省略了對(duì)象，表示是當(dāng)前對(duì)象，一般指窗體。n 例如：在窗體 Form1上打印輸出 “VisualBasic程序設(shè)計(jì) ”可使用窗體的 Print方法n VisualBasic程序設(shè)計(jì) n 若當(dāng)前窗體是 Form1， 則可寫為：PrintVisualBasic程序設(shè)計(jì) 對(duì)象事件與事件過(guò)程 216。 1．事件n 事件是 VisualBasic預(yù)先定義的、對(duì)象能夠識(shí)別的動(dòng)作。n 每個(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)生的。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事件，如果該事件已編寫了程序代碼，系統(tǒng)則執(zhí)行過(guò)程的程序代碼，執(zhí)行結(jié)束后，控制權(quán)交還給系統(tǒng)，并等待下一個(gè)事件。 對(duì)象事件與事件過(guò)程216。 2．事件過(guò)程n 事件過(guò)程是用來(lái)完成事件發(fā)生后所要執(zhí)行的操作。n 當(dāng)一個(gè)對(duì)象察覺到某一事件發(fā)生時(shí)（如 Click等），就會(huì)對(duì)事件產(chǎn)生響應(yīng)，即執(zhí)行一段程序代碼，所執(zhí)行的這段程序代碼就稱為事件過(guò)程。n 對(duì)于窗體對(duì)象，其事件過(guò)程的形式如下：n SubForm_事件過(guò)程名 [（參數(shù)列表） ]n … （事件過(guò)程代碼）n EndSubn 對(duì)于除窗體以外的對(duì)象，其事件過(guò)程的形式如下：n Sub對(duì)象名 _事件過(guò)程名 [（參數(shù)列表） ]n … （事件過(guò)程代碼）n EndSubn 例如，單擊名為 cmdOk命令按鈕，使命令按鈕變?yōu)椴豢梢?，則對(duì)應(yīng)的事件過(guò)程如下：n SubcmdOK_Click()n =Falsen EndSub窗體的結(jié)構(gòu) n 同 Windows環(huán)境下的應(yīng)用程序窗口一樣， VisualBasic中的窗體也具有控制菜單、標(biāo)題欄、 “ 最大化 ” 按鈕、 “ 最小化 ” 按鈕、 “ 關(guān)閉 ” 按鈕以及邊框等，如圖 113所示。n 窗體的操作與 Windows下的窗口操作一樣。通過(guò)鼠標(biāo)左鍵拖動(dòng)標(biāo)題欄可以移動(dòng)窗體；鼠標(biāo)對(duì)準(zhǔn)窗體邊框，當(dāng)出現(xiàn)雙向箭頭時(shí)拖動(dòng)鼠標(biāo)可以改變窗體的大小。n 建立新窗體后，它的大小、背景顏色、標(biāo)題及窗體名稱等特征需要根據(jù)應(yīng)用程序的要求進(jìn)行設(shè)置。 窗體的結(jié)構(gòu)圖 113窗體的結(jié)構(gòu) “最小化 ”按鈕 “最大化 ”按鈕“關(guān)閉 ”按鈕圖標(biāo)控制菜單框邊框樣式標(biāo)題窗體的屬性 n 窗體的基本屬性有： Name、 Left、 Top、 Height、 Width、Visible、 Enabled、 Font、 ForeColor、 BackColor等。在 VisualBasic中的大多數(shù)控件基本上都有這些屬性，在以后介紹其他對(duì)象時(shí)，這些屬性還將詳細(xì)介紹。216。 1． Name屬性n VisualBasic中任何對(duì)象都有 Name屬性，在程序代碼中通過(guò)該屬性來(lái)引用、操作具體的對(duì)象。首次在工程中添加窗體時(shí)，該窗體的名稱被缺省為 Form1； 添加第二個(gè)窗體，其名稱被缺省為Form2， 依此類推。最好給 Name屬性設(shè)置一個(gè)有實(shí)際意義的名稱，如給一個(gè)程序的主控窗體命名為 “ MainFrm” 。 這樣在程序代碼中的意義就很清楚，程序的可讀性就好。 窗體的屬性 216。 2． Left、 Top屬性n 窗體運(yùn)行在屏幕中，屏幕是窗體的容器，因此窗體的 Left、Top屬性值是相對(duì)屏幕左上角的坐標(biāo)值。對(duì)于控件， Left、 Top屬性值則是相對(duì) “ 容器 ” 左上角的坐標(biāo)值，其缺省單位是 twip。n 1twip=1/20點(diǎn) =1/1440in=1/567cm216。 3． Height、 Width屬性n 返回或設(shè)置對(duì)象的高度和寬度。對(duì)于窗體，指的是窗口的高度和寬度，包括邊框和標(biāo)題欄。對(duì)于控件，這些屬性使用控件所在“ 容器 ” 的度量單位。n 圖 114是屏幕（ Screen）、 窗體（ Form1） 和命令按鈕（ Ok） 的 Left、 Top、 Height、 Width屬性表示，讀者要注意 Left、 Top屬性值是相對(duì) “ 容器 ” 左上角的坐標(biāo)值。在 VisualBasic中除了用屏幕、窗體作 “ 容器 ” 外，還有框架和圖片框?qū)ο罂勺?“ 容器 ”。 窗體的屬性圖 114對(duì)象的 Left、 Top、 Height、 Width屬性窗體的屬性n 例 11 在窗體 Form1被加載時(shí)，將其大小設(shè)置為屏幕大小的 1/2，并居中顯示。通過(guò)窗體的 Load事件來(lái)實(shí)現(xiàn)的程序代碼為：n PrivateSubForm_Load()n = 39。設(shè)置窗體的寬度，Screen為屏幕對(duì)象n =39。設(shè)置窗體的高度。n 39。在水平方向上居中顯示。n =()/2 n 39。在垂直方向上居中顯示。n =()/2n EndSub窗體的屬性216。 4． Caption標(biāo)題屬性n 決定出現(xiàn)在窗體的標(biāo)題欄上的文本內(nèi)容，也是當(dāng)窗體被最小化后出現(xiàn)在窗體圖標(biāo)下的文本。如圖 113中窗體的 Caption屬性值是“ VB窗體 ”216。 5．字體 Font屬性組uFontName屬性是字符型，決定對(duì)象上正文的字體（缺省為宋體）。uFontSize屬性是整型，決定對(duì)象上正文的字體大?。ㄈ笔?9磅）。uFontBold屬性是邏輯型，決定對(duì)象上正文是否是粗體（缺省為False）。uFontItalic屬性是邏輯型，決定對(duì)象上正文是否是斜體（缺省為False）。uFontStrikeThru屬性是邏輯型，決定對(duì)象上正文是否加一刪除線（缺省為 False）。uFontUnderLine屬性是邏輯型，決定對(duì)象上正文是否帶下劃線（缺省為 False）。窗體的屬性n 注意：n 如果使用窗體或其他 “容器 ”對(duì)象無(wú)效，則在其中的所有控件也將無(wú)效。 n 例 12 下面的程序是當(dāng)文本框 Text1不包含任何文本時(shí)，使命令按鈕CmdOk無(wú)效。q Private Sub Text1_Change( )q If = Then 39。 查看文本框是否為空q = False 39。 使按鈕無(wú)效q Elseq = True 39。 使按鈕有效q End Ifq End Sub 窗體的屬性216。 7． Visible屬性n 用于確定一個(gè)窗體或控件為可見或隱藏。要在啟動(dòng)時(shí)隱藏一個(gè)對(duì)象，可在設(shè)計(jì)時(shí)將 Visible屬性設(shè)置為 False， 還可在代碼中設(shè)置該屬性使控件在運(yùn)行時(shí)隱藏。216。 8． BackColor屬性和 ForeColor屬性n BackColor屬性用于返回或設(shè)置對(duì)象的背景顏色， ForeColor屬性用于返回或設(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顏色。n 例如，將窗體 Form1的背景色設(shè)置為紅色，則可使用：n =RGB(255,0,0)n 也可用十六進(jìn)制長(zhǎng)整型數(shù)據(jù)或 Visual Basic系統(tǒng)內(nèi)部常量給BackColor屬性賦值。例如：n =amp。HFFamp。n 它等價(jià)于： =vbRed窗體的屬性216。 9． MaxButton——“ 最大化 ”按鈕和 MinButton——“ 最小化 ”按鈕n 當(dāng)其值為 Ture時(shí)，有 “ 最大化 ” 或 “ 最小化 ” 按鈕；其值為False時(shí)，則無(wú)。216。 10． Icon控制圖標(biāo)屬性n 返回或設(shè)置窗體左上角顯示或最小化時(shí)顯示的圖標(biāo)，它必須在 ControlBox屬性設(shè)置為 Ture才有效。缺省設(shè)置的圖標(biāo)是 ，單擊屬性窗口中 Icon屬性值后面的按鈕，打開 “ 加載圖標(biāo) ” 對(duì)話框，允許打開一個(gè)圖標(biāo)文件（ *.Ico和 *.Cur） 作為這個(gè)屬性的值。216。 11． ControlBox控制菜單框?qū)傩詎 其值設(shè)置為 Ture時(shí)，有控件菜單；設(shè)置為 False時(shí)，則無(wú)控件菜單，同時(shí)窗體也無(wú) “ 最大化 ” 按鈕和 “ 最小化 ” 按鈕，即使MaxButton屬性和 MinButton屬性設(shè)置為 Ture。窗體的屬性216。 12． Picture圖片屬性n 設(shè)置窗體中要顯示的圖片。一般可顯示所有類型的圖片文件。216。 13． BorderStyle邊框風(fēng)格屬性n 通過(guò)改變 BorderStyle屬性，可以控制窗體如何調(diào)整大小，它可取 6種值，如表 11所示。 屬性值意 義數(shù)值 系統(tǒng)常量0 VbBSNone 無(wú)（沒有邊框或與邊框相關(guān)的元素）1 VbFixedSingle固定單邊框?？梢园刂撇藛慰?、標(biāo)題欄、 “最大化 ”按鈕和 “最小化 ”按鈕。只有使用 “最大化 ”和 “最小化 ”按鈕才能改變窗體大小2 VbSizable （缺省值）可調(diào)整大小的邊框3 VbFixedDoubleialog 固定對(duì)話框。可以包含控制菜單框和標(biāo)題欄，不包含 “最大化 ”和 “最小化 ”按鈕，不能改變窗體尺寸4 vbFixedToolWi