第七章常用控件

第七章常用控件教學(xué)目的及要求：控件的分類，會利用本章控件設(shè)計程序界面重點與難點：掌握常用控件（單選鈕、復(fù)選框、框架、列表框、組合框、滾動條、計時器、圖片框、圖像框）的常用屬性、事件和方法的使用進一步掌握窗體和控件事件過程代碼的編寫主要外語詞匯：optionbutton、frame、listbox、combobox、scrollbar、timer、picturebox、image授課內(nèi)容：第一節(jié)控件概述VB的控件分為三類：內(nèi)部控件、ActiveX控件和插入對象。1、內(nèi)部控件（標(biāo)準(zhǔn)控件）：指針（Point）圖片框（PictureBox）標(biāo)簽（Label）文本框（TextBox）框架（Frame）命令按鈕（CommandButton）復(fù)選框（CheckBox）單選按鈕（OptionButton）組合框（ComboBox）列表框（ListBox）水平滾動條（HScrollBar）垂直滾動條（VScrollBar）定時器（Timer）驅(qū)動器列表框（DriveListBox）目錄列表框（DirListBox）文件列表框（FileListBox）形狀（Shape）線條（Line）圖像框（Image）數(shù)據(jù)（Data）（1）它們是VB本身提供的控件，不能從工具箱中刪除。（2）打開工具箱：①工具欄->工具箱②視圖->工具箱2、ActiveX控件：OLE：ObjectLinkingandEmbedding，對象的鏈接和嵌入。ActiveX控件是VB內(nèi)部控件的擴充。只要條件允許，就能使用在不同的編程環(huán)境（如VB、VC、VFP、VJ等）中。添加到工具箱中的方法：（1）工程->部件->控件標(biāo)簽（2）工具箱（右鍵）->部件->控件標(biāo)簽只有正確添加后才可以使用ActiveX控件。ActiveX控件存在位置：C:\Windows\System\*.OCX選項頁（SSTab）進度條（ProgressBar）滑塊（Slider）動畫（Animation）Internet傳輸控件（InternetTransfer）通信（Commuications）圖像列表（ImageList）列表查看（ListView）電子郵件（MAPI）掩碼模板（MaskedEdit）圖表（MSChart）多媒體（Multimedia）圖像（PictureClip）文本（RichTextBox）狀態(tài)欄（StatusBar）檢測系統(tǒng)事件（SysInfo）通用對話框（CommonDialog）3、可插入對象：由其他應(yīng)用程序創(chuàng)建的對象。添加到工具箱中的方法：（1）工程->部件->可插入對象標(biāo)簽（2）工具箱（右鍵）->部件->可插入對象標(biāo)簽只有正確添加后才可以使用插入的對象。第二節(jié)常用內(nèi)部控件一、單選按鈕（OptionButton）：選項唯一1、屬性：（1）Name：OptionX（X=1,2,3,…）（2）Value：為True時表示被選中，為False（默認(rèn)值）時表示未被選中。2、事件：Click事件例題：07_1.vbp注：若預(yù)先選定一單選按鈕，應(yīng)在Form_Load事件過程中將其Value屬性設(shè)置為True，系統(tǒng)不提供默認(rèn)情況。也可以在屬性窗口中進行設(shè)置。二、復(fù)選框（CheckBox）：選項不唯一1、屬性：（1）Name：CheckX（X=1,2,3,…）（2）Value：為0（默認(rèn)值）時表示未被選中，為1時表示被選中，為2時表示暫時不能訪問。設(shè)置值數(shù)值常數(shù)Unchecked0vbUnchecked（默認(rèn)值）Checked1vbCheckedGrayed2vbGrayed2、事件：Click事件例題：07_2.vbp注：若預(yù)先選定若干復(fù)選框，應(yīng)在Form_Load事件過程中將其Value屬性設(shè)置為1，系統(tǒng)不提供默認(rèn)情況。也可以在屬性窗口中進行設(shè)置。三、框架（Frame）：作用：（1）分組：屏蔽作用（2）美觀必須先將框架添加到窗體上，然后再將控件“畫”在框架內(nèi)，這樣，才能達到分組的目的。只能用單擊形式，不能用雙擊形式。當(dāng)框架移動時，其中的控件也隨著移動，刪除時一并刪除。同一窗體內(nèi)被框架組合的各組單選按鈕是相互獨立的。1、屬性：（1）Name：FrameX（X=1,2,3,…）（2）Caption：2、事件：一般不需要例題7-1：所有直接添加到窗體上的單選按鈕成為一組單選按鈕。四、列表框（ListBox）：在列表框內(nèi)的項目稱為表項，表項的加入是按一定的順序號進行的，這個順序號稱為索引。索引號從0開始。1、屬性：（1）Name：ListX（X=1,2,3,…）（2）Style：列表框的外形。（3）List：用于存放列表框的表項，實際上是一個字符型數(shù)組。例：PrintList1.List(0)List1.List(1)=List1.List(1)&“程序設(shè)計”（4）ListIndex：用于設(shè)置或返回當(dāng)前選定項目的索引值。（5）ListCount：返回列表框中表項的數(shù)量。（6）Text：對應(yīng)用戶在運行時選定的表項內(nèi)容。例：PrivateSubList1_Click()IfList1.Text=List1.List(0)Then…EndIfIfList1.Text=List1.List(1)Then…EndIfEndSub（7）Columns：指定列表框中的列數(shù)。（8）Sorted：設(shè)置列表框中的各表項在運行時是否自動按順序排列。①False：默認(rèn)值，按輸入的先后順序排列②True：自動排列，排序時不區(qū)分大小寫（9）MultiSelect：設(shè)置是否允許同時選擇多個表項。若允許同時選擇多個表項，Text屬性為選定的最后一項表項的內(nèi)容。（10）Selected：判斷表項是否被選中，實際上是一個邏輯型數(shù)組?？偨Y(jié)：判斷表項是否被選中的方法：例：PrivateSubList1_Click()IfList1.Selected(0)=TrueThenPrint“我選中了第一項”IfList1.ListIndex=1ThenPrint“我選中了第二項”EndSub2、向列表框中添加表項的方法：（1）方法一：利用屬性窗口：利用List屬性每輸入一項按Ctrl+Enter鍵換行，全部輸入完后按Enter鍵，所輸入的表項即出現(xiàn)在列表框中。（2）方法二：利用代碼窗口：通常在Form_Load事件過程中添加表項，但也可以在任何時候使用AddItem方法添加表項，也就是可以動態(tài)地添加。格式：列表框名.AddItem表項[,索引號]若省略索引號，則將表項插入到末尾；索引號為0表示插入到首行。例：PrivateSubForm_Load()ShowList1.AddItem“Germany”List1.AddItem“India”List1.AddItem“France”List1.AddItem“USA”EndSub注：TextBox的Text屬性，ListBox的List屬性。TextBox和ListBox都沒有Caption屬性。例題：設(shè)計一個程序，找出100-800范圍內(nèi)所有能同時被3和8整除的自然數(shù)。07_3.vbp3、事件：Click事件、DblClick事件雙擊列表框中的表項，與先選定表項然后單擊命令按鈕，這兩者應(yīng)該是具有相同的效果。4、從列表框中刪除表項的方法：格式：列表框名.RemoveItem索引號刪除索引號指定的某一項，索引號為0表示第一項。5、刪除所有表項的方法：格式：列表框名.Clear注：（1）Cls方法：將窗體、圖片框?qū)ο笊嫌肞rint方法顯示的內(nèi)容清除。（2）Erase方法：對于靜態(tài)數(shù)組，進行初始化，全部元素置0或空字符串等。對于動態(tài)數(shù)組，釋放內(nèi)存空間，清除。（3）Clear方法：將列表框、組合框中的所有表項清除。五、組合框（ComboBox）：是文本框與列表框的組合。用戶可以從文本框中輸入文本，也可以從列表框中選擇列表項。區(qū)別：組合框用于建議性的選項列表，而當(dāng)希望將輸入限制在列表之內(nèi)時，應(yīng)使用列表框。1、屬性：（1）Name：ComboX（X=1,2,3,…）（2）Text：對應(yīng)用戶在運行時選定的表項內(nèi)容或直接從文本框中輸入的內(nèi)容。例：PrivateSubCombo1_Click()IfCombo1.Text=Combo1.List(0)Then…EndIfIfCombo1.Text=Combo1.List(1)Then…EndIfEndSub（3）List：用于存放列表框的表項，實際上是一個字符型數(shù)組。例：PrintCombo1.List(0)Combo1.List(1)=Combo1.List(1)&“程序設(shè)計”（4）ListIndex：用于設(shè)置或返回當(dāng)前選定項目的索引值。（5）ListCount：返回列表框中表項的數(shù)量。（6）Sorted：設(shè)置列表框中的各表項在運行時是否自動按順序排列。①False：默認(rèn)值，按輸入的先后順序排列②True：自動排列，排序時不區(qū)分大小寫（7）Style：組合框具有三種不同的類型。0：默認(rèn)值，下拉組合框（DropdownComBox）：允許用戶輸入內(nèi)容1：簡單組合框（SimpleComBox）：允許用戶輸入內(nèi)容2：下拉列表框（DropdowmListBox）：不允許用戶輸入內(nèi)容組合框同樣可以使用AddItem、RemoveItem、Clear等方法。2、將輸入在文本框中的內(nèi)容添加到列表中：例1：PrivateSubCombo1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenCombo1.AddItemCombo1.TextEndIfEndSub例2：PrivateSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenText2.SetFocusEndIfEndSub3、事件：Click事件、DblClick事件雙擊組合框中的表項，與先選定表項然后單擊命令按鈕，這兩者應(yīng)該是具有相同的效果。但是，只有簡單組合框（Style為1時）才有DblClick事件。六、滾動條（HscrollBar和VScrollBar）：TextBox、ListBox、ComboBox等中的滾動條是系統(tǒng)自動加上的。滾動條控件是為不能自動支持滾動功能的應(yīng)用程序和控件提供滾動功能，也可以作為數(shù)據(jù)輸入的工具。1、屬性：無Caption屬性（1）Name：HScrollX（X=1,2,3,…）VScrollX（X=1,2,3,…）（2）Min（左/上）、Max（右/下）：最小值（默認(rèn)為0）、最大值（默認(rèn)為32767）（3）Value：滾動塊所處的位置所代表的值（4）LargeChange：單擊空白處時，滾動塊的變化量（5）SmallChange：單擊滾動箭頭時，滾動塊的變化量2、操作方式：（1）用鼠標(biāo)單擊滾動箭頭（2）用鼠標(biāo)單擊滾動箭頭與滾動塊之間的空白處（3）用鼠標(biāo)拖動滾動塊3、事件：（1）Scroll：只有鼠標(biāo)拖動滾動塊時才觸發(fā)該事件。(1)（2）Change：只要滾動塊位置發(fā)生變化（Value值改變），即觸發(fā)該事件。(1-3)七、定時器（Timer）：在運行中每隔一定時間，觸發(fā)一次Timer事件。在設(shè)計時是可見的，在運行時是不可見的。1、屬性：（1）Name：TimerX（X=1,2,3,…）（2）Interval：設(shè)置時間間隔，0-65535，單位是毫秒（ms），默認(rèn)值為0。值為0時，定時器無效。最長時間間隔是60多秒（1分鐘多點）。由于系統(tǒng)每秒生成18個時鐘信號，所以定時器每秒鐘最多產(chǎn)生18個事件，即兩個Timer事件的最小時間間隔為56ms。（3）Enabled：為True（默認(rèn)）時開始工作，為False時停止工作。2、事件：Timer事件（唯一）3、通常另設(shè)標(biāo)簽或文本框來顯示時間。例題：07_4.vbp八、圖片框（PictureBox）：1、支持的圖形類型有：位圖（.bmp和.dib）、圖標(biāo)（.ico）、圖元（.wmf和.emf）、JPEG（.jpg）、GIF（.gif）等。2、添加圖片：（1）利用Picture屬性（2）利用LoadPicture函數(shù)3、利用AutoSize屬性來調(diào)整圖片框以適應(yīng)圖片大?。寒?dāng)為True時，圖片框根據(jù)圖片大小自動調(diào)整，當(dāng)為False（默認(rèn)）時，圖片框保持原尺寸，當(dāng)圖片比圖片框大時，超出的部分被截去。總結(jié)：容器類控件有三個：窗體（Form）、框架（Frame）、圖片框（PictureBox）。容器類控件的作用：分組。