【文章內(nèi)容簡介】 并調(diào)用已寫入 Click事件過程中的代碼。n 單擊命令按鈕后也將生成 MouseDown和 MouseUp事件。按下按鈕時觸發(fā) MouseDown事件，抬起時觸發(fā)MouseUp事件。如果要在這些相關(guān)事件中附加事件過程，則應(yīng)確保操作不發(fā)生沖突?？丶煌@三個事件過程發(fā)生的順序也不同。 CommandButton控件中事件發(fā)生的順序?yàn)椋?MouseDown、 Click、 MouseUp。n 注意：如果用戶試圖雙擊 CommandButton控件，則其中每次單擊都將被分別處理；即 CommandButton控件不支持雙擊事件 窗體基本控件及其應(yīng)用n 復(fù)選框（ CheckBox）n 復(fù)選框是矩形的，允許多種選擇。 CheckBox控件被選中后，該控件將顯示為 ，而清除 CheckBox控件后，顯示為。該控件可用來提供 True/False或者 Yes/No選項(xiàng)。可以使用 CheckBox控件顯示多項(xiàng)選擇，從而可選擇其中的一項(xiàng)或多項(xiàng)。其缺省名為 Check1，在工具箱中的圖標(biāo)如圖 413所示。圖 413復(fù)選框 窗體基本控件及其應(yīng)用n 復(fù)選框最常用的屬性就是 Value屬性，Value屬性的取值用來確定其狀態(tài)，其中： 0：表示未選中； 1：表示選中； 2：表示禁止使用。n 復(fù)選框常用的事件是 Click事件。在代碼中觸發(fā) Click事件，可以改變一個 CheckBox控件的 Value屬性值。 窗體基本控件及其應(yīng)用n 選項(xiàng)按鈕（ OptionButton）n 選項(xiàng)按鈕（ OptionButton），該控件用于提供一個可以打開或者關(guān)閉的選項(xiàng)。其缺省名為Option1，在工具箱中的圖標(biāo)如圖 414所示。圖 414選項(xiàng)按鈕 窗體基本控件及其應(yīng)用n 在使用選項(xiàng)按鈕時，一般將幾個選項(xiàng)按鈕組成一組，在同一組中，用戶只能選擇其中的一項(xiàng)。在 Frame控件、 PictureBox控件或者窗體這樣的容器中繪制選項(xiàng)按鈕控件，就可以把這些控件分組。同一容器中的選項(xiàng)按鈕控件為一組。運(yùn)行時，在選擇一個選項(xiàng)按鈕時，同組中的其他選項(xiàng)按鈕控件會自動取消選擇。n 選項(xiàng)按鈕最常用的屬性就是 Value屬性， Value屬性的取值用來確定其狀態(tài)， Value屬性的取值為 True時表示選中了該按鈕； Value屬性的取值為 False時，表示沒有選中該按鈕。n 選項(xiàng)按鈕常用的事件為 Click事件，當(dāng)運(yùn)行時單擊選項(xiàng)按鈕，使選項(xiàng)按鈕從未選擇狀態(tài)變成選擇狀態(tài)時，或在代碼中將一個選項(xiàng)按鈕的 Value屬性從 False改為 True時，產(chǎn)生 Click事件。n 可以在該事件過程中編寫代碼，表示選擇該選項(xiàng)按鈕時要執(zhí)行的操作。也經(jīng)常不直接在選項(xiàng)按鈕的事件過程中編寫代碼，只是使用選項(xiàng)按鈕進(jìn)行選擇，而在其他事件過程（如命令按鈕的單擊事件過程）中根據(jù)選項(xiàng)按鈕的 Value值進(jìn)行判斷，以執(zhí)行相應(yīng)的操作。 窗體基本控件及其應(yīng)用n 列表框（ ListBox）n 列表框（ ListBox）控件。該控件用于顯示項(xiàng)目列表，從列表中可以選擇一項(xiàng)或多項(xiàng)。如果項(xiàng)目總數(shù)超過了可顯示的項(xiàng)目數(shù)， VisualBasic會自動給列表框加上滾動條。其缺省名為 List1，在工具箱中的圖標(biāo)如圖 415所示。n 列表框不具備編輯功能，程序運(yùn)行后用戶不能脫離代碼而改變列表框項(xiàng)目內(nèi)容，只能選擇項(xiàng)目。圖 415列表框 窗體基本控件及其應(yīng)用n 1．屬性n （ 1） Columns屬性n Columns屬性決定列表框的列數(shù)，設(shè)置列表框是按單列顯示（垂直滾動）還是按多列顯示（水平滾動）。 Columns值缺省設(shè)置為 0，列表框以垂直滾動的單列形式顯示；當(dāng) Columns值大于 0時，列表框?yàn)樗綕L動形式，顯示的列數(shù)由 Columns值決定。 n （ 2） List屬性n List屬性定義了一個保存列表框項(xiàng)目的數(shù)組，返回或設(shè)置列表框的列表部分的項(xiàng)目。在屬性窗口， List帶有一個編輯器，在設(shè)計時可以向列表框添加列表項(xiàng)。輸入每一列表項(xiàng)后使用 Ctrl+Enter鍵換行。運(yùn)行時，引用列表框中的第一項(xiàng)為 List(0)、第二項(xiàng)為 List(1)，依此類推。n （ 3） ListCount屬性n 返回列表框中列表部分項(xiàng)目的總個數(shù)。 窗體基本控件及其應(yīng)用n （ 4） ListIndex屬性n 返回或設(shè)置列表框中當(dāng)前選擇項(xiàng)目的索引，在設(shè)計時不可用。列表框的索引從 0開始，也就是，第一項(xiàng)的索引為 0，第二項(xiàng)的索引為 1……如果沒有在列表框中選擇項(xiàng)目，則 ListIndex的值為 1。n 對于可以做多重選擇的列表框，如果同時選擇了多個項(xiàng)目， ListIndex返回所選項(xiàng)目的最后一項(xiàng)的索引。n ListCount屬性值總是比最大的 Listlndex值大 1。n （ 5） Multiselect屬性n 返回或設(shè)置一個值，該值指示是否能夠同時選擇列表框中的多個項(xiàng)（復(fù)選），以及如何進(jìn)行復(fù)選，在運(yùn)行時是只讀的。有以下幾種取值：n 0None為缺省值，表示不允許復(fù)選；n 1Simple表示單擊鼠標(biāo)或按空格鍵可在列表中選擇或取消選擇列表項(xiàng)；n 2Extended表示按下 Shift鍵并單擊鼠標(biāo)，或按下 Shift鍵以及一個箭頭鍵將在以前選擇項(xiàng)的基礎(chǔ)上擴(kuò)展選擇到當(dāng)前選擇項(xiàng)。按下 Ctrl鍵并單擊鼠標(biāo)可在列表中選擇或取消選擇列表項(xiàng)。n （ 6） Style屬性n 返回或設(shè)置列表框的顯示樣式。如果該屬性設(shè)置為 0（缺省值），則列表框按傳統(tǒng)的列表樣式顯示列表項(xiàng)；如果該屬性設(shè)置為 1，則在列表框中的每一個文本項(xiàng)的旁邊都有一個復(fù)選框，這時在列表框中可以同時選擇多項(xiàng)。 窗體基本控件及其應(yīng)用n （ 7） Selected屬性n 返回或設(shè)置在列表中的一個項(xiàng)的選擇狀態(tài)。該屬性在設(shè)計時不可用。例如，要選擇列表框 Listl的第 4項(xiàng)，可以使用語句 Listl．Selected(3)=True。n （ 8） SelCount屬性n 在 Multiselect屬性設(shè)為 1或 2時，使用該屬性統(tǒng)計選中的項(xiàng)數(shù)。n （ 9） Sorted屬性n 指定列表項(xiàng)目是否自動按字母表順序排序。將 Sorted設(shè)置為 True表示列表項(xiàng)目按字母表順序排序，設(shè)置為 False（缺省值）表示列表項(xiàng)目不按字母表順序排序。n （ 10） Text屬性n 返回列表框中被選擇的項(xiàng)目。如果列表框的名稱為 Listl，則 Listl．Text的值總是與 Listl． List(Listl． Listlndex)的值相同。 Text屬性為只讀屬性。n （ 11） NewIndex屬性n NewIndex屬性返回最后加入列表框的項(xiàng)目的索引號。 窗體基本控件及其應(yīng)用n 2．事件n 列表框接受 Click、 DblClick、 GotFocus、 LostFocus等大多數(shù)控件的通用事件，但通常不編寫 Click事件過程，而是當(dāng)單擊某個命令按鈕或雙擊列表框時讀取列表框的 Text屬性值。n 3．方法n （ 1） AddItem方法n AddItem方法用來向列表框中添加新的項(xiàng)目，其語法格式為：n 列表框． AddItem項(xiàng)目 [，索引號 ]n 索引號指定要添加項(xiàng)目的插入位置，從 0開始，不能大于列表框項(xiàng)目數(shù)減1。當(dāng)索引號省略時，如果 Sorted屬性設(shè)置為 True，項(xiàng)目將添加到恰當(dāng)?shù)呐判蛭恢?；如?Sorted屬性設(shè)置為 False，項(xiàng)目將添加到列表的末尾。n （ 2） Clear方法n Clear方法用來情況列表框中的項(xiàng)目。其語法是：n 列表框． Clearn （ 3） RemoveItem方法n RemoveItem方法用來從列表框中移除項(xiàng)目，其語法為：n 列表框． RemoveItem索引值n 格式中的索引值用于指定要刪除的項(xiàng)目的索引。 窗體基本控件及其應(yīng)用n 組合框（ ComboBox）n 組合框的作用與列表框類似，只是組合框控件將文本框和列表框的特性結(jié)合在一起，既可以在控件的文本框（編輯域）部分輸入信息，也可以在控件的列表框部分選擇一項(xiàng)。另外，組合框可以將列表項(xiàng)折疊起來，使用時再通過下拉列表進(jìn)行選擇，所以使用組合框比使用列表框更節(jié)省界面空間。其缺省名為 Combo1，在工具箱中的圖標(biāo)如圖 416所示。圖 416組合框 窗體基本控件及其應(yīng)用n 1．屬性n 列表框的屬性基本上都適用于組合框，此外它還有自己的一些屬性。n （ 1） Style屬性n 這是組合框的一個重要屬性，用于指定組合框的顯示形式，有以下幾種取值：n ① 取值為 0時，是缺省值，這種形式稱為 “下拉組合框 ”（ DropdownCombo），包括一個文本框和一個下拉式列表?？梢詮牧斜碇羞x擇項(xiàng)目或在文本框中輸入文本。該樣式將選項(xiàng)折疊起來，當(dāng)需要選擇時，單擊組合框旁邊的下拉箭頭，彈出選項(xiàng)列表，再用鼠標(biāo)單擊進(jìn)行選擇，選擇后列表會重新折疊起來，只顯示被選擇的項(xiàng)目。n ② 取值為 1時，組合框稱為 “簡單組合框 ”（ SimpleCombo）。該形式同樣包括一個文本框和一個列表框，與下拉組合框不同的是，該形式不能將列表折疊起來。n ③ 取值為 2時，組合框稱為 “下拉列表框 ”（ DropdownListBox）。這種樣式僅允許從下拉列表中選擇，不能在文本框中輸入文本，列表可以折疊起來。n （ 2） Text屬性n 當(dāng) ComboBox控件的 Style屬性設(shè)置為 0（下拉組合框）或?yàn)?1（簡單組合框）時，該屬性用于返回或設(shè)置編輯域中的文本。而當(dāng) Style屬性設(shè)置為 2（下拉列表框）時，該屬性為只讀屬性，運(yùn)行時返回在列表中選擇的項(xiàng)目。如果列表框的名稱為Combo1，且運(yùn)行時選擇了某列表項(xiàng)，則 Combo1． Text的值總是與 Combo1．List(Combo1． ListIndex)的值相同。 窗體基本控件及其應(yīng)用n 2．事件 n 組合框響應(yīng)的事件依賴于 Style屬性。n 當(dāng) Style為 0時，響應(yīng) Click、 Change、 DropDown事件。n 當(dāng) Style為 1時，響應(yīng) Click、 DblClick、 Change事件。n 當(dāng) Style為 2時，響應(yīng) Click、 DropDown事件。n 當(dāng) Style為 0或 1時，可以在編輯區(qū)輸入文本，當(dāng)輸入文本時可以接收 Change事件。一般情況下，用戶選擇項(xiàng)目后，只需要讀取組合框的 Text屬性。當(dāng)用戶單擊組合框中向下的箭頭時，將觸發(fā)DropDown事件，該事件實(shí)際上對應(yīng)于向下箭頭的單擊（ Click）事件。n 3．方法n 前面介紹的 AddItem、 Clear、 RemoveItem方法也適用于組合框，其用法與列表框中相同。n 在 “企業(yè)資質(zhì)管理系統(tǒng) ”的窗體里多次使用了組合框控件，例如在企業(yè)人員管理窗體 “Form7”中使用了多個組合框控件，如圖 417所示。 窗體基本控件及其應(yīng)用圖 417組合框控件的應(yīng)用 窗體基本控件及其應(yīng)用n 在圖 417中的頁面里共用到了 5個 ComboBox控件，各控件的屬性如表 41所示。表 41組合框?qū)傩缘脑O(shè)置控件名稱 Style ListCombo1 0 男、女 Combo2 0 漢族、回族、苗族、維吾爾族 Combo3 0 本科、研究生、博士、高中、大專、中專、初中 Combo4 0 黨員、團(tuán)員、無 Combo5 0 局長、經(jīng)理、主任、科員、其他 常用 ActiveX控件及其應(yīng)用n VisualBasic，即內(nèi)部控件（或標(biāo)準(zhǔn)控件）和 ActiveX控件。前面介紹了部分內(nèi)部控件，本節(jié)將介紹VisualBasic ActiveX控件。n ActiveX控件是擴(kuò)展名為． OCX的文件（在 Windows＼ System目錄下），內(nèi)部控件是工具箱中的 “常駐 ”控件，始終出現(xiàn)在工具箱中，它的內(nèi)容是不能改變的，而 ActiveX控件可以根據(jù)需要加到工具箱中，或從工具箱中取消。n 在一般情況下，工具箱中只有內(nèi)部控件。為了把所需要的 ActiveX控件加到工具箱中，可按以下步驟執(zhí)行：n （ 1）選擇 “工程 → 部件 ”菜單項(xiàng)，彈出 “部件 ”對話框；n （ 2）在對話框中選擇 “控件 ”選項(xiàng)卡，顯示 ActiveX控件的列表；n （ 3）在列表框中找到需要添加的控件名稱，單擊控件名稱左側(cè)的復(fù)選框；n （ 4）使用同樣的方法選擇需要添加的其它控件；n （ 5）單擊 “確定 ”按鈕，即可將需要的控件添加到工具箱中。n ActiveX控件很多，下面介紹幾個在應(yīng)用程序中經(jīng)常使用的控件。常用 ActiveX控件及其應(yīng)用n ListView控件n ListView控件可使用四種不同視圖顯示項(xiàng)目。通過此控件，可將項(xiàng)目組成帶有或不帶有列標(biāo)頭的列，并顯示伴隨的圖標(biāo)和文本。n ListView控件包括 ListItem和 ColumnHeader對象。 ListItem對象定義 ListView控件中項(xiàng)目的各種特性，諸如：項(xiàng)目的簡要描述；由 ImageList控件提供的與項(xiàng)目一起出現(xiàn)的圖標(biāo)；附加的文本片段，稱作子項(xiàng)目，它們與顯示在報表視圖中的 ListItem對象關(guān)聯(lián)。 n 在工程中應(yīng)用 ListView控件的步驟如下：n 1．添加 ListView控件n ListView控件不在標(biāo)準(zhǔn)的工具箱內(nèi)。添加它到工具箱的方法是：n （ 1）選擇 “工程 → 部件 ”菜單項(xiàng)，彈出 “部件 ”對話框；n （ 2）在對話框中選擇 “控件 ”選項(xiàng)卡，顯示 ActiveX控件的列表；n （ 3）在列表框中選中要添加的控件 “MicrosoftWindowsCommonControls”，單擊控件名稱左側(cè)的復(fù)選框，如圖 418所示；然后單擊 “確定 ”按鈕即可。常用 ActiveX控件及其應(yīng)用16