第4章常用標準控件

1、上一節(jié)內容上一節(jié)內容v1. 窗體的結構；窗體的結構；v2. 窗體屬性、事件和方法；窗體屬性、事件和方法；v3. 多窗體和多窗體和MDI窗體；窗體；第第4章章 常用標準控件常用標準控件本章要求：本章要求： 掌握常用控件文本框、標簽、命令按鈕等控件的常掌握常用控件文本框、標簽、命令按鈕等控件的常用屬性、重要事件和方法的使用；用屬性、重要事件和方法的使用；本章重點：本章重點： 文本框、標簽、命令按鈕、單選框、復選框、框架、文本框、標簽、命令按鈕、單選框、復選框、框架、列表框、組合框、圖形控件、滾動條、時鐘等控件的常用列表框、組合框、圖形控件、滾動條、時鐘等控件的常用屬性、重要事件和方法的使用；屬性、

2、重要事件和方法的使用；本章難點：本章難點：列表、組合框和時鐘控件列表、組合框和時鐘控件4.1 文本框和標簽控件文本框和標簽控件4.1.1 4.1.1 標簽標簽 LabelLabel 用于顯示文本用于顯示文本(輸出輸出)信息，不能作為輸入信息的信息，不能作為輸入信息的界面。界面。1基本屬性基本屬性 Name、Caption、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等與窗體的使用相同。等與窗體的使用相同。 2常用屬性常用屬性（1）Caption屬性屬性 Caption屬性用來改變屬性用來改變Label控件中顯控件中

3、顯示的文本。示的文本。Caption屬性允許文本的長度最多屬性允許文本的長度最多為為1024字節(jié)。缺省情況下，當文本超過控件字節(jié)。缺省情況下，當文本超過控件寬度時，文本會自動換行，而當文本超過控寬度時，文本會自動換行，而當文本超過控件高度時，超出部分將被裁剪掉。件高度時，超出部分將被裁剪掉。（2） Alignment屬性屬性 設置設置Caption屬性中文本的對齊方式，屬性中文本的對齊方式，共有三種可選值：共有三種可選值： 0 左對齊左對齊(Left Justify)； 1 右對齊右對齊(Right Justify)； 2 居中對齊居中對齊(Center Justify)。（3）BackSty

4、le屬性屬性 該屬性用于確定標簽的背景是否透明。有兩種情況可該屬性用于確定標簽的背景是否透明。有兩種情況可選：值為選：值為0時，表示背景透明，標簽后的背景和圖形可見；時，表示背景透明，標簽后的背景和圖形可見；值為值為1時，表示不透明，標簽后的背景和圖形不可見。時，表示不透明，標簽后的背景和圖形不可見。 （4）WordWrap屬性屬性 自動調整標簽的高度，使之適合標題文本的高度。默認自動調整標簽的高度，使之適合標題文本的高度。默認值為值為False。（5）AutoSize屬性屬性 AutoSize屬性確定標簽是否會隨標題內容的多少自動屬性確定標簽是否會隨標題內容的多少自動變化。如果值為變化。如果

5、值為True，則隨，則隨Caption內容的大小自動調整控內容的大小自動調整控件本身的大小，件本身的大小，且不換行且不換行；如果值為；如果值為False，表示標簽的尺，表示標簽的尺寸不能自動調整，超出尺寸范圍的內容不予顯示。寸不能自動調整，超出尺寸范圍的內容不予顯示。（6）BorderStyle屬性屬性 數(shù)值型，用于設置邊框的樣式，只能取數(shù)值型，用于設置邊框的樣式，只能取0或或1，其作用，其作用如下：如下： 0標簽無邊界線，缺省值。標簽無邊界線，缺省值。 1標簽有邊界線。標簽有邊界線。4.1.2 4.1.2 文本框文本框 TextBoxTextBox 文本框文本框是一個文本編輯區(qū)域，可在該區(qū)域

6、輸入、編輯和是一個文本編輯區(qū)域，可在該區(qū)域輸入、編輯和顯示正文內容。顯示正文內容。（一）（一） 屬性屬性1基本屬性基本屬性 Name、Height、Width、Top、Left、Enabled、Visible、Font，F(xiàn)oreColor、BackColor等與標簽控件相同。等與標簽控件相同。 2常用屬性常用屬性（1）Text文本屬性文本屬性 在文本框中顯示的正文內容存放在在文本框中顯示的正文內容存放在Text屬性中。當程序運行時，用戶通過屬性中。當程序運行時，用戶通過鍵盤輸入正文內容，保存在鍵盤輸入正文內容，保存在Text屬性中。屬性中。 注：注：文本框沒有文本框沒有Caption屬性屬性

7、（2）Maxlength： 設置正文的最多字符個數(shù)設置正文的最多字符個數(shù), 0任意長度值，任意長度值， 但受但受VB系統(tǒng)規(guī)定的系統(tǒng)規(guī)定的2048個字符的限制。個字符的限制。 （3） MultiLine： 是否為多行，默認值為（是否為多行，默認值為（False），表示一行。，表示一行。 （4）ScrollBars：設置滾動條模式。：設置滾動條模式。 當當MultiLine為為True時時, 該屬性才有效該屬性才有效,滾動條的形式有以下幾種：滾動條的形式有以下幾種： 0-None：無滾動條：無滾動條 1-Horizontal：水平滾動條：水平滾動條 2-Vertical垂直滾動條垂直滾動條 3-B

8、oth水平和垂直滾動條水平和垂直滾動條 注：注： 一旦設置了一旦設置了ScrollBars為非為非0 ,自動換行就失效自動換行就失效 。（5）Locked： 是否可被編輯屬性，是否可被編輯屬性，F(xiàn)alse，表示，表示 為可編輯。為可編輯。 （6）PassWordChar屬性屬性 設置設置PasswordChar屬性為了掩蓋文本框中輸屬性為了掩蓋文本框中輸 入的字符。入的字符。（7）SelStart、SelLength和和SelText屬性屬性 這三個屬性是文本框中對文本的編輯屬性。這三個屬性是文本框中對文本的編輯屬性。 SelStart：確定在文本框確定在文本框選中文本的起始位置。第一字選中文

9、本的起始位置。第一字符的位置為符的位置為0。若沒有選擇文本，則用于返回或設置文本的若沒有選擇文本，則用于返回或設置文本的插入點位置，如果插入點位置，如果SelStart的值大于文本的長度，則的值大于文本的長度，則SelStart取當前文本的長度。取當前文本的長度。 SelLength：設置或返回文本框中選定的文本字符串長設置或返回文本框中選定的文本字符串長度度（字符個數(shù)）。（字符個數(shù)）。 SelText：設置或返回當前選定文本中的文本字符串。設置或返回當前選定文本中的文本字符串。（二）常用事件（二）常用事件 Change ： 當改變文本框的當改變文本框的Text屬性時會引發(fā)該事件。當用輸入一屬

10、性時會引發(fā)該事件。當用輸入一個字符，就會觸發(fā)一次個字符，就會觸發(fā)一次Change事件。事件。 KeyPress(KeyAscii As Integer)： 當文本框處于當前狀態(tài)時，按下任意鍵，就會產生該事當文本框處于當前狀態(tài)時，按下任意鍵，就會產生該事件。通?？捎迷撌录z查輸入的字符（通過件。通?？捎迷撌录z查輸入的字符（通過KeyPress事件過事件過程可以檢測按鍵的程可以檢測按鍵的ASCII碼值）。碼值）。GotFocus ： 按下按下Tab鍵或單擊該對象使它處于當前狀態(tài)時，鍵或單擊該對象使它處于當前狀態(tài)時，觸發(fā)該事件。觸發(fā)該事件。（三）（三） 常用方法常用方法 文本框最有用的方法是：文本

11、框最有用的方法是：SetFocus，使用形式：，使用形式： 對象對象.SetFocus 功能：功能： 是把光標移到指定的文本框對象中。是把光標移到指定的文本框對象中。4.2 4.2 命令按鈕命令按鈕CommandButtonCommandButton 接受用戶輸入的命令接受用戶輸入的命令.輸入命令可以有三種方式輸入命令可以有三種方式: （1）鼠標單擊；）鼠標單擊； （2）按）按Tab鍵焦點跳轉到該按鈕鍵焦點跳轉到該按鈕, 再按回車鍵；再按回車鍵； （3） 快捷鍵（快捷鍵（Alt+有下劃線的字母）有下劃線的字母）（一）屬性（一）屬性 1基本屬性基本屬性 Name、Height、Width、Top

12、、Left、Enabled、Visible、Font等與窗體的使用相同。等與窗體的使用相同。 2常用屬性常用屬性 （1）Caption: 標題屬性標題屬性命令按鈕顯示的內命令按鈕顯示的內容，可在某字母前加容，可在某字母前加 “&“設置快捷鍵。例如：要設置快捷鍵。例如：要得到得到 的命令按鈕，則應將其的命令按鈕，則應將其Caption屬性設置為屬性設置為“確定（確定（&Ok）”。（2） Default：確認屬性（邏輯值），設置為：確認屬性（邏輯值），設置為True時，時，按按Enter鍵相當于用鼠標器單擊了該按鈕。鍵相當于用鼠標器單擊了該按鈕。 注意：在一個窗體只能的一個按鈕的注

13、意：在一個窗體只能的一個按鈕的Default設置設置為為Ture（3）Cancel:取消功能屬性（邏輯值），當設置為取消功能屬性（邏輯值），當設置為Ture時，程序運行時按時，程序運行時按Esc鍵與單擊此命令按鈕的效鍵與單擊此命令按鈕的效果相同。果相同。 注意：在一個窗體只能的一個按鈕的注意：在一個窗體只能的一個按鈕的Cancel設置設置為為Ture例如：設計如下程序，當按例如：設計如下程序，當按Enter鍵時，提示出鍵時，提示出對話框對話框“確定按鈕被選中確定按鈕被選中”，按，按ESC鍵時提示鍵時提示對話框對話框“取消按鈕被選中取消按鈕被選中”（4）Value: 檢查該按鈕是否按下，它有兩個

14、值檢查該按鈕是否按下，它有兩個值true和和false。該屬性在設計時無效。該屬性在設計時無效。（5）Style : 確定顯示的形式。確定顯示的形式。0 只能顯示文字只能顯示文字, 1 文文字、圖形均可字、圖形均可 。 （6）Picture : 按鈕可顯示圖片文件按鈕可顯示圖片文件(.jpg、.bmp和和.Ico)，只有當，只有當Style屬性值為屬性值為1時有效。時有效。（7）ToolTipText ：設置當鼠標在控件上暫停時顯示：設置當鼠標在控件上暫停時顯示的文本。常用于圖形方式命令按鈕，對圖形命令按鈕的文本。常用于圖形方式命令按鈕，對圖形命令按鈕進行文字注釋。進行文字注釋。（二）命令按鈕

15、常用事件和方法：（二）命令按鈕常用事件和方法： 常用方法：常用方法：Move、Setfocus： 常用事件：常用事件：Click、MouseDown、MouseUp事件。事件。 注：命令按鈕不支持注：命令按鈕不支持Dbclick事件！事件！上機演練：設計如下的乘法計算器，要求單上機演練：設計如下的乘法計算器，要求單擊擊“求積求積”按鈕能算出兩數(shù)的乘積，單擊按鈕能算出兩數(shù)的乘積，單擊“清空清空”按鈕清空文本框里的內容，單擊按鈕清空文本框里的內容，單擊“結束結束”按鈕退出，并將顯示積的那個文本按鈕退出，并將顯示積的那個文本框設成只讀框設成只讀。4.3 選擇控件和框架 在在Visual Basic

16、6.0中，單選中，單選與復選按鈕控件主要作為選項供與復選按鈕控件主要作為選項供給用戶選擇。不同的是在一組選給用戶選擇。不同的是在一組選擇按鈕當中，單選控件只能選擇擇按鈕當中，單選控件只能選擇一個，其他單選按鈕自動變?yōu)槲匆粋€，其他單選按鈕自動變?yōu)槲幢贿x中狀態(tài)；而在一組復選按鈕被選中狀態(tài)；而在一組復選按鈕中，可以選定任意數(shù)量的按鈕。中，可以選定任意數(shù)量的按鈕。4.3.1 單選框和復選框單選框和復選框復選 單選按鈕（單選按鈕（OptionButtonOptionButton），也稱為選），也稱為選擇按鈕。一組單選按鈕控件，可以提供一擇按鈕。一組單選按鈕控件，可以提供一組彼此相互排斥的選項，任意時刻用

17、戶只組彼此相互排斥的選項，任意時刻用戶只能從中選擇一個選項，實現(xiàn)一種能從中選擇一個選項，實現(xiàn)一種“單項選單項選擇擇”的功能，被選中項目左側圓圈中會出的功能，被選中項目左側圓圈中會出現(xiàn)一黑點?，F(xiàn)一黑點。1.單選按鈕的用途：單選按鈕的用途：單選按鈕單選按鈕2. 單選鈕重要屬性 Caption:文本標題。設置單選鈕的文本注釋內容。文本標題。設置單選鈕的文本注釋內容。 Alignment屬性：屬性： 0：Left Justify（缺省設置）控件按鈕在左邊，（缺省設置）控件按鈕在左邊，標題顯示在右邊；標題顯示在右邊； 1：Right Justify 控件按鈕在右邊，標題顯示在控件按鈕在右邊，標題顯示在左

18、邊；左邊； Value屬性：屬性： True：單選按鈕被選定；：單選按鈕被選定； False：單選按鈕未被選定；：單選按鈕未被選定；Style屬性屬性 設置單選鈕的顯示方式。屬性值為設置單選鈕的顯示方式。屬性值為0或或1。0為缺省值。為缺省值。0 Standard：標準方式。用文本旁邊圓圈中是否有：標準方式。用文本旁邊圓圈中是否有黑點來表示選定狀態(tài)。黑點來表示選定狀態(tài)。1 Graphical：圖形方式。外觀類似命令按鈕，用：圖形方式。外觀類似命令按鈕，用按鈕是否按下表示選定的狀態(tài)。按鈕是否按下表示選定的狀態(tài)。說明：在說明：在Style屬性設置為屬性設置為1時，可使用時，可使用Picture屬性

19、屬性。2. 單選鈕重要屬性3.單選鈕事件v單選鈕常用事件是單選鈕常用事件是Click事件。該事件常用于事件。該事件常用于創(chuàng)建一個事件過程，檢測該控件對象的創(chuàng)建一個事件過程，檢測該控件對象的Value屬性值，判斷它是否被選中，然后進行相應屬性值，判斷它是否被選中，然后進行相應的處理。的處理。4.單選按鈕程序舉例 文本框文本框 (Text1) 顯示預設的字樣；單選按鈕一顯示預設的字樣；單選按鈕一（Option1），單擊此按鈕可以將文本框里顯示的），單擊此按鈕可以將文本框里顯示的字樣改變成字樣改變成“黑體黑體”， 單選按鈕二（單選按鈕二（Option2），），單擊此按鈕能將文本框里顯示的字體改變成單

20、擊此按鈕能將文本框里顯示的字體改變成“楷楷體體”。如下圖：。如下圖：4.單選按鈕程序舉例v單選按鈕一：單選按鈕一：vPrivate Sub Option1_Click()vText1.FontName = “黑體黑體”vEnd Subv單選按鈕二：單選按鈕二：vPrivate Sub Option1_Click()vText1.FontName = “楷體楷體_GB2312”vEnd Sub5.復選框的用途 v復選框復選框（CheckBox）也）也稱作檢查框、選擇稱作檢查框、選擇框，一組復選框控框，一組復選框控件可以提供多個選件可以提供多個選項，實現(xiàn)一種項，實現(xiàn)一種“不不定項選擇定項選擇”的功

21、能，的功能，選擇某一選項后，選擇某一選項后，該控件將顯示該控件將顯示，而清除此選項后而清除此選項后消失。消失。檢查框6.復選鈕事件vClick事件是復選框控件最基本的事件。其對事件是復選框控件最基本的事件。其對Value屬性值的改變遵循以下規(guī)則：屬性值的改變遵循以下規(guī)則：v單擊未被選中的復選框時，單擊未被選中的復選框時，Value屬性值變?yōu)閷傩灾底優(yōu)?；v單擊已被選中的復選框時，單擊已被選中的復選框時，Value屬性值變?yōu)閷傩灾底優(yōu)?；v單擊變灰的復選框時，單擊變灰的復選框時，Value屬性值變?yōu)閷傩灾底優(yōu)?；7.復選按鈕舉例8.復選按鈕舉例v文本框（文本框（Text1）顯示預設的字樣）顯示預

22、設的字樣v復選按鈕一（復選按鈕一（Check1）可以將文本框里的字變）可以將文本框里的字變成粗體；成粗體；v復選按鈕二（復選按鈕二（Check2）可以將文本框里的字變）可以將文本框里的字變成斜體；成斜體；v復選按鈕三（復選按鈕三（Check3）可以將文本框里的字加）可以將文本框里的字加下劃線。下劃線。v復選按鈕一：復選按鈕一：vPrivate Sub Check1_Click()vIF check1.Value = 1 Thenv Text1.FontBold = TruevElsev Text1.FontBold = FalsevEnd If vEnd Sub8.復選按鈕舉例v復選按鈕二：復

23、選按鈕二：vPrivate Sub Check2_Click()vIF check2.Value = 1 Thenv Text1.FontItalic = TruevElsev Text1.FontItalic = FalsevEnd If vEnd Sub8.復選按鈕舉例8.復選按鈕舉例v復選按鈕三：復選按鈕三：vPrivate Sub Check3_Click()vIF check3.Value = 1 Thenv Text1.FontUnderline = TruevElsev Text1. FontUnderline = FalsevEnd If vEnd Sub8.單選鈕與復選鈕的區(qū)

24、別（1）請大家注意，單選控件與復選控件的）請大家注意，單選控件與復選控件的Value值是不同的，這是初學者最容易混淆的。值是不同的，這是初學者最容易混淆的。復選框與單選框Value屬性的比較 單選鈕單選鈕復選鈕復選鈕True：單選鈕被選定；：單選鈕被選定；False：單選鈕未被選：單選鈕未被選定；定；缺省設置缺省設置 0UnChecked：未被選定：未被選定1Checked：選定：選定2Grayed：灰色，禁止選：灰色，禁止選擇擇（2）兩種選擇按鈕都對）兩種選擇按鈕都對Click事件做出反應，事件做出反應，但單選按鈕比較簡單，只需直接輸入代碼但單選按鈕比較簡單，只需直接輸入代碼即可；復選按鈕比

25、較復雜，需經過條件判即可；復選按鈕比較復雜，需經過條件判斷后再做出反應。斷后再做出反應。聯(lián)想：v復選按鈕是不是非得經過這種選擇判斷？能不能如復選按鈕是不是非得經過這種選擇判斷？能不能如單選按鈕那樣直接使用呢？單選按鈕那樣直接使用呢？v以上面的例子，假設復選按鈕以上面的例子，假設復選按鈕不經過判斷，而不經過判斷，而直接在點擊事件中輸入代碼：直接在點擊事件中輸入代碼：vPrivate Sub Check1_Click()v Text1.FontBold = TruevEnd Subv那么你會發(fā)現(xiàn)，復選按鈕一經點擊就不能取消字體那么你會發(fā)現(xiàn)，復選按鈕一經點擊就不能取消字體加粗效果了；而實際上復選按鈕

26、的功能是，點擊一加粗效果了；而實際上復選按鈕的功能是，點擊一次即選中時，字體加粗；點擊第二次即取消選擇，次即選中時，字體加粗；點擊第二次即取消選擇，字體不再加粗；以此類推。字體不再加粗；以此類推。4.3.2 框架（Frame）vFrame控件為控件提供可標志的分組。它是一控件為控件提供可標志的分組。它是一個容器控件。當需要在同一個窗體內建立一組個容器控件。當需要在同一個窗體內建立一組相互獨立的單選鈕時，就需要用框架將每一組相互獨立的單選鈕時，就需要用框架將每一組單選按鈕框起來，把單選按鈕框起來，把OptionButton控件分成控件分成幾組。幾組。 框架框架設設Caption為為 字體字體1.

27、重要屬性v（1）Caption屬性屬性v設置框架的標題，顯示在框架的左上角，用于設置框架的標題，顯示在框架的左上角，用于注明框架的用途。注明框架的用途。v如果此值為空值，則框架顯示為封閉的矩形框。如果此值為空值，則框架顯示為封閉的矩形框。v（2）Enabled屬性屬性v決定框架中的控件是否可用，可選值有決定框架中的控件是否可用，可選值有True和和False，默認值為，默認值為True。vTrue：框架內控件可以響應用戶的操作，框：框架內控件可以響應用戶的操作，框架標題顏色為架標題顏色為ForeColor中的顏色。中的顏色。vFalse：框架內的控件不響應用戶的操作，：框架內的控件不響應用戶的

28、操作，框架標題顏色變?yōu)榛疑??？蚣軜祟}顏色變?yōu)榛疑?。v（3）Index 屬性屬性v設置控件對象在控件組中的成員編號。設置控件對象在控件組中的成員編號。v（4）Visible屬性屬性v設置框架及框架內控件是否可見，設置框架及框架內控件是否可見，True為為可見，可見，F(xiàn)alse為不可見。為不可見。v例例4-4 單選按鈕和框架應用單選按鈕和框架應用Page584.4 列表框和組合框 列表框控件（列表框控件（ListBox）用于顯示項目列表，用戶可從）用于顯示項目列表，用戶可從中選擇一個或多個項目。如果項目總數(shù)超過了可顯示的項中選擇一個或多個項目。如果項目總數(shù)超過了可顯示的項目數(shù)，目數(shù)， VB會自動加

29、上滾動條。會自動加上滾動條。 列表框有兩種風格：標準和復選列表框。通過它的列表框有兩種風格：標準和復選列表框。通過它的Style屬性來設置。屬性來設置。 組合框控件（組合框控件（ComboBox）將文本框和列表框的將文本框和列表框的功能結合在一起，用戶可以在列表中選擇某項（只能選取功能結合在一起，用戶可以在列表中選擇某項（只能選取一項），或在編輯區(qū)域中直接輸入文本內容來選定項目。一項），或在編輯區(qū)域中直接輸入文本內容來選定項目。組合框共三種風格：下拉式組合框、簡單組合框和下拉式組合框共三種風格：下拉式組合框、簡單組合框和下拉式列表框。列表框。4.4 列表框和組合框列表框和組合框這這3個屬性只能

30、在程序代碼中設置：個屬性只能在程序代碼中設置：List： 字符型數(shù)組字符型數(shù)組 存放列表框的項目數(shù)據(jù)，下標是從存放列表框的項目數(shù)據(jù)，下標是從0開始的。開始的。 例如：例如： List(0)表示第一項（表示第一項（Listindex=0)的內容的內容 ListIndex： 整型值整型值 選中的項目的序號，選中的項目的序號， 沒有項目選中時為沒有項目選中時為-1。 ListCount：整型值：整型值 表示項目的數(shù)量，表示項目的數(shù)量，ListCount-1是最后一項的下標。是最后一項的下標。1List、ListCount和和ListIndex屬性屬性一、主要屬性一、主要屬性 2Style屬性屬性 該

31、值用來指示控件的顯示類型和行為。在運行時是只讀該值用來指示控件的顯示類型和行為。在運行時是只讀的。列表框控件或組合框控件的的。列表框控件或組合框控件的Style屬性含義是不同的。屬性含義是不同的。 3MultiSelect屬性屬性 用于指示是否能夠在列表框控件中進行用于指示是否能夠在列表框控件中進行復選以及如何進行復選，在運行時是只讀的。復選以及如何進行復選，在運行時是只讀的。 注意：組合框控件無此屬性。注意：組合框控件無此屬性。 設置設置值值含含 義義0（缺省值）不允許復選（缺省值）不允許復選1簡單復選。鼠標單擊或按下空格鍵在列表中選中或簡單復選。鼠標單擊或按下空格鍵在列表中選中或取消選中項

32、。箭頭鍵移動焦點取消選中項。箭頭鍵移動焦點2擴展復選。按下擴展復選。按下 SHIFT 并單擊鼠標將在以前選中并單擊鼠標將在以前選中項的基礎上擴展選擇到當前選中項。按下項的基礎上擴展選擇到當前選中項。按下 CTRL 并單擊鼠標來在列表中選中或取消選中項并單擊鼠標來在列表中選中或取消選中項MultiSelect 屬性設置值及含義屬性設置值及含義 4Selected屬性屬性 該屬性返回或設置列表框控件中的一個項目的選擇狀態(tài)。該屬性返回或設置列表框控件中的一個項目的選擇狀態(tài)。該屬性是一個邏輯類型的數(shù)組，數(shù)組元素個數(shù)與列表框中的該屬性是一個邏輯類型的數(shù)組，數(shù)組元素個數(shù)與列表框中的項目數(shù)相同，其下標的變化

33、范圍與項目數(shù)相同，其下標的變化范圍與List屬性相同。屬性相同。 例如：例如：List1.Selected（0）=True表示列表框表示列表框List1的第一的第一個項目被選中，此時個項目被選中，此時ListIndex的值設置為的值設置為0。 Selected屬性在設計時是不可用的，即無法在屬性窗口屬性在設計時是不可用的，即無法在屬性窗口中設置屬性值。中設置屬性值。 5TopIndex屬性屬性 返回或設置一個值，該值指定哪個項被顯示在列表框返回或設置一個值，該值指定哪個項被顯示在列表框控件或組合框控件頂部的位置。該屬性取值范圍從控件或組合框控件頂部的位置。該屬性取值范圍從0到到ListCoun

34、t-1，在設計時不可用在設計時不可用。6Sorted屬性屬性 返回一個邏輯值，當返回一個邏輯值，當Sorted屬性為屬性為True時列表框控件時列表框控件或組合框控件的項目自動按字母表順序（升序）排序，為或組合框控件的項目自動按字母表順序（升序）排序，為False時項目按加入的先后順序排列顯示。時項目按加入的先后順序排列顯示。該屬性只能在設該屬性只能在設計時設置，不能在程序代碼中設置計時設置，不能在程序代碼中設置。7Text屬性屬性 對于下拉式組合框與簡單組合框，對于下拉式組合框與簡單組合框，Text屬性返回編輯區(qū)屬性返回編輯區(qū)域中的文本。對于列表框控件或下拉列表框，域中的文本。對于列表框控件

35、或下拉列表框，Text屬性的屬性的返回值總與返回值總與List（ListIndex）的值相同。）的值相同。 二、主要方法二、主要方法1AddItem方法方法 用于將項目添加到列表框控件或組合框控件。用于將項目添加到列表框控件或組合框控件。 語法格式：語法格式： 列表框名列表框名.AddItem item , 序號序號 其中：其中：item: 為字符串表達式，表示要加入的項目。為字符串表達式，表示要加入的項目。 序號序號:決定新增項目的位置，缺省，則添加在最后。決定新增項目的位置，缺省，則添加在最后。 2RemoveItem方法方法用于從列表框控件或組合框控件中刪除一項。用于從列表框控件或組合框

36、控件中刪除一項。語法格式：語法格式： 列表框名列表框名. RemoveItem 序號序號其中：序號是要刪除項目的順序號其中：序號是要刪除項目的順序號 3Clear方法方法 用于清除列表框控件或組合框控件中的所有項用于清除列表框控件或組合框控件中的所有項目。目。 格式：列表框名格式：列表框名. Clear例如，要刪除列表框（例如，要刪除列表框（List1）中所有項目，可使）中所有項目，可使用：用： List1. Clear四、列表框舉例v編寫編寫“簡單記事本簡單記事本”程序，要求通過列表來選擇字號，程序，要求通過列表來選擇字號，并能添加、刪除字號。并能添加、刪除字號。v分析：可以使用列表框來顯示

37、字號列表。單擊列表中分析：可以使用列表框來顯示字號列表。單擊列表中的字號時，通過把列表框的的字號時，通過把列表框的Text屬性值賦值給文本框屬性值賦值給文本框的的FontSize屬性，從而實現(xiàn)選擇字號功能。建立三個屬性，從而實現(xiàn)選擇字號功能。建立三個按鈕，分別使用列表框的按鈕，分別使用列表框的AddItem、RemoveItem和和Clear方法來實現(xiàn)字號的添加、刪除和清空。方法來實現(xiàn)字號的添加、刪除和清空。 （a）運行后輸入內容）運行后輸入內容（b）選擇字號）選擇字號（c）添加、刪除字號）添加、刪除字號圖圖4-9 用列表框選擇、添加、刪除字號用列表框選擇、添加、刪除字號v （1）界面設計）界

38、面設計v （2）編寫代碼）編寫代碼v依次雙擊列表框和三個命令按鈕，輸入代碼如下：依次雙擊列表框和三個命令按鈕，輸入代碼如下：vPrivate Sub List1_Click()單擊列表框單擊列表框v Text1.FontSize = List1.Text End SubvPrivate Sub Command1_Click()單擊單擊“添加添加”按按鈕鈕v Dim s As Stringv s = InputBox(請輸入要添加的字號請輸入要添加的字號, 添加字號添加字號)v List1.AddItem s 把用戶在輸入框中輸入的字號添把用戶在輸入框中輸入的字號添 v 加到列表框中加到列表框中

39、vEnd SubvPrivate Sub Command2_Click()單擊單擊“刪除刪除”按按鈕鈕v List1.RemoveItem List1.ListIndex 刪除列表框刪除列表框v 中所選項目中所選項目vEnd SubvPrivate Sub Command3_Click()單擊單擊“清空清空”按按鈕鈕v List1.Clear清空列表框中的所有項目清空列表框中的所有項目vEnd Sub4.5 圖形控件1.圖像框（圖像框（ImageBox） 圖像框（圖像框（ImageBox）只能用于顯示）只能用于顯示圖形，沒有圖形框所擁有的其他功能；因圖形，沒有圖形框所擁有的其他功能；因此，圖像

40、框比圖形框顯示速度快、占用內此，圖像框比圖形框顯示速度快、占用內存少。存少。圖像框的主要屬性vPicture：在圖像框中顯示的圖片。：在圖像框中顯示的圖片。v另外，加載圖片也可以使用另外，加載圖片也可以使用LoadPicture方法方法v如：如： Image1.Picture=LoadPicture(D:aa.jpg )；vStretch：用于設置圖像是否拉伸，值為True時，圖形會根據(jù)圖像框大小自動拉伸或者壓縮，值為False時，圖像框會自動調節(jié)大小以適應圖像的大小。關于Stretch屬性如圖所示。2.圖形框（PictureBox）v圖形框（圖形框（PictureBox）主要用于在窗體的指定

41、位置）主要用于在窗體的指定位置顯示圖形，圖形框的功能比圖像框強大，它既可以顯示圖形，圖形框的功能比圖像框強大，它既可以顯示圖片，還可以作為其他控件的容器、顯示顯示圖片，還可以作為其他控件的容器、顯示Print方法輸出的文本或顯示圖形方法輸出的圖形。方法輸出的文本或顯示圖形方法輸出的圖形。v圖形框的主要屬性有：圖形框的主要屬性有：vPicture：用來指定顯示的圖形。圖片框可顯示：用來指定顯示的圖形。圖片框可顯示JPG、BMP、WMF、GIF、ICO等格式的圖形文件。等格式的圖形文件。 Picture屬性的設置vPicture屬性可以在屬性窗口中設置，也可以在代碼屬性可以在屬性窗口中設置，也可以

42、在代碼中設置。中設置。v（a）屬性窗口中設置：）屬性窗口中設置： 在設計階段，可以單擊屬性窗口中在設計階段，可以單擊屬性窗口中Picture 屬屬性行右則的按鈕，在彈出的性行右則的按鈕，在彈出的“加載圖片加載圖片”對話框中對話框中選擇加載圖形文件。選擇加載圖形文件。v（b）在代碼中，可以用）在代碼中，可以用LoadPicture函數(shù)把圖形文函數(shù)把圖形文件裝入圖片框或圖像框中。語句格式如下：件裝入圖片框或圖像框中。語句格式如下：v對象名對象名.Picture=LoadPicture(filename)說明：說明：對象名對象名.Picture=LoadPicture(filename)“對象名對象名”：可以是要加載圖形的圖形框、圖像：可以是要加載圖形的圖形框、圖像框或窗體的名稱框或窗體的名稱“filename”：字符串表達式，指定一個被顯示：字符串表達式，指定一個被顯示的圖形的文件名，可以包括文件的盤符和路徑。的圖形的文件名，可以包括文件的盤符和路徑。如果未指定文件名，執(zhí)行語句后將清除對象中的如果未指定文件名，執(zhí)行語句后將清除對象中的圖象。圖象。v舉例：舉例：實現(xiàn)裝載圖形的語句：實現(xiàn)裝載圖形的語句：Picture1.picture=LoadPicture(c:windowsbubbles.bmp)實現(xiàn)清除圖形的語句：實現(xiàn)清除圖形的語句