列表框與組合框

1、4. 列表框與組合框列表框與組合框一、用途一、用途 列表框控件（列表框控件（ListBox）用于顯示項(xiàng)目列表，用戶可從中選擇一個(gè)或多個(gè)項(xiàng)目。如果項(xiàng)目總數(shù)超過了可顯示的項(xiàng)目數(shù)， VB會(huì)自動(dòng)加上滾動(dòng)條。 列表框有兩種風(fēng)格：標(biāo)準(zhǔn)和復(fù)選列表框。通過它的Style屬性來設(shè)置。如下圖： 組合框控件（組合框控件（ComboBox）將文本框和列表框的功能結(jié)合在一起，用戶可以在列表中選擇某項(xiàng)（只能選取一（只能選取一項(xiàng)）項(xiàng)）?；蛟诰庉媴^(qū)域中直接輸入文本內(nèi)容來選定項(xiàng)目。組合框共三種風(fēng)格三種風(fēng)格：下拉式組合框、簡單組合框和下拉式列表框（見下圖）。二、主要屬性1List、ListCount和ListIndex屬性 Li

2、st： 字符型數(shù)組，存放列表框的項(xiàng)目數(shù)據(jù)，下標(biāo)是從字符型數(shù)組，存放列表框的項(xiàng)目數(shù)據(jù)，下標(biāo)是從0開始的。開始的。 例如：例如： List(0)表示第一項(xiàng)的內(nèi)容表示第一項(xiàng)的內(nèi)容 ListIndex： 為整型值，選中的項(xiàng)目的序號(hào)，為整型值，選中的項(xiàng)目的序號(hào)， 沒有項(xiàng)目選沒有項(xiàng)目選中時(shí)為中時(shí)為-1。 ListCount：為整型值，表示項(xiàng)目的數(shù)量，為整型值，表示項(xiàng)目的數(shù)量，ListCount-1是最是最后一項(xiàng)的下標(biāo)。后一項(xiàng)的下標(biāo)。2Style屬性屬性 該值用來指示控件的顯示類型和行為。在運(yùn)行時(shí)是只讀的。對于列表框控件或組合框控件都有Style屬性，但它們的含義是不同的，見表8.5和表8.6。 例如：例如

3、：在窗體上放置2個(gè)列表框，將其Style屬性分別設(shè)置為0和1；放置3個(gè)組合框，將它們Style屬性分別設(shè)置為0、1和2。 3MultiSelect屬性屬性 用于指示是否能夠在用于指示是否能夠在列表框列表框控件中進(jìn)行復(fù)選以及如何進(jìn)行控件中進(jìn)行復(fù)選以及如何進(jìn)行復(fù)選，復(fù)選，在運(yùn)行時(shí)是只讀的。在運(yùn)行時(shí)是只讀的。注意，組合框控件無此屬性注意，組合框控件無此屬性。 設(shè)置值含 義0（缺省值）不允許復(fù)選1簡單復(fù)選。鼠標(biāo)單擊或按下空格鍵在列表中選中或取消選中項(xiàng)。箭頭鍵移動(dòng)焦點(diǎn)2擴(kuò)展復(fù)選。按下 SHIFT 并單擊鼠標(biāo)將在以前選中項(xiàng)的基礎(chǔ)上擴(kuò)展選擇到當(dāng)前選中項(xiàng)。按下 CTRL 并單擊鼠標(biāo)來在列表中選中或取消選中項(xiàng)表

4、8.7 MultiSelect 屬性設(shè)置值及含義 4Selected屬性屬性 該屬性返回或設(shè)置列表框控件中的一個(gè)項(xiàng)目的選擇狀態(tài)。該屬性是一個(gè)邏輯類型的數(shù)組，數(shù)組元素個(gè)數(shù)與列表框中的項(xiàng)目數(shù)相同，其下標(biāo)的變化范圍與List屬性相同。 例如：List1.Selected（0）=True表示列表框List1的第一個(gè)項(xiàng)目被選中，此時(shí)ListIndex的值設(shè)置為0。Selected屬性在設(shè)計(jì)時(shí)是不可用的，即無法在屬性窗口中設(shè)置屬性值。 5NewIndex屬性屬性 返回最近加入列表框控件或組合框控件的項(xiàng)目的索引。如果在列表中已沒有項(xiàng)目或刪除了一個(gè)項(xiàng)目，該屬性將返回-1。 6TopIndex屬性屬性 返回或設(shè)

5、置一個(gè)值，該值指定哪個(gè)項(xiàng)被顯示在列表框控件或組合框控件頂部的位置。該屬性取值范圍從0到ListCount-1，在設(shè)計(jì)時(shí)不可用。7Sorted屬性屬性返回一個(gè)邏輯值，當(dāng)Sorted屬性為True時(shí)列表框控件或組合框控件的項(xiàng)目自動(dòng)按字母表順序（升序）排序，為False時(shí)項(xiàng)目按加入的先后順序排列顯示。該屬性只能在設(shè)計(jì)時(shí)設(shè)置，不能在程序代碼中設(shè)置。8Text屬性屬性 對于下拉式組合框與簡單組合框，Text屬性返回編輯區(qū)域中的文本。對于列表框控件或下拉列表框，Text屬性的返回值總與List（ListIndex）的值相同。3 方法方法1AddItem方法方法 用于將項(xiàng)目添加到列表框控件或組合框控件。 語

6、法格式：對象名對象名.AddItem item , index 其中：item: 為字符串表達(dá)式，表示要加入的項(xiàng)目。 Index:決定新增項(xiàng)目的位置，缺省，則按照sorted屬性定位。 2RemoveItem方法方法用于從列表框控件或組合框控件中刪除一項(xiàng)。語法格式：對象名對象名. RemoveItem index 對index參數(shù)的規(guī)定同AddItem方法。3Clear方法 用于清除列表框控件或組合框控件中的所有項(xiàng)目。用于清除列表框控件或組合框控件中的所有項(xiàng)目。語法格式：語法格式：對象名. Clear例如，要?jiǎng)h除列表框（例如，要?jiǎng)h除列表框（List1）中所有項(xiàng)目，可使用：）中所有項(xiàng)目，可使用：

7、List1. Clear 例如，要?jiǎng)h除列表框（例如，要?jiǎng)h除列表框（List1）中所有選中的項(xiàng)目，可）中所有選中的項(xiàng)目，可使用下面的程序段：使用下面的程序段： i = 0Do While i = List1.ListCount - 1 If List1.Selected(i) = True Then List1.RemoveItem i End If i = i + 1 loop4、事件、事件（1）Click事件事件當(dāng)單擊某一列表項(xiàng)目時(shí)，將觸發(fā)列表框與組合框控件的Click事件。該事件發(fā)生時(shí)系統(tǒng)會(huì)自動(dòng)改變列表框與組合框控件的ListIndex、Selected、Text等屬性，無需另行編寫代碼。

8、（2）DblClick事件事件當(dāng)雙擊某一列表項(xiàng)目時(shí)，將觸發(fā)列表框與簡單組合框控件的DblClick事件。（3）Change事件事件當(dāng)用戶通過鍵盤輸入改變下拉式組合框或簡單組合框控件的文本框部分的正文，或者通過代碼改變了Text屬性的設(shè)置時(shí)，將觸發(fā)其Change事件。例例1. 列表框示例。列表框示例。 設(shè)計(jì)一個(gè)暢銷書設(shè)計(jì)一個(gè)暢銷書排行榜程序。排行榜程序。 用戶界用戶界面如右圖。面如右圖。例例2. 組合框示例。組合框示例。 設(shè)計(jì)一個(gè)用于設(shè)設(shè)計(jì)一個(gè)用于設(shè)置字體屬性的程序，置字體屬性的程序，界面如右圖所示。界面如右圖所示。5. 滾動(dòng)條 (ScrollBar)1 用用 途途 滾動(dòng)條控件（ScrollBa

9、r）分為水平滾動(dòng)條（HScrollbar）和垂直滾動(dòng)條（VscrollBar）二種，通常附在窗體上協(xié)助觀察數(shù)據(jù)或確定位置，也可用作數(shù)據(jù)輸入工具，用來提供某一范圍內(nèi)的數(shù)值供用戶選擇。 2. 屬性(1) Value 滑塊所處位置所代表的值。(2) Max：最大值 -32,76832,767(3) Min：最小值 -32,76832,767(4) SmallChange 最小變動(dòng)值， 單擊箭頭時(shí)移動(dòng)的增量值。(5) LargeChange 最大變動(dòng)值，單擊空白處時(shí)移動(dòng)的增量值。4 事件事件（1）Change事件事件 滾動(dòng)條的Change事件在移動(dòng)滾動(dòng)框或通過代碼改變其Value屬性值時(shí)發(fā)生。單擊滾動(dòng)

10、條兩端的箭頭或空白處將引單擊滾動(dòng)條兩端的箭頭或空白處將引發(fā)發(fā)Change事件。事件。（2）Scroll事件事件當(dāng)滾動(dòng)框被重新定位，或按水平方向或垂直方向滾動(dòng)時(shí)，Scroll事件發(fā)生。拖動(dòng)滑塊時(shí)會(huì)觸發(fā)拖動(dòng)滑塊時(shí)會(huì)觸發(fā)Scroll事件事件 Scroll事件與Change事件的區(qū)別在于：當(dāng)滾動(dòng)條控件滾動(dòng)時(shí)Scroll事件一直發(fā)生，而Change事件只是在滾動(dòng)結(jié)束之后才發(fā)生一次。例例3 滾動(dòng)條示例。設(shè)計(jì)滾動(dòng)條示例。設(shè)計(jì)一個(gè)程序進(jìn)行坐標(biāo)設(shè)置一個(gè)程序進(jìn)行坐標(biāo)設(shè)置 教材教材Pg.190例例4 滾動(dòng)條示例。設(shè)滾動(dòng)條示例。設(shè)計(jì)一個(gè)用于設(shè)置字體計(jì)一個(gè)用于設(shè)置字體顏色的程序顏色的程序. 6. 單選鈕、檢查框及框架單

11、選鈕、檢查框及框架單選鈕 1 用途 單選鈕（OptionButton）也稱作選擇按鈕。一組單選鈕控件可以提供一組彼此相互排斥的選項(xiàng)，任何時(shí)刻用戶只能從中選擇一個(gè)選項(xiàng)，實(shí)現(xiàn)一種“單項(xiàng)選擇”的功能，被選中項(xiàng)目左側(cè)圓圈中會(huì)出現(xiàn)一黑點(diǎn)。單選按鈕2. 重要屬性（1） Caption：文本標(biāo)題。設(shè)置單選鈕的文本注釋內(nèi)容。（2） Alignment屬性： 0：Left Justify(缺省設(shè)置)控件鈕在左邊，標(biāo)題顯示在右邊。 1：Right Justify 控件鈕在右邊，標(biāo)題顯示在左邊。（3）Value 屬性True: True: 單選鈕被單選鈕被選定選定False: False: 單選鈕未被單選鈕未被選定

12、（選定（缺省設(shè)置）缺省設(shè)置）（4） Style 屬性屬性 0-Standard： 標(biāo)準(zhǔn)方式標(biāo)準(zhǔn)方式 1-Graphical：圖形方式：圖形方式 說說 明：明： 在Style屬性設(shè)置為1時(shí)，可使用 Picture 屬性3 方法方法 SetFocus方法方法是單選鈕控件最常用的方法，可以在代碼是單選鈕控件最常用的方法，可以在代碼中通過該方法將中通過該方法將Value屬性設(shè)置為屬性設(shè)置為True。 與命令按鈕相同，使用該方法之前，必須要保證單選鈕與命令按鈕相同，使用該方法之前，必須要保證單選鈕處于可見和可用狀態(tài)（即處于可見和可用狀態(tài)（即Visible與與Enabled屬性值均為屬性值均為True）。

13、）。4 事件事件 Click事件是單選鈕控件最基本的事件，一般情況用戶事件是單選鈕控件最基本的事件，一般情況用戶無需為單選鈕編寫無需為單選鈕編寫Click事件過程，因?yàn)楫?dāng)用戶單擊單選鈕事件過程，因?yàn)楫?dāng)用戶單擊單選鈕時(shí)，它會(huì)自動(dòng)改變狀態(tài)。時(shí)，它會(huì)自動(dòng)改變狀態(tài)。 例例8.1 單選鈕示例（單選鈕示例（Pg.185）。）。 檢查框檢查框1 用途用途 檢查框（檢查框（CheckBox）也稱作復(fù)選框、選擇框。一組檢）也稱作復(fù)選框、選擇框。一組檢查框控件可以提供多個(gè)選項(xiàng)，它們彼此獨(dú)立工作，所以用查框控件可以提供多個(gè)選項(xiàng)，它們彼此獨(dú)立工作，所以用戶可以同時(shí)選擇任意多個(gè)選項(xiàng)，實(shí)現(xiàn)一種戶可以同時(shí)選擇任意多個(gè)選項(xiàng)，

14、實(shí)現(xiàn)一種“不定項(xiàng)選擇不定項(xiàng)選擇”的功能。選擇的功能。選擇某一選項(xiàng)后，該控件將顯示某一選項(xiàng)后，該控件將顯示，而清除此選，而清除此選項(xiàng)后，項(xiàng)后，消失。消失。2. 重要屬性 Caption、Alignment、Style與單選鈕相同 檢查框的檢查框的Value 屬性與單選按鈕不同，其值為數(shù)值型數(shù)屬性與單選按鈕不同，其值為數(shù)值型數(shù)據(jù)，可取據(jù)，可取0,1,2 檢查框檢查框0-Unchecked：未被未被選定選定1-Checked：選定：選定2-Grayed：灰色，禁止選擇灰色，禁止選擇 單選鈕單選鈕True: True: 單選鈕被單選鈕被選定選定False: False: 單選鈕未被單選鈕未被選定，選定

15、， 缺省設(shè)置缺省設(shè)置 檢查框與單選按鈕檢查框與單選按鈕Value 屬性的比較屬性的比較3 方法方法 檢查框也可使用SetFocus方法來改變其Value屬性值，其用法與要求同單選鈕。每調(diào)用一次SetFocus方法就會(huì)觸發(fā)一次Click事件。4 事件事件 Click事件是檢查框控件最基本的事件。用戶一般無需為檢查框編寫Click事件過程，但其對Value屬性值的改變遵循以下規(guī)則：單擊未選中的檢查框時(shí)，Value屬性值變?yōu)?；單擊已選中的檢查框時(shí)，Value屬性值變?yōu)?；單擊變灰的檢查框時(shí)，Value屬性值變?yōu)?。 框架框架 (Frame) Frame 控件為控件提供可標(biāo)識(shí)的分組。當(dāng)需要在同一窗體

16、控件為控件提供可標(biāo)識(shí)的分組。當(dāng)需要在同一窗體內(nèi)建立幾組互獨(dú)立的單選鈕時(shí)，就需要用框架將每一組單選鈕內(nèi)建立幾組互獨(dú)立的單選鈕時(shí)，就需要用框架將每一組單選鈕框框起來，把框框起來，把 OptionButton 控件分成幾組，如下形式?？丶殖蓭捉M，如下形式。 框架設(shè)Caption為 字體框架內(nèi)控件的創(chuàng)建方法： 為了將控件分組，首先需要繪制為了將控件分組，首先需要繪制 Frame 控件，然后控件，然后繪制繪制 Frame 里面的控件。這樣就可以把框架和里面的控件里面的控件。這樣就可以把框架和里面的控件同時(shí)移動(dòng)。如果在同時(shí)移動(dòng)。如果在 Frame 外部繪制了一個(gè)控件并試圖把它外部繪制了一個(gè)控件并試圖把它

17、移到框架內(nèi)部，那么控件將在移到框架內(nèi)部，那么控件將在 Frame 的上部，這時(shí)需分別的上部，這時(shí)需分別移動(dòng)移動(dòng) Frame 和控件和控件方法1：單擊工具箱上的工具，然后用出現(xiàn)的單擊工具箱上的工具，然后用出現(xiàn)的“+”指針，指針，在框架中適當(dāng)位置拖拉出適當(dāng)大小的控件。在框架中適當(dāng)位置拖拉出適當(dāng)大小的控件。不能使用雙擊工具箱上工具的自動(dòng)方式。不能使用雙擊工具箱上工具的自動(dòng)方式。方法2：將控件將控件“剪切剪切”(Ctrl+X)到剪貼板，然后選中到剪貼板，然后選中框架，使用框架，使用 (Ctrl+V)命令粘貼到框架內(nèi)。命令粘貼到框架內(nèi)。重要屬性1. Caption屬性：框架標(biāo)題：框架標(biāo)題2 Enable

18、d屬性：缺省為缺省為True False：標(biāo)題呈灰色，：標(biāo)題呈灰色，不允許對框架內(nèi)的所有對象進(jìn)行操作。3. Visible屬性： True：框架及其控件可見。：框架及其控件可見。 False：框架及其控件被隱含起來。：框架及其控件被隱含起來。事件：框架可以響應(yīng)的事件框架可以響應(yīng)的事件ClickClick、DblClickDblClick一般不需要有關(guān)框架的事件過程。一般不需要有關(guān)框架的事件過程。1. 用途 時(shí)鐘控件（時(shí)鐘控件（Timer）又稱計(jì)時(shí)器、定時(shí)器控）又稱計(jì)時(shí)器、定時(shí)器控件，用于有規(guī)律地定時(shí)執(zhí)行指定的工作，適合編件，用于有規(guī)律地定時(shí)執(zhí)行指定的工作，適合編寫不需要與用戶進(jìn)行交互就可直接執(zhí)

19、行的代碼，寫不需要與用戶進(jìn)行交互就可直接執(zhí)行的代碼，如計(jì)時(shí)、倒計(jì)時(shí)、動(dòng)畫等。在程序運(yùn)行階段，時(shí)如計(jì)時(shí)、倒計(jì)時(shí)、動(dòng)畫等。在程序運(yùn)行階段，時(shí)鐘控件不可見。鐘控件不可見。5. 時(shí)鐘 2. 屬 性（1）Interval屬性 取值范圍在取值范圍在0 到到 64767 之間（包括這兩個(gè)數(shù)值），單之間（包括這兩個(gè)數(shù)值），單位為毫秒（位為毫秒（0.001秒），表示計(jì)時(shí)間隔。若將秒），表示計(jì)時(shí)間隔。若將Interval屬性屬性設(shè)置為設(shè)置為0或負(fù)數(shù)，則計(jì)時(shí)器停止工作?；蜇?fù)數(shù)，則計(jì)時(shí)器停止工作。（2）Enabled屬性 無論何時(shí)，只要時(shí)鐘控件的無論何時(shí)，只要時(shí)鐘控件的Enabled屬性被設(shè)置為屬性被設(shè)置為True而

20、且而且Interval屬性值大于屬性值大于0，則計(jì)時(shí)器開始工作（以，則計(jì)時(shí)器開始工作（以Interval屬性值為間隔，觸發(fā)屬性值為間隔，觸發(fā)Timer事件）。事件）。 通過把通過把Enabled屬性設(shè)置為屬性設(shè)置為False可使時(shí)鐘控件無效，可使時(shí)鐘控件無效，即計(jì)時(shí)器停止工作。即計(jì)時(shí)器停止工作。3 .方法方法 VB沒有為時(shí)鐘控件提供有關(guān)的方法。4 . 事件事件 時(shí)鐘控件只能響應(yīng)時(shí)鐘控件只能響應(yīng)Timer事件事件，當(dāng)Enabled屬性值為True且Interval屬性值大于0時(shí)，該事件以Interval屬性指定的時(shí)間間隔發(fā)生，需要定時(shí)執(zhí)行的操作即放在該事件過程中完成。 例例1. 時(shí)鐘示例。時(shí)鐘示

21、例。設(shè)計(jì)一個(gè)計(jì)時(shí)報(bào)警程序，開始時(shí)窗體上顯示當(dāng)前時(shí)間，單擊“開始”按鈕10秒鐘后程序結(jié)束。 例例2. 設(shè)計(jì)一個(gè)霓虹燈程序設(shè)計(jì)一個(gè)霓虹燈程序，利用時(shí)鐘控件模擬霓虹燈的效果。 菜菜 單單1 .菜單概述菜單概述 菜單是圖形化界面一個(gè)必不可少的組成元素，通過菜單菜單是圖形化界面一個(gè)必不可少的組成元素，通過菜單對各種命令按功能進(jìn)行分組，使用戶能夠更加方便、直觀對各種命令按功能進(jìn)行分組，使用戶能夠更加方便、直觀地訪問這些命令。地訪問這些命令。 Windows環(huán)境下的應(yīng)用程序一般為用戶提供三種菜單：環(huán)境下的應(yīng)用程序一般為用戶提供三種菜單：窗體控制菜單窗體控制菜單（如圖（如圖10-10所示）、所示）、下拉菜單下

22、拉菜單（如圖（如圖10-10所所示）示）與快捷菜單與快捷菜單（如圖（如圖10-11所示）。所示）。啟動(dòng)菜單編輯器：啟動(dòng)菜單編輯器：有三種方法有三種方法 1 單擊工具欄菜單圖標(biāo)單擊工具欄菜單圖標(biāo) 2 工具工具/菜單編輯器菜單編輯器 (CTRL+E) 3 窗體上快捷菜單窗體上快捷菜單 菜單編輯器菜單編輯器 菜單編輯器操作界面如菜單編輯器操作界面如右所示。右所示。2. 菜單編輯器菜單編輯器 3. 菜單編輯器的使用技巧菜單編輯器的使用技巧1. 標(biāo)題標(biāo)題(Caption)：2. 名稱名稱(Name)：3. 快捷鍵快捷鍵(Shortcut)：4. 下一個(gè)下一個(gè)(Next)：5. 和和按鈕按鈕6. 插入插入

23、(Insert)按鈕：按鈕：7. 刪除刪除(Delete)按鈕：按鈕：8 和和按鈕：按鈕：9. 復(fù)選復(fù)選(Checked)檢查框：檢查框：10. 有效有效(Enabled)檢查框：檢查框：11. 顯示窗口列表顯示窗口列表(Window List)檢查框：檢查框：根據(jù)設(shè)計(jì)要求，依次輸入或選擇所面項(xiàng)目，即可完成。例：根據(jù)設(shè)計(jì)要求，依次輸入或選擇所面項(xiàng)目，即可完成。例： 菜單的主要屬性菜單的主要屬性1. 標(biāo)題標(biāo)題(Caption)：在窗口上顯示，例如：輸入：在窗口上顯示，例如：輸入&File，顯，顯示為：示為： File，熱鍵：，熱鍵：Alt+F 2. 名稱名稱(Name)： 菜單項(xiàng)的名稱，分界符也

24、應(yīng)有名稱。菜單項(xiàng)的名稱，分界符也應(yīng)有名稱。3. 快捷鍵快捷鍵(Shortcut)：下拉列表框下拉列表框4 下一個(gè)下一個(gè)(Next)：設(shè)置下一個(gè)菜單項(xiàng)。設(shè)置下一個(gè)菜單項(xiàng)。 5. 和和按鈕：按鈕：“” 下一級菜單項(xiàng)；下一級菜單項(xiàng)；“”上一級菜單上一級菜單項(xiàng)。項(xiàng)。6. 插入插入(Insert)按鈕：按鈕：插入菜單項(xiàng)插入菜單項(xiàng)7. 刪除刪除(Delete)按鈕：按鈕：刪除菜單項(xiàng)刪除菜單項(xiàng)8. 和和按鈕：按鈕：改變菜單項(xiàng)位置。改變菜單項(xiàng)位置。9. 復(fù)選復(fù)選(Checked)檢查框：檢查框：菜單項(xiàng)為選定項(xiàng)。菜單項(xiàng)為選定項(xiàng)。 10. 有效有效(Enabled)檢查框：檢查框：True：菜單項(xiàng)可選；：菜單項(xiàng)可選；False：不可選。不可選。 11. 顯示窗口列表顯示窗口列表(Window List)檢查框：檢查框：決定是否顯示所有打開的子窗體標(biāo)題。決定是否顯示所有打開的子窗體標(biāo)題。對對MDI窗體和窗體和MDI子窗體有效，對普通窗體無效。子窗體有效，對普通窗體無效。1設(shè)計(jì)下拉菜單2設(shè)計(jì)子菜單或改變子菜單級別 3為菜單項(xiàng)分組 菜單