【正文】 第五章 VisualBasic中常用控件 主要內(nèi)容 167。 焦點(diǎn)與 Tab鍵的順序 167。 標(biāo)簽控件 167。 文本框控件 167。 命令按鈕控件 167。 復(fù)選框控件 167。 選項(xiàng)按鈕控件和框架控件 167。 列表框控件 167。 組合框控件 167。 圖片框控件和圖像框控件 167。 滾動(dòng)條控件 167。 計(jì)時(shí)器控件 167。 ActiveX控件 167。 控件的默認(rèn)屬性 167。 焦點(diǎn)與 Tab鍵的順序 一、焦點(diǎn) 焦點(diǎn) (Focus)，它是接收用戶鼠標(biāo)或鍵盤(pán)輸入的能力。當(dāng)對(duì)象具有焦點(diǎn)時(shí)，可接收用戶的輸入。 注意： 并不是所有的控件都可以接收焦點(diǎn)，其中 Frame、 Label、Menu、 Line、 Shape、 Image和 Timer控件都不能接收焦點(diǎn)。而對(duì)窗體來(lái)說(shuō)，只有不包含任何可接收焦點(diǎn)的控件時(shí)才能接收焦點(diǎn)。 當(dāng)對(duì)象得到或失去焦點(diǎn)時(shí)，會(huì)產(chǎn)生 GotFocus或 LostFocus事件。窗體和多數(shù)控件支持這些事件。使用下列方法可以將焦點(diǎn)賦給某個(gè)對(duì)象。 ? 運(yùn)行時(shí)選擇對(duì)象 ? 運(yùn)行時(shí)用快捷鍵選擇對(duì)象 ? 在代碼中用 SetFocus方法 167。 焦點(diǎn)與 Tab鍵的順序 二、設(shè)置 Tab鍵的順序 Tab鍵順序就是在按 Tab鍵時(shí)，焦點(diǎn)在控件間移動(dòng)的順序。通常， Tab鍵順序與建立這些控件的順序相同。 注意： 不能獲得焦點(diǎn)的控件，以及無(wú)效的和不可見(jiàn)的控件，不具有TabIndex屬性。 通常，在程序運(yùn)行時(shí)按 Tab鍵能選擇 Tab鍵順序中的每一個(gè)控件。但是，如果將控件的 TabStop屬性設(shè)為 False或者 0，便可將此控件從 Tab鍵順序中刪除，按 Tab鍵時(shí)焦點(diǎn)將不在這個(gè)控件上停留。 TabStop屬性已置為 False的控件，仍然保持它在實(shí)際 Tab鍵順序中的位置，只不過(guò)在按 Tab鍵時(shí)這個(gè)控件被跳過(guò)。 167。 標(biāo)簽控件 標(biāo)簽控件的作用： (1) 用于顯示文字說(shuō)明信息，但不能在程序運(yùn)行時(shí)編輯標(biāo)簽控件內(nèi)的文字信息。通常用標(biāo)簽來(lái)標(biāo)注本身不具有 Caption屬性的控件。 例如：用標(biāo)簽為文本框、列表框、組合框等控件來(lái)添加描述性的信息。 (2) 編寫(xiě)代碼改變標(biāo)簽控件的顯示信息來(lái)表明程序的運(yùn)行狀態(tài)。 167。 標(biāo)簽控件 一、常用屬性 屬性名稱 作用 語(yǔ)法 屬性值 Alignment 設(shè)置標(biāo)簽中文本的對(duì)齊方式 =值 0左對(duì)齊， 1右對(duì)齊， 2居中對(duì)齊 AutoSize 設(shè)置控件是否能夠自動(dòng)調(diào)整大小 =值 True或 False BackStyle 設(shè)置標(biāo)簽的背景樣式 =值 0是透明的， 1是不透明的 BorderStyle 設(shè)置標(biāo)簽的邊框樣式 =值 0無(wú)邊框， 1單線邊框 Caption 設(shè)置標(biāo)簽的文本內(nèi)容 =字符串 默認(rèn)為標(biāo)簽控件名稱 WordWrap 設(shè)置標(biāo)簽的文本在顯示時(shí)是否自動(dòng)折行 =值 True或 False 167。 標(biāo)簽控件 二、 常用事件和方法 一般很少使用標(biāo)簽事件，標(biāo)簽的方法中常用的只有 Move。 語(yǔ)法： Move left[,top,width,height] 說(shuō)明： (1) left， top， width， height分別表示移動(dòng)目的位置的坐標(biāo)和大小。 (2) left為必要參數(shù)，其他三個(gè)為可選參數(shù)。 167。 標(biāo)簽控件 三、應(yīng)用舉例 首先創(chuàng)建一個(gè)工程，向工程中添加一個(gè)窗體，在該窗體中放置一個(gè)標(biāo)簽 Label1。該標(biāo)簽的基本屬性如下表所示。窗體的設(shè)計(jì)界面和執(zhí)行界面如圖所示。 屬性名稱 屬性值 Name Label1 Caption 標(biāo)簽應(yīng)用實(shí)例 BorderStyle 1 BackColor amp。H00C0FFC0amp。(淡綠色 ) ForeColor amp。H80000012amp。 (黑色 ) Font 黑體，二號(hào)字，粗體 167。 標(biāo)簽控件 標(biāo)簽控件實(shí)例窗體設(shè)計(jì)界面 標(biāo)簽控件實(shí)例窗體執(zhí)行界面 167。 文本框控件 文本框是 VisualBasic中顯示和輸入文本的主要方式，也是 Windows用戶界面中最常用的控件。在 Windows環(huán)境中幾乎所有的輸入動(dòng)作都是利用文本框來(lái)完成的。文本框可以輸入單行文本，也可以輸入多行文本，還具有根據(jù)控件的大小自動(dòng)換行以及添加基本格式的功能。 167。 文本框控件 一、 常用屬性 屬性名稱 作用 語(yǔ)法 屬性值 Text 設(shè)置控件中顯示的文本內(nèi)容 [=字符串 ] MaxLength 設(shè)置文本框輸入內(nèi)容長(zhǎng)度是否有限制 =值 0：該單行文本框中字符串的長(zhǎng)度只受操作系統(tǒng)內(nèi)存的限制。 大于 0：允許輸入的最大字符數(shù)。 MultiLine 設(shè)置文本框是否以多行方式顯示文本 =值 True：以多行文本方式顯示。 False：以單行方式顯示，超出文本框?qū)挾鹊牟糠直唤爻? PasswordChar 設(shè)置在控件中顯示用戶鍵入的字符 =字符 如果該屬性設(shè)置為某一字符，那么無(wú)論 Text屬性值是什么，在文本框中都只顯示該字符。要想使該屬性有效， MultiLine屬性必須設(shè)置為 False ScrollBars 設(shè)置文本框是否有垂直或水平滾動(dòng)條 =值 0：沒(méi)有滾動(dòng)條； 1：水平滾動(dòng)條 2：垂直滾動(dòng)條； 3：水平和垂直滾動(dòng)條，要想使該屬性有效，MultiLine屬性必須設(shè)置為 True SelLength 返回 /設(shè)置選定的字符數(shù) Object. SelLength SelStart 返回 /設(shè)置選定文本的起始點(diǎn) Object. SelStart SelText 返回 /設(shè)置包含當(dāng)前選定文本的字符串 Object. SelText 167。 文本框控件 二、 常用事件和方法 文本框的常用事件主要有 Change事件和 KeyPress事件。常用的方法是 SetFocus方法。 Change事件 事件觸發(fā)條件：當(dāng)文本框的內(nèi)容被修改時(shí)觸發(fā)。 語(yǔ)法： Sub Text_Change([Index As Integer]) 說(shuō)明： (1) Text是文本框的名稱。 (2) Index是一個(gè)整數(shù)，若該文本框?qū)儆谝粋€(gè)控件數(shù)組，則 Index表示該文本框在數(shù)組中的下標(biāo)，否則不需要這一參數(shù)。 167。 文本框控件 KeyPress事件 事件觸發(fā)條件：當(dāng)在文本框中按任一鍵時(shí)觸發(fā)。 語(yǔ)法： Sub Text_KeyPress(KeyAscii As Integer) 說(shuō)明： KeyAscii為對(duì)應(yīng)按鍵的鍵碼。 SetFocus方法 將焦點(diǎn)移動(dòng)到指定的對(duì)象。 語(yǔ)法： 說(shuō)明： Object可以是窗體上可見(jiàn)的控件對(duì)象。 167。 文本框控件 三、應(yīng)用舉例 首先向工程中添加一個(gè)窗體，在窗體中創(chuàng)建兩個(gè)標(biāo)簽和兩個(gè)文本框。標(biāo)簽用于顯示提示信息，其標(biāo)題分別為“單行文本演示”和“多行文本演示”。第一個(gè)文本框用于演示是單行文本，運(yùn)行時(shí)，在文本框中輸入“ 1234567” ，屬性設(shè)置見(jiàn)右表。第二個(gè)文本框用于演示是多行文本，運(yùn)行時(shí)，在文本框中輸入一首詩(shī)，屬性設(shè)置見(jiàn)右表所示。 控件名稱 屬性名 屬性值 Text1 Name SinglelineEx Appearance 13D PasswordChar * MultiLine False Text 1234567 Text2 Name MultilineEx Appearance 13D MultiLine True ScrollBars 3 Text 春日 朱熹 [宋 ] 勝日尋芳泗水濱， 無(wú)邊光景一時(shí)新。 等閑識(shí)得東風(fēng)面， 萬(wàn)紫千紅總是春。 167。 文本框控件 本例窗體的設(shè)計(jì)界面如圖所示。運(yùn)行程序后，在第一個(gè)文本框中輸入“ 1234567” ，實(shí)際顯示的是 7個(gè)“ *”。在第二個(gè)文本框中輸入 Text2控件 Text屬性值對(duì)應(yīng)的內(nèi)容，其執(zhí)行界面如圖所示。 167。 命令按鈕控件 命令按鈕主要用來(lái)執(zhí)行某一功能，通常在命令按鈕的 Click事件中編寫(xiě)一段程序，當(dāng)用戶用鼠標(biāo)單擊這個(gè)按鈕時(shí)，就會(huì)啟動(dòng)這段程序，執(zhí)行某一特定的功能。大多數(shù) VisualBasic應(yīng)用程序中都有命令按鈕，用戶可以單擊執(zhí)行 Click事件中代碼所對(duì)應(yīng)的操作。 167。 命令按鈕控件 一、常用屬性 屬性名稱 作用 語(yǔ)法 屬性值 Caption 設(shè)置命令按鈕的標(biāo)題，即按鈕上顯 示的文本信息 =字符串 根據(jù)命令按鈕功能命名屬性值 Default 設(shè)置命令按鈕是否為默認(rèn)按鈕，當(dāng)運(yùn)行程序時(shí)，用戶按回車(chē)鍵時(shí)，就激活它。 =值 True：表示該命令按鈕為默認(rèn)按鈕。False：表示該命令按鈕不是默認(rèn)按鈕。一個(gè)窗體上只能有一個(gè)命令按鈕為默認(rèn)按鈕。 Cancel 設(shè)置命令按鈕是否為 Cancel按鈕當(dāng)用戶按 Esc鍵時(shí)，是否觸發(fā)它的 Click事件。 =值 True：表示響應(yīng) Cancel事件。 False：表示不響應(yīng) Cancel事件。該命令按鈕為 Cancel按鈕。 Enabled 設(shè)置命令按鈕是否能被按下 =值 True：表示該命令按鈕能被按下以執(zhí)行特定功能。 False：表示該命令按鈕不能按下來(lái)執(zhí)行特定功能。 Picture 設(shè)置命令按鈕上顯示的圖形 =圖形文件名 當(dāng)命令按鈕的 Style屬性設(shè)置為 1時(shí)，才會(huì)在命令按鈕上顯示圖形。 Style 設(shè)置命令按鈕的類(lèi)型 =值 0：表示為標(biāo)準(zhǔn)按鈕； 1：表示為圖形按鈕，這時(shí)會(huì)在標(biāo)題文本的上方顯示由 Picture屬性指定的圖形。 167。 命令按鈕控件 二、常用事件和方法 Click事件 事件觸發(fā)條件：當(dāng)用戶在命令按鈕上單擊鼠標(biāo)時(shí)觸發(fā)。此外，在設(shè)定命令按鈕 Caption屬性時(shí)，可以在文本信息后添加“ amp。+某個(gè)大寫(xiě)字母”，如 amp。K。在程序運(yùn)行時(shí)，可以按下“ Alt+K” 組合鍵，同樣可以觸發(fā)命令按鈕的 Click事件。 語(yǔ)法： Sub Command_Click([Index As Integer]) 說(shuō)明： (1) Command是命令按鈕的名稱。 (2) Index是一個(gè)整數(shù)，若該命令按鈕屬于一個(gè)控件數(shù)組，則 Index表示該命