VB第4章常用控件.ppt

1、V B 程序設(shè)計(jì) Visual Basic Programming,第四章 常用控件,1. 熟悉各常用控件的主要屬性、方法和事件,2. 掌握各常用控件的用法,3. 能使用各控件設(shè)計(jì)系統(tǒng)界面,本章學(xué)習(xí)目標(biāo),4.1單選按鈕和復(fù)選框,4.2 框架控件,4.3 圖形控件,4.4 列表框與組合框,4.5 滾動(dòng)條控件,4.6 時(shí)鐘控件,4.1 單選按鈕和復(fù)選框,1. 控件功能,2. 控件屬性,3. 控件事件,單選按鈕用于從一組選項(xiàng)中選取其一。如果有一項(xiàng)被選中，則其他單選按鈕將自動(dòng)變成未選中。 如果在一個(gè)窗體中要建立一個(gè)以上的選項(xiàng)組時(shí)，需添加框架(Frame)分組，置于同一框架中的單選按鈕組成一組。,單選按

2、鈕(OptionButton),復(fù)選框（Check）也稱作復(fù)選按鈕，被選中后方塊中會(huì)出現(xiàn)，用戶可通過復(fù)選框是否被選中控制操作。 在一組復(fù)選框選項(xiàng)中，用戶可以選擇一個(gè)或多個(gè)復(fù)選框選項(xiàng)，也可以一個(gè)選項(xiàng)也不選。,復(fù)選框(CheckBox),1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,單選按鈕和復(fù)選框相同的屬性,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,單選按鈕和復(fù)選框的Value屬性,說明：當(dāng)設(shè)置一個(gè)單選按鈕的Value屬性值為True時(shí)，則同一組內(nèi)的其他所有單選按鈕控件的Value屬性值自動(dòng)被設(shè)置為False。,1. 控件功能,2. 控

3、件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,單選按鈕和復(fù)選框的事件,單選按鈕和復(fù)選框的主要事件是Click，當(dāng)用戶單擊單選按鈕或復(fù)選框時(shí)，它們會(huì)自動(dòng)改變狀態(tài)。另外，單選按鈕支持DblClick事件，而復(fù)選框則不支持。,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,例 4-5,用單選按鈕控件來控制一個(gè)圖像框顯示的圖片。,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,例 4-51,用單選按鈕和復(fù)選框來控制文本框中文字的大小和字體樣式,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,例 4-6,利用圖

4、形復(fù)選框來控制文本的字體風(fēng)格。,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,例 4-6,請(qǐng)?jiān)诖绑w上畫二個(gè)復(fù)選框，名稱分別為Ch1、Ch2，標(biāo)題分別為“程序設(shè)計(jì)”、“數(shù)據(jù)庫(kù)原理”，然后畫一個(gè)文本框，名稱為Text1，再畫一個(gè)命令按鈕，名稱為C1，標(biāo)題為“確定”如圖所示，請(qǐng)編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時(shí)，選中復(fù)選框并單擊“確定”按鈕，就可以按照下表要求把結(jié)果顯示在文本框中。,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,不講,例 4-6,在名為Form1的窗體上畫一個(gè)名稱為Check1的復(fù)選框數(shù)組（Index屬性從0開始），含

5、三個(gè)復(fù)選框，其標(biāo)題分別為“語文”、“數(shù)學(xué)”、“體育”，利用屬性窗口設(shè)置適當(dāng)?shù)膶傩?，使“語文”未選，“數(shù)學(xué)”選中，“體育”為灰色，再把窗體的標(biāo)題設(shè)置為“選課”，如圖所示。,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.1 單選按鈕和復(fù)選框,1. 常用屬性,2. 基本事件,4.2 框架Frame控件,框架（Frame）是一個(gè)容器類控件。它和窗體一樣可以容納其它控件，用于控件分組。,框架的常用屬性,框架內(nèi)控件的創(chuàng)建,首先需要?jiǎng)?chuàng)建Frame控件，然后再向Frame添加控件，添加控件的方法有以下兩種。 方法一： 單擊工具箱上的工具，然后將出現(xiàn)的“+”指針，放在框架中適當(dāng)位置，并拖拉出適當(dāng)大小

6、，再往框架中添加所需的控件。但不能使用雙擊工具箱上按鈕的方式，給框架添加控件。 方法二： 將控件“剪切”到剪貼板，然后選中框架，使用“粘貼”命令將其復(fù)制到框架內(nèi)。,1. 常用屬性,2. 基本事件,4.2 框架Frame控件,通過框架、單選按鈕和復(fù)選框設(shè)置文本框的字體。,例 4-7,1. 常用屬性,2. 基本事件,4.2 框架Frame控件,1. 圖片框PictureBox控件,2.圖像框Image控件,4.3 圖形控件,3.形狀Shape控件,VB包含四個(gè)圖形控件：PictureBox控件、Image控件、Shape控件和Line控件。 PictureBox控件稱為圖片框，Image控件稱為圖

7、像框。圖片框和圖像框可以顯示的圖像文件格式有位圖文件(.bmp)、圖標(biāo)文件(.ico)、圖元文件(.wmf ) 、JPEG格式文件(.jpg)和GIF格式文件(.gif)。,4.線條 Line控件,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,圖片框(PictureBox)是用來在窗體上顯示圖像，或作為容器放置其它控件的控件。,1)圖片框常用屬性,4.線條 Line控件,4.3 圖形控件,圖片框常用的方法有Print方法、Cls方法 此外，圖片框還有許多繪圖的方法。 如Line、Circle、Point及PSet等。,2)圖片框常用的事件,3)圖片框常

8、用的方法,圖片框可響應(yīng)Click、DblClick事件。,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,4.3 圖形控件,例 4-1,在一窗體上通過命令改變圖片框的AutoSize屬性值，觀察所裝載圖片的顯示效果。,代碼,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,Picture屬性說明,程序代碼中裝載圖片的格式為： Object.Picture=LoadPicture(圖片文件名) 刪除圖片的格式為： Object.Pict

9、ure=LoadPicture( ) 其中：Object為PictureBox控件或Image控件。,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,在名稱為Form1的窗體上畫二個(gè)圖片框，名稱分別為P1、P2，高度均為1900，寬度為1800，通過屬性窗口把圖片文件Pic1.bmp放入P1中，把圖片pic2.bmp放入P2中，再畫一個(gè)命令按鈕，名稱為C1，標(biāo)題為“交換圖片”（如圖所示），編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時(shí)，如果單擊命令按鈕，則交換兩個(gè)圖片框中的圖片，程序中不得使用任何變量。,1. 圖片框Pictu

10、reBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,例,4.3 圖形控件,例 4-2,用Print方法在PictureBox控件中打印九九乘法表，用Cls方法將PictureBox控件中的內(nèi)容清除。,看圖,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,圖像框（Image）是用來在窗體上顯示圖像的控件。它比圖片框占用更少的內(nèi)存，因?yàn)閳D像框不是容器類控件，所以圖像框內(nèi)不能保存其他控件。,1)圖像框常用屬性,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀

11、Shape控件,4.線條 Line控件,4.3 圖形控件,例 4-3,在窗體上添加兩個(gè)圖像框，都載入同一圖片文件，編寫程序代碼使得運(yùn)行時(shí)通過代碼改變圖像框的大小尺寸，再改變其中一個(gè)圖像框的Stretch屬性值為True，另一圖像框的Stretch屬性值為False。,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,Shape屬性取值及功能說明,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,Shape屬性取值及功能說明,1. 圖片框

12、PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,Fillcolor, bordercolor, borderstyle,4.3 圖形控件,例 4-4,編程在窗體上通過命令按鈕讓Shape控件根據(jù)其不同的Shape屬性值顯示不同的圖形，并利用FillStyle屬性填充各種線型。,代碼,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.3 圖形控件,Line控件主要用來畫線條，在設(shè)計(jì)狀態(tài)下，Line最重要的屬性是BorderWidth和BorderStyle屬性，BorderWid

13、th屬性用于確定線條的寬度，BorderStyle屬性用于確定線條的類型。程序運(yùn)行時(shí)Line最重要的屬性是x1、y1和x2、y2屬性，它們分別控制線條的兩個(gè)端點(diǎn)的坐標(biāo)位置。 利用線與形狀控件，用戶可以迅速地顯示簡(jiǎn)單的線與形狀或?qū)⒅蛴≥敵?，與其他大部分控件不同的是，這兩種控件不會(huì)響應(yīng)任何事件，它們只用來顯示或打印,1. 圖片框PictureBox控件,2.圖像框Image控件,3.形狀Shape控件,4.線條 Line控件,4.4 列表框和組合框,列表框通過顯示多個(gè)選項(xiàng)，供用戶選擇。 默認(rèn)情況下，選項(xiàng)以垂直單列方式顯示，也可以設(shè)置成多列方式。 如果列表項(xiàng)數(shù)量超過列表框所能顯示的數(shù)目， VB會(huì)自

14、動(dòng)為列表框加上滾動(dòng)條。 列表框只能從其中選擇，而不能直接修改其中的內(nèi)容。,1. 控件功能,2. 基本事件,3. 基本方法,1) 列表框( ListBox),4.4 列表框和組合框,參賽組隊(duì)。設(shè)計(jì)一個(gè)窗體，該窗體含2個(gè)標(biāo)簽和2個(gè)列表框，標(biāo)簽框用來顯示提示信息。運(yùn)行程序時(shí)，單擊列表框中的學(xué)員，該學(xué)員將從一個(gè)列表框移動(dòng)到另一個(gè)列表框中。,列表引例,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,組合框( ComboBox),組合框結(jié)合了文本框和列表框的特性。 用戶可以從文本框中輸入文本，也可以從列表框中選擇列表項(xiàng)。 列表框中列出可供用戶選擇的選項(xiàng)，當(dāng)用戶選定某項(xiàng)后，該項(xiàng)內(nèi)容自

15、動(dòng)裝入文本框中。 除下拉式列表框(其Style屬性值為2)之外都允許在文本框中用鍵盤輸入,但輸入的內(nèi)容不會(huì)自動(dòng)添加到列表框中。,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,購(gòu)物程序。設(shè)計(jì)一個(gè)窗體，該窗體含3個(gè)標(biāo)簽、1個(gè)下拉式組合框、2個(gè)列表框和1個(gè)命令按鈕。標(biāo)簽框用來顯示提示信息。運(yùn)行程序時(shí)，從下拉式組合框選擇商品類別，從列表框中選擇商品名稱，被選擇的商品增加到購(gòu)物清單中，單擊清除購(gòu)物，將清除購(gòu)物清單的所有內(nèi)容。,組合框引例,代碼,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,列表框和組合框共有的屬性,1. 控件功能,2. 基本事件,3.

16、基本方法,圖1,4.4 列表框和組合框,列表框舉例,列表框各主要屬性的值： List1.ListIndex = 3 (下標(biāo)從0開始的) List1. ListCount = 5 List1. Selected(3) = True， 其余為False。 List1. Sorted = False，沒有排序。 List1. Text 為 “cox” ， 與List1. List(List1. ListIndex)相等,List1,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,組合框舉例,Combo1,下拉式組合框 Style=0,簡(jiǎn)單組合框 Style=1,下拉式列表框

17、Style=2,組合框各主要屬性的值： combo1.ListIndex = 0 combo1. ListCount = 8 combo1. Selected(0) = True 其余為False。 combo1. Sorted = False combo1. Text 為 “李寧”,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,1. 控件功能,2. 基本事件,3. 基本方法,編一程序,向列表框中添加如下內(nèi)容: 當(dāng)在列表框中選擇某一學(xué)院時(shí),在各文本框中顯示所選擇的學(xué)院名稱,所在的行號(hào),列表框中總的項(xiàng)目數(shù).,例 4-8,代碼,分析,分析：要得到“選中學(xué)院”，用列表框的T

18、ext屬性或List(ListIndex) 要得到選中學(xué)院所在行號(hào)，用ListIndex屬性 要等到列表框項(xiàng)目的總數(shù)，用ListCount屬性,4.4 列表框和組合框,列表框特有的屬性,1. 控件功能,2. 基本事件,3. 基本方法,Selected(1),看圖,4.4 列表框和組合框,列表框MultiSelect 和Style屬性舉例,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,設(shè)計(jì)一飯店顧客點(diǎn)菜單，要求在“飯店菜譜”中顧客可以選定一項(xiàng)或多項(xiàng)菜名，然后通過“添加”按鈕一次性添加到“顧客點(diǎn)菜”中，也可以將顧客已選定的一項(xiàng)或多項(xiàng)菜名通過“刪除”按鈕一次性刪除到“飯店菜

19、譜”中。,例 4-8,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,組合框特有的重要屬性,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,Style設(shè)置為0、1、2時(shí)運(yùn)行效果,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,列表框：Click、DblClick。 組合框：Click，只有簡(jiǎn)單組合框才有DblClick事件。,1. 控件功能,2. 基本事件,3. 基本方法,例 列表框舉例,用三個(gè)列表框修飾文本框的文本,代碼,4.4 列表框和組合框,1)AddItem方法 格式：Object.AddItem 列表項(xiàng) ,索引

20、功能：AddItem方法用于在程序代碼中添加列表項(xiàng)。 說明：默認(rèn)索引時(shí)，在列表框的最后插入新列表項(xiàng)，有索引時(shí)，則在索引指定的位置插入。 例如：在城市名稱列表框(List1)的第一個(gè)位置前插入“鞍山市”： List1.AddItem “鞍山市, 0,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,格式：Object. RemoveItem 索引 功能：RemoveItem方法用于刪除指定的列表項(xiàng)。 例如：在城市名稱列表框(List1)中刪除“重慶市”列表項(xiàng)： List1.RemoveItem 2,2)RemoveItem方法,1. 控件功能,2. 基本事件,3. 基本方法

21、,4.4 列表框和組合框,格式：Object.Clear 功能：用于刪除所有列表項(xiàng)。 例如：從List1中刪除所有列表項(xiàng)： List1.Clear,3)Clear方法,1. 控件功能,2. 基本事件,3. 基本方法,4.4 列表框和組合框,編寫計(jì)算機(jī)配置選擇程序，要求通過組合框選擇不同的品牌、CPU型號(hào)、內(nèi)存大小、硬盤大小及顯示器類型。對(duì)于組合框中沒有的參數(shù)應(yīng)可以通過鍵盤輸入，并添加到組合框列表項(xiàng)中，當(dāng)都選定后，點(diǎn)擊“確定”按鈕，就可以在圖片框中輸出配置的選擇。,例 4-9,1. 控件功能,2. 基本事件,3. 基本方法,不講,4.4 列表框和組合框,例 4-91,1. 控件功能,2. 基本事

22、件,3. 基本方法,設(shè)計(jì)一個(gè)偶數(shù)遷移程序。運(yùn)行界面下圖所示。要求如下 (1)單擊“產(chǎn)生”按鈕，隨機(jī)產(chǎn)生10個(gè)兩位正整數(shù)，并添加到左邊的列表框(List1)中。 (2)單擊“”按鈕，或雙擊List1，將List1的所有偶數(shù)遷移到List2中。 (3)單擊“”按鈕，或雙擊List2，將List2的所有偶數(shù)遷移到List1中。 (4)單擊“清除”按鈕，清除List1和List2中的所有項(xiàng)目。,代碼1,分析：?jiǎn)螕簟啊卑粹o時(shí)，要將偶數(shù)遷移到List2中，在List1中可能有多個(gè)偶數(shù)，所以要用到循環(huán)，但能不能用For循環(huán)呢？ 怎樣判斷那項(xiàng)是偶數(shù)呢？ 可以用List1.List(i) Mod 2 =0來判斷

23、 怎樣移到List2中呢？ 用List2.Additem List1.List(i)完成,分析,綜合性思考題,4.4 列表框和組合框,例 4-92,1. 控件功能,2. 基本事件,3. 基本方法,利用屬性窗口向列表框（List1）添加四個(gè)項(xiàng)目：Visual Basic，Turbo C，C+，Java；請(qǐng)編寫適當(dāng)?shù)某绦蛲瓿梢韵鹿δ埽寒?dāng)選擇列表框中的一項(xiàng)和單選按鈕OP1，然后單擊“確定”命令按鈕，則文本框中顯示“XXX筆試”；當(dāng)選擇列表框中的一項(xiàng)和單選按鈕OP2，然后單擊“確定”命令按鈕，則文本框中顯示“XXX上機(jī)”。其中“XXX”是在列表框中選擇的項(xiàng)目。,不講,4.5 滾動(dòng)條控件,1. 控件功能

24、,2. 控件屬性,3. 控件事件,主要是為那些不能自動(dòng)支持滾動(dòng)的控件提供滾動(dòng)功能，協(xié)助觀察數(shù)據(jù)的變化或確定位置; 可用作數(shù)據(jù)輸入的工具; 滾動(dòng)條是VB的標(biāo)準(zhǔn)控件，可直接從工具箱中選擇。,滾動(dòng)條(ScrollBar)：,滾動(dòng)條的重要屬性 ：,1. 控件功能,2. 控件屬性,3. 控件事件,4.5 滾動(dòng)條控件,滾動(dòng)條控件響應(yīng)的主要事件 ：,Scroll： 拖動(dòng)滑塊時(shí)會(huì)觸發(fā)Scroll事件，單擊滾動(dòng)箭頭或滾動(dòng)條時(shí)不會(huì)觸發(fā)。 Change： 當(dāng)Value屬性發(fā)生改變時(shí)(如移動(dòng)滑塊、單擊滾動(dòng)箭頭等滑塊位置改變)會(huì)觸發(fā)Change事件。,1. 控件功能,2. 控件屬性,3. 控件事件,4.5 滾動(dòng)條控件,

25、在一個(gè)窗體上建立一個(gè)水平滾動(dòng)條和垂直滾動(dòng)條的使用示例，用二個(gè)文本框分別顯示二個(gè)滾動(dòng)條的值，移動(dòng)滑塊或單擊滾動(dòng)箭頭，觀察值的變化。,例 4-10,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.5 滾動(dòng)條控件,用三個(gè)滾動(dòng)條作為三種基本顏色的輸入工具，設(shè)計(jì)一個(gè)調(diào)色板的應(yīng)用程序，合成的顏色顯示在右邊的顏色區(qū)，分別以不同的合成顏色設(shè)置文本框中文字的前景色和背景色。,例 4-11,代碼,1. 控件功能,2. 控件屬性,3. 控件事件,4.5 滾動(dòng)條控件,在窗體上畫一個(gè)列表框、一個(gè)文本框一個(gè)滾動(dòng)條。要求： 利用屬性窗口設(shè)置適當(dāng)?shù)膶傩?為L(zhǎng)ist1列表框添加3個(gè)項(xiàng)目：宋體、黑體、楷體_BG2312；Text1文本框設(shè)置初值為“計(jì)算機(jī)”；Hscroll1水平滾動(dòng)條設(shè)置值和最大值分別為10和50。 如果在列表框中選擇一種字體，然后移動(dòng)滾動(dòng)條中的滾動(dòng)框，則可使文本框中的文