【正文】 lue =值 True：表示選中，運(yùn)行時(shí)該單選按鈕的圓圈中出現(xiàn)一個(gè)黑點(diǎn)。 列表框控件 一、常用屬性 屬性名稱 作用 語法 屬性值 MultiSelect 設(shè)置該列表框是否能選擇多項(xiàng) Object. MultiSelect=值 0：不允許多重選定，一次只能選擇一個(gè)。 Clear方法 刪除列表框中的所有項(xiàng)目。 在設(shè)計(jì)時(shí)， Text屬性的默認(rèn)值為組合框的名稱，可以將 Text屬性設(shè)置為空。該程序窗體運(yùn)行界面如圖所示。 控件名稱 屬性名 屬性值 Frame1 Caption 瀏覽轎車 Label1 Caption 圖片框： Label2 Caption 圖像框： Picture1 Picture LoadPicture(d:\*.jpg) BorderStyle 1Fixed Single Image1 Picture LoadPicture(d:\*.jpg) BorderStyle 1Fixed Single Stretch True Option1(0) Caption 寶時(shí)捷 Option1(1) Caption 雪鐵龍 Option1(2) Caption 奧迪 Option1(3) Caption 凱越 167。 滾動(dòng)條控件 二、常用事件和方法 Scroll事件 只在移動(dòng)滾動(dòng)框時(shí)被激活，單擊滾動(dòng)箭頭或單擊滾動(dòng)條均不能激活該事件。 計(jì)時(shí)器控件 ? 計(jì)時(shí)器控件在設(shè)計(jì)時(shí)可看見它，在運(yùn)行時(shí)它就隱藏起來，但是在后臺(tái)每隔一定的時(shí)間間隔，系統(tǒng)就會(huì)自動(dòng)執(zhí)行一次計(jì)時(shí)器事件。 計(jì)時(shí)器控件 編寫程序代碼如下： 計(jì)時(shí)器控件 Timer1的事件代碼為： Private Sub Timer1_Timer() = Format(Time, ) End Sub 選項(xiàng)按鈕 Option1的 Click事件代碼： Private Sub Option1_Click() = hh:mm:ss AM/PM End Sub 選項(xiàng)按鈕 Option2的 Click事件代碼： Private Sub Option2_Click() = hh:mm:ss End Sub 167。 ActiveX控件 運(yùn)行時(shí)選定文件并關(guān)閉對(duì)話框后，可用 FileName屬性得到文件所在的驅(qū)動(dòng)器、文件夾以及文件名、文件擴(kuò)展名。對(duì)于所定義的第 1個(gè)過濾器其索引是 1。H4 使定義自定義顏色命令按鈕無效并防止定義自定義顏色。 167。 ActiveX控件 注意： 這個(gè)對(duì)話框并不給打印機(jī)傳送數(shù)據(jù)，只是指定希望打印數(shù)據(jù)的情況。 ActiveX控件 Case 3 = 3 Or 256 With text1 .FontName = .FontSize = .FontStrikethru = .FontBold = .FontItalic = .FontUnderline = .ForeColor = End With = 從字體對(duì)話框返回 = 從字體對(duì)話框返回 End Select End Sub 167。 ActiveX控件 三、應(yīng)用舉例 選擇“新建”工程，進(jìn)入窗體設(shè)計(jì)器，創(chuàng)建 1通用對(duì)話框 CommonDialog 1個(gè)框架 Frame1和 1個(gè)命令按鈕數(shù)組 Command1(0)Command1(3)。 ActiveX控件 (5) 使用“打印”對(duì)話框 “打印”對(duì)話框可用以指定打印輸出方式。 FontUnderline 是否選定下劃線。H2 顯示全部的對(duì)話框，包括定義自定義顏色部分。 文件最大長(zhǎng)度 (MaxFileSize) 用于指定文件名的最大字節(jié)數(shù)。 167。 計(jì)時(shí)器控件 三、應(yīng)用舉例 用計(jì)時(shí)器來設(shè)計(jì)一個(gè)電子表，要求可以分別顯示 12和 24小時(shí)制。 ChangeColor End Sub Private Sub HsbGreen_Change() ‘ 控制綠色的滾動(dòng)條變化時(shí)產(chǎn)生的事件 = 綠色值： amp。 Value 表示目前滾動(dòng)條所在位置對(duì)應(yīng)的值 是滾動(dòng)條控件中移動(dòng)方塊位置與最大、最小值換算而得的結(jié)果。 ? 圖像框常用的時(shí)間和方法很少。 控件名稱 屬性名 屬性值 Combo1 Style 0 Dropdown bo List 電冰箱 洗衣機(jī) 彩色電視 組合音響 影碟機(jī) 電水壺 飲水機(jī) Combo2 Style 1Simple bo List 電冰箱 洗衣機(jī) 彩色電視 組合音響 影碟機(jī) 電水壺 飲水機(jī) Combo3 Style 2 Dropdown list List 電冰箱 洗衣機(jī) 彩色電視 組合音響 影碟機(jī) 電水壺 飲水機(jī) Label1 Caption Style:0 Label2 Caption Style:1 Label3 Caption Style:2 Label4 Caption BorderStyle 1Fixed Single BackColor amp。 0：包括一個(gè)下拉式列表和一個(gè)文本框的下拉式組合框。如果省略 Index，當(dāng) Sorted屬性設(shè)置為 True時(shí)， Item將添加到恰當(dāng)?shù)呐判蛭恢?，?dāng) Sorted屬性設(shè)置為 False時(shí)， Item將添加到列表的末尾。 選項(xiàng)按鈕控件和框架控件 Private Sub Option1_Click() MsgBox 你的學(xué)歷是大學(xué)?？?！ , vbInformation, 提示信息 End Sub 167。如果在框架外面建立好控件之后再將其移到框架內(nèi)，則控件是不會(huì)與所屬的框架成為一個(gè)群組的。 Click事件：當(dāng)用戶在一個(gè)復(fù)選框上單擊鼠標(biāo)按鈕時(shí)發(fā)生。 167。 167。該命令按鈕為 Cancel按鈕。 等閑識(shí)得東風(fēng)面， 萬紫千紅總是春。 文本框控件 二、 常用事件和方法 文本框的常用事件主要有 Change事件和 KeyPress事件。窗體的設(shè)計(jì)界面和執(zhí)行界面如圖所示。 通常，在程序運(yùn)行時(shí)按 Tab鍵能選擇 Tab鍵順序中的每一個(gè)控件。 圖片框控件和圖像框控件 167。 選項(xiàng)按鈕控件和框架控件 167。 焦點(diǎn)與 Tab鍵的順序 二、設(shè)置 Tab鍵的順序 Tab鍵順序就是在按 Tab鍵時(shí)，焦點(diǎn)在控件間移動(dòng)的順序。 167。 MultiLine 設(shè)置文本框是否以多行方式顯示文本 =值 True：以多行文本方式顯示。第一個(gè)文本框用于演示是單行文本，運(yùn)行時(shí)，在文本框中輸入“ 1234567” ，屬性設(shè)置見右表。 Cancel 設(shè)置命令按鈕是否為 Cancel按鈕當(dāng)用戶按 Esc鍵時(shí)，是否觸發(fā)它的 Click事件。 167。 (2)窗口樣式：用來表示在程序運(yùn)行時(shí)窗口的樣式。 一、常用屬性 167。 ? 框架的作用主要是區(qū)分一個(gè)控件組，也就是讓用戶可以容易地區(qū)分窗體中的各個(gè)對(duì)象。 選項(xiàng)按鈕控件和框架控件 三、應(yīng)用舉例 首先向工程中添加一個(gè)窗體。 語法： Item,Index 說明： (1)Item：是要添加到列表框中的字符表達(dá)式。 組合框控件 組 合框兼有文本框和列表框的功能，允許用戶通過輸入文本或選擇列表中的項(xiàng)目來進(jìn)行選擇，但它一次只能選取或輸入一個(gè)選項(xiàng)，而且不能設(shè)定為多重選取模式。 語法： 167。 True：當(dāng)圖形載入時(shí)，圖形自動(dòng)調(diào)整大小，填滿整個(gè)圖像框。 其值介于 32 768到 32 767之間。 = 綠色值： amp。 計(jì)時(shí)器控件 二、常用事件和方法 計(jì)時(shí)器的主要事件就是 Timer事件。這些對(duì)話框作為 Windows的資源，在 VisualBasic中已被做成“通用對(duì)話框”控件。如： All Files(*.*)|*.*|Text Files(*.txt)|*.txt 標(biāo)志 (Flags) 用于設(shè)置對(duì)話框的一些選項(xiàng)，可以是多個(gè)值的組合。 標(biāo)志 (Flags) 設(shè)置對(duì)話框的一些顏色。 FontItalic 是否選定了斜體。 ActiveX控件 注意： 必須將 Flags屬性設(shè)為下列常數(shù)之一與其他選項(xiàng)之和： cdlCFScreenFonts或 1 (屏幕字體 ) cdlCFPrinterFonts或 2(打印機(jī)字體 ) cdlCFBoth或 3(=1+2 兩種字體皆有 ) 例如：設(shè)為 =259(=256+3 是 cdlCFEffects常數(shù)與 3之和 ,在對(duì)話框中將出現(xiàn)顏色、效果等選項(xiàng) )。 ActiveX控件 (6) 使用“幫助” CommonDialog控件的 ShowHelp方法可運(yùn)行 Windows的幫助引擎 ()，并顯示由 HelpFile屬性設(shè)定的一個(gè)幫助文件。在 Windows系統(tǒng)中，任一時(shí)刻可運(yùn)行幾個(gè)應(yīng)用程序，但只有具有焦點(diǎn)的應(yīng)用程序才有活動(dòng)標(biāo)題欄，才能接受用戶的輸入。 ② 在“屬性頁”對(duì)話框中設(shè)置屬性，其中各屬性描述如表所示。 屬 性 描 述 FontName 用于設(shè)置字體名稱中的初始字體，并可返回用戶所選擇的字體名稱。 167。最后使用 CommonDialog控件的 ShowSave方法來顯示“另存為”對(duì)話框： 控件名 .ShowSave 167。 ③ 使用 CommonDialog控件的 ShowOpen方法來顯示“打開”對(duì)話框：控件名 .ShowOpen 167。 167。 167。一般可用該事件來獲得移動(dòng)后的滾動(dòng)框所在的位置值。 滾動(dòng)條控件 ? VB中的滾動(dòng)條分為兩種類型：水平滾動(dòng)條和垂直滾動(dòng)條，除了放置的方向不同以外，這兩個(gè)控件是完全相同的。 ? 圖像框也用來顯示圖形，可以顯示位圖、圖標(biāo)、圖元文件、增強(qiáng)型圖元文件、 JPEG或 GIF文件。 Click事件 事件觸發(fā)條件：當(dāng)用戶在一個(gè)組合框上單擊鼠標(biāo)按鈕時(shí)發(fā)生。利用循環(huán)結(jié)構(gòu)和列表框控件，設(shè)計(jì)“選項(xiàng)移動(dòng)”窗體。 ListCount 返回列表框中所有選項(xiàng)的總數(shù) List 是一個(gè)一維數(shù)組，數(shù)組中元素的值就 是在執(zhí)行時(shí)看到的列表項(xiàng)。 選項(xiàng)按鈕控件和框架控件 二