第5章Visual Basic6.0常用控件.ppt

1、可視化編程應(yīng)用VisualBasic6.0,第 5 講,第5章 Visual Basic 6.0常用控件,掌握Visual Basic 6.0標(biāo)準(zhǔn)控件添加方法。 掌握各種標(biāo)準(zhǔn)控件的常用屬性及其功能。 掌握各種標(biāo)準(zhǔn)控件的常用事件及其激發(fā)的條件。 掌握各種標(biāo)準(zhǔn)控件的常用方法。,目標(biāo)要求,第5章 Visual Basic 6.0常用控件,控件的添加 控件公共屬性 控件公共事件 標(biāo)簽控件 文本框控件 命令按鈕控件 單選按鈕、復(fù)選按鈕控件、框架控件 列表框、組合框控件 滾動(dòng)條控件 定時(shí)器控件 控件命名約定,講課提綱,第5章 Visual Basic 6.0常用控件,控件工具箱 控件添加方法 在工具箱中，

2、雙擊對(duì)應(yīng)的控件圖標(biāo)。 在工具箱中，單擊對(duì)應(yīng)的控件圖標(biāo)，然后在窗體上拖動(dòng)鼠標(biāo)。 控件的編輯 單個(gè)控件大小及位置的調(diào)整： 位置的調(diào)整：在窗體上單擊控件，然后拖動(dòng)控件。 大小的調(diào)整：在窗體上單擊控件，然后拖動(dòng)控件邊角 多個(gè)控件大小及位置的調(diào)整 選中多個(gè)控件：在窗體上先選中1個(gè)控件，然后按住Shift鍵，單擊其他控件 位置的調(diào)整：使用菜單【格式】 大小的調(diào)整：使用菜單【格式】,5.1 控件的添加,第5章 Visual Basic 6.0常用控件,公共屬性 名稱屬性 Appearance屬性 BackColor屬性 Caption屬性 Enabled屬性 ForeColor屬性 Font屬性 Left屬

3、性、 Top屬性 Height屬性、 Width屬性 Visible屬性 注意：設(shè)置某個(gè)控件的屬性時(shí)，我們必須先在窗體中選中該控件,5.2 控件公共屬性,第5章 Visual Basic 6.0常用控件,名稱屬性 說明：為了便于訪問和區(qū)分控件，每個(gè)控件都必須有1個(gè)名稱。名稱屬性就如同 控件的“姓名”，“姓名”就直接代表著控件本身。 外觀屬性（Appearance屬性） 功能：返回或設(shè)置控件的的外觀樣式 說明： Appearance屬性有2個(gè)取值：0或1，Appearance屬性為1時(shí)，表示將控件 的外觀設(shè)為平面的樣式；Appearance屬性為1時(shí)（缺省值），表示將控件的外觀 設(shè)為3維的樣式。

4、 BackColor屬性 功能：返回或設(shè)置控件背景的顏色 說明：設(shè)置BackColor屬性將會(huì)直接改變控件的底色 Caption屬性 功能：返回或設(shè)置控件上所顯示的文本 說明：只有那些不能接受用戶輸入的控件才有該屬性，比如說標(biāo)簽控件、命令按鈕控件等 Enabled屬性 功能：返回或設(shè)置控件是否可用 說明：Enabeld屬性有兩個(gè)取值：True或False；Enabeld屬性為True時(shí)（缺省 值），表示控件可用，可以響應(yīng)用戶的操作；Enabeld屬性為False時(shí)，控件為灰 色，表示控件不可用，不能響應(yīng)用戶的操作,5.2 控件公共屬性,第5章 Visual Basic 6.0常用控件,Fore

5、Color屬性 功能：返回或設(shè)置控件的前景顏色 說明：設(shè)置ForeColor屬性將會(huì)影響圖形及文本的顏色 Font屬性 功能：返回或設(shè)置控件文本所用的字體名、字體樣式及字體大小 Height屬性、Width屬性 功能：Height屬性返回或設(shè)置控件的高度；Width屬性返回或設(shè)置控件的寬度 Left屬性、Top屬性 功能：Left屬性返回或設(shè)置控件左邊與其容器（窗體、圖片框控件或 框架控件）左邊間的距離；Top屬性返回或設(shè)置控件頂部與其容器 （窗體、圖片框控件或框架控件）頂部之間的距離。 說明：控件的位置可以通過拖動(dòng)控件來改變，也可以通過設(shè)置Left、Top屬性來改變 Visible屬性 功能

6、：返回或設(shè)置控件是否可視 說明：Visible屬性有兩個(gè)取值：True或False，Visible屬性為True時(shí)（缺省 值），表示控件可見；Visible屬性為False時(shí)，表示控件不可見。,5.2 控件公共屬性,第5章 Visual Basic6.0常用控件,公共事件：鼠標(biāo)事件、拖動(dòng)事件、鍵盤事件、焦點(diǎn)事件 提示：在代碼窗口，從對(duì)象列表框中選擇相應(yīng)的控件，然后在事件列表框可以查看該控件所能響應(yīng)的事件，單擊某個(gè)事件名便可以為控件添加相應(yīng)的事件。在窗體上雙擊控件，便可以為控件添加最常用的事件。 5.3.1 鼠標(biāo)事件 鼠標(biāo)事件：?jiǎn)螕羰录–lick事件）、雙擊事件（DblClick事件）、鼠標(biāo)按

7、下 事件（MouseDown事件）、鼠標(biāo)彈起事件（MouseUp事件）、鼠標(biāo)移動(dòng)事 件（MouseMove事件 雙擊事件（DblClick事件） 激發(fā)條件：在控件上雙擊某個(gè)控件 說明：如果雙擊間隔時(shí)間過長(zhǎng)，則控件會(huì)解釋為兩個(gè)Click事件 語法結(jié)構(gòu)： Private Sub 控件名_DblClick() End Sub 單擊事件（Click事件）：鼠標(biāo)事件中應(yīng)用最廣的事件 激發(fā)條件：在窗體上完成單擊某個(gè)控件的過程 語法結(jié)構(gòu)： Private Sub 控件名_Click() End Sub,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,鼠標(biāo)按下事件： MouseDown事

8、件 激發(fā)條件：鼠標(biāo)鍵在控件上被按下 語法結(jié)構(gòu)： Private Sub 控件名_MouseDown(Button As Integer, Shift As Integer, X As Single, _Y As Single) End Sub 鼠標(biāo)彈起或釋放事件：MouseUp事件 激發(fā)條件：在控件上松開被按下的鼠標(biāo)鍵 語法結(jié)構(gòu)： Private Sub 控件名_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 注意：Click、MouseDown、MouseUp事件這3個(gè)事件所發(fā)生的順

9、序因控件的不同而不同。例如：對(duì) 于列表框控件和命令按鈕控件，這3個(gè)事件按以下順序發(fā)生：MouseDown、Click、MouseUp；對(duì)于 文件列表控件、標(biāo)簽控件、圖片框控件，這3個(gè)事件按以下順序發(fā)生：MouseDown、MouseUp、 Click。因此，我們?cè)谑褂眠@3個(gè)事件時(shí)，必須先明確這3個(gè)事件被激發(fā)的順序，以確保操作互不沖突。 鼠標(biāo)移動(dòng)事件：MouseMove事件 激發(fā)條件：鼠標(biāo)在控件上移動(dòng) 語法結(jié)構(gòu)： Private Sub 控件名_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) End

10、 Sub 【例5-1】 編寫1個(gè)程序，實(shí)現(xiàn)以下功能： (1)在窗體上按下鼠標(biāo)時(shí)，窗體的標(biāo)題為“鼠標(biāo)被按下”。 (2)松開鼠標(biāo)時(shí)，窗體的標(biāo)題為“鼠標(biāo)被松開”,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,MouseDown、MouseUp、MouseMove事件中參數(shù)說明 4個(gè)參數(shù)：Button、Shift、X、Y，由系統(tǒng)給出的，而不需用戶去設(shè)定 Button參數(shù)：整型參數(shù) 功能：用來獲取用戶所按下的鼠標(biāo)鍵，其取值見表5-1 說明：對(duì)于MouseDown、MouseUp事件，Button參數(shù)的取值只能有3種，即001（十 進(jìn)制1）、010（十進(jìn)制2）或100（十進(jìn)制3），

11、而對(duì)于MouseMove事件，Button參 數(shù)可取表5-1中的任何值,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,Shift參數(shù)：整型參數(shù) 功能：用于獲取Shift、Ctrl、Alt鍵的狀態(tài)，其取值見表5-2 說明：Shift參數(shù)反映了在按下鼠標(biāo)的同時(shí)，Shift、Ctrl、Alt3鍵的狀態(tài),5.3 控件公共事件,第5章 Visual Basic6.0常用控件,X，Y參數(shù) 功能：X，Y參數(shù)用于記錄鼠標(biāo)指針?biāo)诘奈恢?，其中參?shù)X記錄指針的橫坐標(biāo)，參數(shù)Y記錄指針的縱坐標(biāo) 說明：1）X、Y的取值與控件的坐標(biāo)系統(tǒng)有關(guān) 【例5-2】 編寫1個(gè)程序，測(cè)試當(dāng)前在窗體上所單擊的鼠標(biāo)

12、鍵、鼠標(biāo)的位置，以及Shift鍵的狀態(tài),5.3 控件公共事件,第5章 Visual Basic6.0常用控件,5.3.2 鍵盤事件 鍵盤事件：按鍵事件（KeyPress事件）、鍵按下事件（KeyDown事件）、鍵彈起事件（KeyUp事件） 【例5-3】 編寫1個(gè)程序，測(cè)試所按的鍵是數(shù)字鍵還是字母鍵 按鍵事件：KeyPress事件 激發(fā)條件：在控件上完成按下鍵盤中的某個(gè)鍵的過程 語法結(jié)構(gòu)： Private Sub 控件名_KeyPress(KeyAscii As Integer) End Sub 鍵按下事件：KeyPress事件 激發(fā)條件：在控件上按下某個(gè)鍵盤鍵 語法結(jié)構(gòu)： Private Su

13、b 控件名_KeyDown(KeyCode As Integer, Shift As Integer) End Sub,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,鍵彈起或釋放事件：KeyUp事件 激發(fā)條件：在控件上松開被按下的鍵盤鍵 語法結(jié)構(gòu)： Private Sub 控件名_KeyUp(KeyCode As Integer, Shift As Integer) End Sub 鍵盤事件參數(shù)說明 KeyAscii、KeyCode參數(shù)：整數(shù)型參數(shù) 功能：用來獲取當(dāng)前所按鍵的鍵碼，KeyAscii獲取的是按鍵上字符的ASCII 碼，KeyCode獲取的是按鍵的掃描碼 提

14、示：鍵盤的每個(gè)鍵都有1個(gè)ASCII碼和掃描碼，掃描碼反映的是按鍵 的位置信息，而ASCII碼反映的是標(biāo)準(zhǔn)的字符信息，因此KeyCode參數(shù) 不能區(qū)分大小寫，即大寫A和小寫a所對(duì)應(yīng)的KeyCode值是一樣的，都 為65，而KeyASCII參數(shù)則可以區(qū)分大小寫 Shift參數(shù)：同鼠標(biāo)事件的Shift參數(shù) 說明：在默認(rèn)情況下，控件的鍵盤事件優(yōu)先于窗體的鍵盤事件，因此 一旦發(fā)生鍵盤事件，則總是控件先響應(yīng)鍵盤事件。如果希望窗體先響 應(yīng)鍵盤事件，則必須將窗體的KeyPreview屬性設(shè)為True,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,5.3.3 焦點(diǎn)事件 焦點(diǎn)（Focus）

15、：用于表示控件具有接受輸入的能力，只有當(dāng)控件具有焦點(diǎn)時(shí)，控件才可以被激活，才可以響應(yīng)鍵盤事件 注意：在活動(dòng)的窗體中，任一時(shí)刻都只能有一個(gè)控件具有焦點(diǎn)，并且只有當(dāng)控件的Enabled和Visible屬性都為True時(shí)，控件才能獲得焦點(diǎn) 焦點(diǎn)的獲?。褐苯訂螕粼摽丶蛲ㄟ^按Tab鍵來獲得焦點(diǎn)。連續(xù)按Tab鍵，焦點(diǎn)就會(huì)按控件添加的順序在各個(gè)控件之間切換 說明：當(dāng)控件獲得焦點(diǎn)之后，便會(huì)以特殊的外觀顯示出來，例如，當(dāng)命令按鈕、單選按鈕或復(fù)選按鈕獲得焦點(diǎn)之后，便會(huì)在控件之上顯示1個(gè)虛的方框；當(dāng)文本框獲得焦點(diǎn)之后，便會(huì)在文本框中出現(xiàn)1個(gè)閃動(dòng)的光標(biāo) 焦點(diǎn)事件：獲得焦點(diǎn)事件（GotFocus事件）、失去焦點(diǎn)事件（

16、LostFocus事件） 獲得焦點(diǎn)事件（GotFocus事件) 激發(fā)條件：當(dāng)控件獲得輸入焦點(diǎn) 語法結(jié)構(gòu)： Private Sub 控件名_GotFocus() End Sub 失去焦點(diǎn)事件（LostFocus事件） 激發(fā)條件：當(dāng)控件失去輸入焦點(diǎn) 語法結(jié)構(gòu)： Private Sub 控件名_LostFocus() End Sub 除了以上幾種公共事件，另外還有一些常用的公共事件，詳見附表二,5.3 控件公共事件,第5章 Visual Basic6.0常用控件,功能：用來顯示文本，但用戶不能編輯所顯示的文本，常用來說明或標(biāo)示 其他不具有Caption屬性的控件，如文本框控件、列表框控件、組合框控件

17、。 所顯示的文本是通過Caption屬性來設(shè)置，并且還可以選擇字體的樣式、大 小以及顏色 【例5-4】 向窗體中添加1個(gè)標(biāo)簽控件，并在標(biāo)簽控件中以粗體顯示“Visual Basic6.0”，文字的顏色為紅色。 常用屬性：除了Caption、Font、ForeColor等公共屬性之外，標(biāo)簽控件還有 一些其他常用的屬性，主要包括：AutoSize屬性、Alignment屬性、BackStyle 屬性、BorderStyle屬性等 Caption屬性 功能：返回或設(shè)置所顯示的字符串 AutoSize屬性 功能：返回或設(shè)置標(biāo)簽是否自動(dòng)改變大小以顯示全部的內(nèi)容 說明：AutoSize屬性有兩個(gè)取值：Tr

18、ue或False，AutoSize屬性取True時(shí)， 表示自動(dòng)改變標(biāo)簽控件的大小以便顯示全部的文本內(nèi)容；AutoSize屬性取 False時(shí)（缺省值），表示不調(diào)整標(biāo)簽控件的大小，控件的大小保持不變， 超出控件范圍的內(nèi)容將被剪掉,5.4 標(biāo)簽控件,第5章 Visual Basic6.0常用控件,Alignment屬性 功能：返回或設(shè)置標(biāo)簽控件中文本的對(duì)齊方式 說明：Alignment屬性有3個(gè)取值：0、1或2，Alignment屬性取0時(shí)（默認(rèn)值），表示標(biāo)簽控件中的文本左對(duì)齊顯示；Alignment屬性取1時(shí)，表示標(biāo)簽控件中的文本右對(duì)齊顯示；Alignment屬性取2時(shí)，表示標(biāo)簽控件中的文本居中

19、顯示 BackStyle屬性 功能：返回或設(shè)置標(biāo)簽控件是否透明 說明：BackStyle屬性有兩個(gè)取值：0或1，BackStyle屬性取0時(shí)，表示標(biāo)簽控件透明，此時(shí)BackColor屬性無效；BackStyle屬性取1時(shí)（默認(rèn)值），表示標(biāo)簽控件不透明，此時(shí)BackColor屬性才有效 BorderStyle屬性 功能：返回或設(shè)置標(biāo)簽控件的邊框樣式 說明：BorderStyle屬性有兩個(gè)取值：0或1，BorderStyle屬性為0時(shí)（默認(rèn)值），表示標(biāo)簽控件無邊框BorderStyle屬性為1時(shí)，表示標(biāo)簽控件有固定的單線邊框 常用事件 能響應(yīng)的事件：Click事件、MouseDown事件、Mous

20、eUp事件、MouseMove事件等 不能響應(yīng)的事件： KeyPress事件、KeyDown事件、KeyUp事件、GotFocus事件、LostFocus事件,5.4 標(biāo)簽控件,功能：文本框控件是標(biāo)準(zhǔn)控件中最常用的控件之一，主要用于建立文本的 輸入或編輯 區(qū)，以實(shí)現(xiàn)數(shù)據(jù)的輸入、編輯和顯示。文本框控件實(shí)際上是一個(gè)文本編輯器，是顯示 和輸入文本的重要工具之一 5.5.1文本框控件常用屬性 MaxLenght屬性 功能：返回或設(shè)置文本框控件中所能夠輸入的最多字符量 說明：MaxLenght屬性值為整型數(shù)值，其默認(rèn)值為0，表示不限制輸入的字符數(shù)， 用戶可以隨意的輸入字符。如果將MaxLenght屬性值

21、設(shè)為非0的整數(shù)，則用戶所 輸入的字符數(shù)就有所有限制，不能超出MaxLenght屬性所設(shè)定的值，超出的字符 將被刪除 MultiLine屬性 功能：返回或設(shè)置文本框控件是否允許多行輸入或顯示 說明：MultiLine屬性有兩個(gè)取值：True或False，取True時(shí)，表示允許多行輸入 或顯示；取False時(shí)（默認(rèn)值），表示不允許多行輸入或顯示，所有的字符都顯 示在一行中 ScrollBar屬性 功能：返回或設(shè)置文本框控件是否有水平滾動(dòng)條或垂直滾動(dòng)條 說明：ScrollBar屬性只有在MultiLine屬性為True時(shí)才有效，共有4個(gè)取值：0、1、 2或3。ScrollBar屬性為0時(shí)，表示不添加

22、任何滾動(dòng)條；取1時(shí)，表示添加水平滾 動(dòng)條；取2時(shí)，表示添加垂直滾動(dòng)條；取3時(shí)，表示同時(shí)增加水平和垂直滾動(dòng)條,第5章 Visual Basic 6.0常用控件,5.5 文本框控件,PasswordChar屬性 功能：返回或設(shè)置替代符 說明：設(shè)置該屬性，所輸入的字符將被所設(shè)置的符號(hào)代替。例如，如果將 PasswordChar屬性設(shè)為“*”，則在文本框所輸入的字符都將被符號(hào)*所代替，如5-8所示。在實(shí)際應(yīng)用中，該屬性主要用來設(shè)置密碼的樣式 Text屬性 功能：返回或設(shè)置文本框控件中的文本 說明：文本框控件無Caption屬性，文本框中的內(nèi)容是由Text屬性來返回的 SelLength屬性、SelSt

23、ar屬性、SelText屬性 功能：這3個(gè)屬性用于對(duì)文本內(nèi)容進(jìn)行選定操作。 其中SelLength屬性返回或設(shè)置所選擇的字符數(shù)； SelStar屬性返回或設(shè)置選定文本的起始點(diǎn)， 如果無選定的文本，則指出插入點(diǎn)的位置； SelText屬性返回或設(shè)置當(dāng)前被選定的字符， 如果無選定字符，則返回空字符串 說明：這3個(gè)屬性是不顯示在屬性窗口的， 要設(shè)置這3個(gè)屬性必須用代碼來完成， 具體語法結(jié)構(gòu)如下： 文本框控件名.SelLength長(zhǎng)度值 文本框控件名.SelStar位置值 文本框控件名.SelText字符串,5.5 文本框控件,第5章 Visual Basic 6.0常用控件,例如，要?jiǎng)h除文本框控件T

24、ext1中所有的文本，可通過以下代碼來完成： Text1.SelStar0 Text1.SelLengthLen(Text1.text) Text1.SelText = 5.5.2 文本框控件常用事件 能響應(yīng)的事件：Click事件、Change事件、DblClick事件、MouseDown事件、 MouseUp事件、MouseMove事件，KeyPress事件、KeyUp事件、KeyDown事件、 GotFocus事件、LostFocus事件等 最常用事件： Change事件，當(dāng)文本框中的內(nèi)容發(fā)生改變時(shí)，該事件被激發(fā) 【例5-5】 編寫1個(gè)程序，用于驗(yàn)證用戶所輸入的密碼是否正確。 文本框焦點(diǎn)獲

25、取的方法：除了可以按前面講的方法讓文本框獲得焦點(diǎn)之外， 文本框還可以用SetFocus方法來獲得焦點(diǎn)，具體語法結(jié)構(gòu)如下：文本框控 件名.SetFocus,5.5 文本框控件,第5章 Visual Basic 6.0常用控件,命令按鈕控件是所有控件中最常用的控件之一，幾乎所有VisualBasic6.0應(yīng)用程序都要用到命令按鈕控件，常用于發(fā)布執(zhí)行命令 5.6.1 命令按鈕常用屬性 Caption屬性 功能：返回或設(shè)置命令按鈕上所顯示的文本 說明：利用該屬性還可以為命令按鈕添加訪問鍵，如果某個(gè)字母被定義成訪問鍵時(shí)，用戶便可以直接通過Alt鍵該字母鍵來訪問命令按鈕。在設(shè)置Caption屬性時(shí)，在要定

26、義為訪問鍵的字母前加上符號(hào)“&”，便可以將該字母設(shè)為訪問鍵 Style屬性 功能：返回或設(shè)置控件的外觀樣式 說明：Style屬性有兩個(gè)取值：0或1，Style屬性取0時(shí)（默認(rèn)值），表示以標(biāo)準(zhǔn)樣式顯示命令按鈕，按鈕上不能顯示圖片；Style屬性取1時(shí)，表示以圖形樣式顯示命令按鈕，此時(shí)可在命令按鈕上顯示圖片 Value屬性 功能：返回或設(shè)置按鈕狀態(tài) 說明：Value屬性有兩個(gè)取值：True或False，Value屬性取True時(shí)，表示按鈕被按下；取False時(shí)，表示按鈕未被按下。Value屬性是不顯示在屬性窗口的，要設(shè)置該屬性只能通過代碼來完成，語法結(jié)構(gòu)如下： 控件名.ValueTrue或Fals

27、e,5.6 命令按鈕控件,第5章 Visual Basic 6.0常用控件,5.6.2 命令按鈕常用事件 能響應(yīng)的事件： Click事件、MouseDown事件、MouseUp事件、MouseMove事件、KeyPress事件、KeyUp事件、KeyDown事件、GotFocus事件、LostFocus事件等，但不能響應(yīng)Change事件、DblClick事件 常用事件：Click事件 【例5-6】 設(shè)計(jì)1個(gè)簡(jiǎn)單的計(jì)算器， 如圖5-10所示,5.6 命令按鈕控件,第5章 Visual Basic 6.0常用控件,單選按鈕控件、復(fù)選框控件功能：實(shí)現(xiàn)選擇的功能。唯一選擇時(shí)，一般使用單選按鈕控 件；多

28、項(xiàng)選擇時(shí)，一般選用復(fù)選框控件 框架控件功能：容器類控件，可以向框架中添加其他控件，主要是用來將控件進(jìn)行分組， 最常見的情況便是將單選按鈕進(jìn)行分組 5.7.1單選按鈕控件 單選按鈕控件 :常成組出現(xiàn)，在一組單選按鈕中，用戶只能選中其中的一個(gè)單選按鈕。 單擊某個(gè)單選按鈕，則該單選按鈕被選中；單擊其他單選按鈕，則該按鈕不被選中 常用屬性 Caption屬性 功能：返回或設(shè)置單選按鈕控件上所顯示的文本 Value屬性 功能：返回或設(shè)置單選按鈕控件所處的狀態(tài) 說明：Value屬性有兩個(gè)取值：True或False，Value屬性取True時(shí)，表示單選 按鈕被選中；Value屬性取False時(shí)，表示單選按鈕

29、未被選中。Value屬性是不 顯示在屬性窗口的，用戶只能通過代碼來設(shè)置該屬性，語法結(jié)構(gòu)如下：?jiǎn)芜x 按鈕控件名.ValueTrue或False 【例5-7】 編寫1個(gè)用單選按鈕控件來選擇字體的應(yīng)用程序 常用事件 能響應(yīng)的事件：Click事件、DblClick事件、MouseDown事件、MouseUp事件、MouseMove事件，KeyPress事件、KeyUp事件、KeyDown事件、GotFocus事件、LostFocus事件 常用事件：Click事件；除了單擊單選按鈕可以激發(fā)Click事件之外，將命令按 鈕控件的Value屬性設(shè)為True也同樣可以激發(fā)Click事件,5.7 單選按鈕控件、

30、復(fù)選框控件、框架控件,第5章 Visual Basic 6.0常用控件,5.7.2 復(fù)選框控件 復(fù)選框控件：相當(dāng)于一個(gè)開關(guān)，用于表明某個(gè)特定狀態(tài)是否被選中。單擊復(fù)選框控件， 則該復(fù)選框控件被選中；再次單擊該復(fù)選框控件，則該復(fù)選框不被選中。復(fù)選框控件成 組出現(xiàn)時(shí)，用戶可以同時(shí)選中一個(gè)或多個(gè)選項(xiàng) 常用屬性：同單選按鈕控件 Caption屬性 功能：返回或設(shè)置復(fù)選框控件上所顯示 的文本 Value屬性 功能：返回或設(shè)置復(fù)選框控件的狀態(tài) 說明：Value屬性有3個(gè)取值：0、1或2。 取0時(shí)，表示復(fù)選框控件沒有被選中；取1時(shí)，表示復(fù)選框控件被選中；取2時(shí)， 表示復(fù)選框控件不可用，此時(shí)復(fù)選框以灰色顯示。

31、【例5-8】 編寫一個(gè)用復(fù)選框控件來選擇字體樣式的應(yīng)用程序 常用事件：同單選按鈕控件 能響應(yīng)的事件：Click事件、DblClick事件、MouseDown事件、MouseUp事件、 MouseMove事件，KeyPress事件、KeyUp事件、KeyDown事件、GotFocus事件、 LostFocus事件。 常用事件：Click事件；復(fù)選框被選中或其Value值為1時(shí)，便會(huì)激發(fā)該事件,5.7 單選按鈕控件、復(fù)選框控件、框架控件,第5章 Visual Basic 6.0常用控件,5.7.3 框架控件 框架控件：在窗體上添加多個(gè)單選按鈕控件時(shí)，所有的單選按鈕控件都將被作為1組，因此用戶只能選

32、中其中的1個(gè)單選按鈕。如果用戶想選中多個(gè)單選按鈕，則必須使用框架控件將單選按鈕分組。單選按鈕被分組后，我們便可以在每組單選按鈕選中1個(gè)命令按鈕 向框架中添加控件：框架作為一種容器類的控件，可為其他控件提供可標(biāo)示的分組。為了讓框架起到分組的作用，在添加控件時(shí)，我們必須將控件添加到框架中去，具體添加的方法如下： 向窗體中添加1個(gè)框架控件，然后將框架控件調(diào)整到適當(dāng)?shù)拇笮　?在工具箱中單擊要添加的控件的圖標(biāo)，然后將鼠標(biāo)移到框架上，按住鼠標(biāo)左鍵，拖動(dòng)鼠標(biāo)至適當(dāng)位置，松開鼠標(biāo)左鍵。注意：鼠標(biāo)拖動(dòng)的范圍不能超出框架的邊界 說明：向框架中添加控件后，所添加的控件將被作為框架的一部分，隨著框架的改變而改變，框架

33、的消失而消失。 【例5-9】 編寫1個(gè)能選擇字體樣式、字體顏色和字體大小的應(yīng)用程序 框架常用屬性及事件 常用屬性：Caption屬性 能響應(yīng)的事件：由于框架主要是起標(biāo)示分組的作用， 因此我們很少為其添加事件，但它還是可以響應(yīng)大 多數(shù)事件的，如Click事件、MouseDown事件、 MouseUp事件等，但它不能響應(yīng)焦點(diǎn)事件及鍵盤事件,5.7 單選按鈕控件、復(fù)選框控件、框架控件,第5章 Visual Basic 6.0常用控件,功能：用來向用戶提供一系列的列表項(xiàng)，用戶可以從這些列表項(xiàng)中選擇自己 所需的項(xiàng) 5.8.1 列表框控件 列表框控件：以列表的形式向用戶提供一系列列表項(xiàng)，如圖5-19所示，

34、用 戶可以從中選擇一個(gè)或多個(gè)列表項(xiàng)。用戶在列表框控件中單擊某一列表項(xiàng)， 該列表項(xiàng)便會(huì)以藍(lán)色光條的形式顯示，表示該列表項(xiàng)被選中。當(dāng)列表框中的 列表項(xiàng)超出了列表框所能顯示的范圍時(shí)，系統(tǒng)便會(huì)自動(dòng)在列表框中增加1個(gè) 垂直滾動(dòng)條，便于用戶進(jìn)行上下翻動(dòng) 列表框控件常用屬性 List屬性 功能：返回或設(shè)置列表框中的某一列表項(xiàng)。 說明：List屬性是一個(gè)字符串類型的數(shù)組，列表框中所有的列表項(xiàng)都 被保存在該數(shù)組中，因此用戶要訪問或設(shè)置列表框中的某一項(xiàng)時(shí)， 必須按以下語法結(jié)構(gòu)來訪問： 列表框控件名.List(列表項(xiàng)的索引值)=字符串表達(dá)式 提示：如果某參數(shù)或表達(dá)式被加上 ，則表示該參數(shù)或表達(dá)式可以被省略。 例如，

35、我們可以通過以下語句來設(shè)置列表框List1中的第一項(xiàng)： List1.List(0)=”武漢”,5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,ListCount屬性 功能：返回列表框控件所有列表項(xiàng)的個(gè)數(shù)。 說明：ListCount屬性是不顯示在屬性窗口的，用戶只能通過代碼來訪問該屬 性，具體語法結(jié)構(gòu)如下： 整型變量 列表框控件名.ListCount ListIndex屬性 功能：返回或設(shè)置當(dāng)前被選中的列表項(xiàng)的索引值。 說明：ListIndex屬性是不顯示在屬性窗口的，用戶只能通過代碼來訪問或設(shè) 置該屬性，具體語法結(jié)構(gòu)如下:列表控件名.ListIndex索引值

36、例如，以下代碼可以選中列表框List1中的第2項(xiàng)。 List1.ListIndex1 Sorted屬性 功能：返回或設(shè)置列表框控件的列表是否按字母升序來排列。 說明：Sorted屬性有兩個(gè)取值：True或False，取True時(shí)，表示按字母升序排 列列表項(xiàng)；取False時(shí)（默認(rèn)值），表示按列表加入的順序排列列表。,5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,第5章 Visual Basic 6.0常用控件,Text屬性 功能：返回列表框控件中最后被選中的列表項(xiàng)。 說明：Text屬性是不顯示在屬性窗口的，用戶只能通過代碼來訪 問該屬性，具體語法結(jié)構(gòu)如下 :

37、字符串變量=列表框控件名.Text MultiSelect屬性 功能：設(shè)置用戶是否可以在列表框控件中選擇多個(gè)列表項(xiàng)。 說明：MultiSelect屬性有3個(gè)取值：0、1或2，取0時(shí)，表示只能選 擇一項(xiàng)；取1時(shí)，表示允許用戶進(jìn)行多項(xiàng)選擇，在進(jìn)行多項(xiàng)選擇時(shí)， 用戶只需單擊所要選擇的各個(gè)項(xiàng)即可如果某項(xiàng)已被選中，再單擊 該項(xiàng)時(shí)，則該項(xiàng)將不被選中；取2時(shí)，也表示允許用戶進(jìn)行多項(xiàng) 選擇，但用戶在進(jìn)行多項(xiàng)選擇時(shí)，必須同時(shí)按住Shift鍵，同樣如 果某項(xiàng)已被選中，再單擊該項(xiàng)時(shí)，則該項(xiàng)不被選中 列表的添加與刪除 【例5-10】 向列表框中添加列表，并刪除選定的列表。 添加列表項(xiàng)的方法：AddItem方法 語法結(jié)

38、構(gòu)如下：列表框控件名.AddItem 字符串變量或表達(dá)式,索引值 說明：如果省略“索引值”，則列表項(xiàng)總是添加到列表框最后；如果指定“索引值”，則在所指定的位置添加列表項(xiàng)，并將該位置以后的列表項(xiàng)都向后移動(dòng)1個(gè)位置。另外，如果將列表框控件的Sorted屬性設(shè)為了True，則“索引值”將失去作用。,5.8 列表框控件、組合框控件,刪除指定列表項(xiàng)的方法：RemoveItem方法 語法結(jié)構(gòu)如下：列表框控件名.RemoveItem 列表項(xiàng)索引值 說明：如果省略“索引值”，則刪除列表框中最后的列表項(xiàng)；如果指 定“索引值”，則刪除指定的位置的表項(xiàng)，并將該位置以后的列表項(xiàng) 都向前移動(dòng)1個(gè)位置。在例5.10中，我

39、們便是通過RemoveItem方法 來刪除選定的列表項(xiàng)：List1.RemoveItem i 刪除所有列表項(xiàng)的方法：Clear方法 語法結(jié)構(gòu)如下：列表控件名.Clear 常用事件 能響應(yīng)的事件：Click事件、DblClick事件、MouseDown事件、MouseUp 事件、MouseMove事件，KeyPress事件、KeyUp事件、KeyDown事件、 GotFocus事件、LostFocus事件、Scroll事件等。 說明：Scroll事件（卷動(dòng)事件）只有當(dāng)列表框中有滾動(dòng)條后，單擊滾動(dòng)條 才會(huì)被激發(fā)。語法結(jié)構(gòu)如下： Private Sub 列表控件名_Scroll() End Sub

40、常用事件：Click事件,5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,5.8.2 組合框控件 組合框控件: 以下拉列表或組合列表的形式向用戶提供一系列的列表項(xiàng)，如圖5-19所示，它兼有列表框控件和文本框控件的功能。用戶可以在列表框部分選擇所需的列表項(xiàng)，也可以在文本框中直接輸入所知道的列表項(xiàng) 組合框控件常用屬性 Style屬性 功能：返回或設(shè)置組合框的樣式 說明：Style屬性可以有以下3種取值：0、1或2，取0時(shí)，表示組 合框的樣式為組合下拉式，如圖5-21所示，用戶通常是看不到所 有列表項(xiàng)的，只有通過單擊右端的箭頭才可以看到全部的列表項(xiàng)， 在這種樣式下用

41、戶即可以在文本框部分輸入列表項(xiàng)，也可以在下 拉列表框部分選擇列表項(xiàng)；取1時(shí)，表示組合框的樣式為組合式， 如圖5-22所示，用戶即可以在文本框中輸入列表項(xiàng)，也可以在列 表框中選擇列表項(xiàng)，要想看到列表框，在設(shè)計(jì)組合框時(shí)，必須將 組合框的高度盡量拉長(zhǎng)；取2時(shí)，表示組合框的樣式為簡(jiǎn)單下拉 式，如圖5-23所示，在樣式上和第1種沒什么區(qū)別，但在此種樣 式下，用戶不能在文本框中輸入列表項(xiàng),5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,Text屬性 功能：返回或設(shè)置組合框被選中的列表項(xiàng) 說明：如果列表項(xiàng)是在文本框中直接輸入的，則 Text屬性返回的是在文本框中所輸入的列表

42、項(xiàng)；如果列表項(xiàng)是從列表框中選擇的，則Text屬性返回的是在列表框中所選定的列表項(xiàng)。組合框控件的Text屬性可在屬性窗口中看到 注意：除了以上兩個(gè)屬性和列表框有所不同之外，組合框其余的屬性和列表框是一模一樣的，如List、ListIndex、ListCount等，這里不在詳細(xì)說明 列表的添加和刪除：和列表框控件一樣，我們也可以使用AddItem方法為組合框添加列表項(xiàng)，用RemoveItem方法來刪除選定的列表項(xiàng)、Clear方法來刪除全部列表項(xiàng)，具體的語法結(jié)構(gòu)和列表框的完全一樣,5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,組合框控件的常用事件 能響應(yīng)的事件：C

43、lick事件、Change事件、DblClick事件、MouseDown事 件、MouseUp事件、MouseMove事件，KeyPress事件、KeyUp事件、 KeyDown事件、GotFocus事件、LostFocus事件、Scroll事件、DropDown事件等 常用事件：Click事件、Change事件、DropDown事件 說明：組合框所能響應(yīng)的事件與Style屬性有關(guān)，但無論在那種樣式下， 用戶只要單擊組合框中的列表項(xiàng)，便會(huì)激發(fā)Click事件 【例5-11】 編寫1個(gè)程序，用于將組合框中所選擇的內(nèi)容顯示到文本框中 能響應(yīng)的事件與Style屬性的關(guān)系 Style屬性為0或1時(shí)，如果

44、直接在文本框中輸入列表項(xiàng)或通過代碼設(shè)置了Text 屬性，則會(huì)激發(fā)Change事件，而當(dāng)Style屬性為2時(shí)，則不能響應(yīng)Change事件 Style屬性為1時(shí)，如果在列表框中雙擊列表項(xiàng)，則會(huì)激發(fā)雙擊事件 （DblClick事件），而在另外兩種樣式下，組合框不能響應(yīng)DblClick事 件 Style屬性為0或2時(shí)，如果單擊下拉箭頭，則會(huì)激發(fā)Dropdown事件，而Style 屬性為1時(shí)，不能響應(yīng)該事件。Dropdown事件的語法結(jié)構(gòu)如下 ： Private Sub 組合框控件名_DropDown() End Sub,5.8 列表框控件、組合框控件,第5章 Visual Basic 6.0常用控件,

45、功能：用來滾動(dòng)窗口，以方便我們查看數(shù)據(jù)；用于數(shù)據(jù)的輸入 滾動(dòng)條的樣式：Visual Basic6.0為用戶提供了兩種樣式的滾動(dòng)條：一種為水平的， 一種為垂直的，如圖5-25所示。單擊滾動(dòng)條兩端的箭頭或滾動(dòng)條的空白處，滾動(dòng)框便會(huì)在滾動(dòng)條上移動(dòng)。這兩種控件除了在方向上有所不同之外，屬性和所 能響應(yīng)的事件都是一樣的在工具箱中所對(duì)應(yīng)的圖標(biāo)分別為（水平） 和（垂直）,5.9 滾動(dòng)條控件,第5章 Visual Basic 6.0常用控件,5.9.1 滾動(dòng)條常用屬性 Max屬性、Min屬性 功能：返回或設(shè)置滾動(dòng)條所能表示的范圍。其中Max屬性用于設(shè)置最大值，Min屬 性用于設(shè)置最小值 說明：Max屬性表示的是當(dāng)滾動(dòng)框處于最右端或最下端時(shí)，滾動(dòng)條所對(duì)應(yīng)的值； Min屬性表示的是當(dāng)滾動(dòng)框處于最左端或最上端時(shí)，滾動(dòng)條所對(duì)應(yīng)的值，并且一 般的Min屬性值不能大于Max屬性值 SmallChange屬性、LargeChange屬性 功能：返回或設(shè)置滾動(dòng)框每次滾動(dòng)所代表的值，即滾動(dòng)框每次移動(dòng)的距離 說明：SmallChange屬性用于設(shè)置滾動(dòng)框每次移動(dòng)的最小距離；LargeChange屬性 用于設(shè)