【正文】 ? 計(jì)時(shí)器可以使用 Name屬性和 Enabled屬性。在大多數(shù)個(gè)人計(jì)算機(jī)中，計(jì)時(shí)器每秒鐘最多可產(chǎn)生 18個(gè)事件，即兩個(gè)事件之間的間隔為 56/1000秒。 Str() End Sub 計(jì)時(shí)器 ? Visual ，而且提供了定制時(shí)間間隔（ Interval)的功能，可以由用戶自行設(shè)置每個(gè)計(jì)時(shí)器事件的時(shí)間間隔。 （ 2）通過屬性窗口把 4個(gè)標(biāo)簽的 Text屬性分別設(shè)置為“速度”、“慢”、“快”和空白，把文本框的 Text屬性設(shè)置為空白，然后把第四個(gè)標(biāo)簽的 BorderStyle屬性設(shè)置為 Fixed3D。 【 例 】 按下列步驟操作，試驗(yàn)滾動(dòng)條的功能。當(dāng)在滾動(dòng)條內(nèi)拖動(dòng)滾動(dòng)框時(shí)會(huì)觸發(fā) Scroll事件（單擊滾動(dòng)箭頭或滾動(dòng)條時(shí)不發(fā)生 Scroll事件），而改變滾動(dòng)框的位置后會(huì)觸發(fā) ValueChange事件。在工具箱中，水平滾動(dòng)條和垂直滾動(dòng)條的圖標(biāo)如圖 ，其默認(rèn)名稱分別為 HScrollBarX和 VScrollBarX（ X為 3...）。 MsgBox(S, , 微機(jī)配置 ) End Sub Private Sub Button2_Click(ByVal sender As , _ ByVal e As ) Handles End End Sub 運(yùn)行結(jié)果 滾動(dòng)條 ? 滾動(dòng)條通常用來(lái)附在窗口上幫助觀察數(shù)據(jù)或確定位置，也可用來(lái)作為數(shù)據(jù)輸入的工具，被廣泛地用于 Windows應(yīng)用程序中。 cl amp。 內(nèi)存： amp。 S = S amp。 cl amp。 機(jī)型： amp。 Chr(10) S = 所選擇的配置為： S = S amp。用戶可以選擇自己所需要的配置，然后輸出這些配置。 【 例 】 從屏幕上選擇微機(jī)的配置，并顯示出來(lái)。 ? 當(dāng)用戶單擊組合框中向下的箭頭時(shí)，將觸發(fā)Dropdown事件，該事件實(shí)際上對(duì)應(yīng)于向下箭頭的單擊（ Click）事件。對(duì)于下拉式組合框（屬性 DropDownStyle的值為 DropDown）和簡(jiǎn)單組合框，可以在編輯區(qū)輸入文本，當(dāng)輸入文本或從列表中選擇項(xiàng)目時(shí)可以接收 TextChanged事件。實(shí)際上，組合框所響應(yīng)的事件依賴于其 DropDownStyle屬性。此外，組合框可節(jié)約屏幕空間。組合框和列表框功能類似，在某些情況下可以互相代替，但在具體應(yīng)用中有一定的差別。也就是說(shuō)，組合框是一種獨(dú)立的控件，但它兼有列表框和文本框的功能。 ? （ 2）在復(fù)選列表框中不能使用多選方式，即只能選擇一項(xiàng)或沒有任何選擇。當(dāng)雙擊某個(gè)項(xiàng)目時(shí)，該項(xiàng)目從本列表框中消失，并出現(xiàn)在另一個(gè)列表框中。 【 例 】 交換兩個(gè)列表框中的項(xiàng)目。 （ 4） 該方法用來(lái)刪除列表框中指定的項(xiàng)目，其格式為： 列表框名 .(索引值 ) “索引值”為地址的項(xiàng)目，該方法每次只能刪除一個(gè)項(xiàng)目。 （ 2） 該方法用來(lái)清除列表框中的全部?jī)?nèi)容，格式為： 列表框名 . 執(zhí)行 ， 0。該方法只能單個(gè)地向表中添加項(xiàng)目。 列表框方法 ? 列表框可以使用 、 、 ，用來(lái)在運(yùn)行期間修改列表框的內(nèi)容。但有時(shí)不用編寫 Click事件過程代碼，而是當(dāng)單擊一個(gè)按鈕或發(fā)生 DblClick事件時(shí)，讀取 Text屬性。 列表框 ? 列表框支持的標(biāo)準(zhǔn) 屬性包括： Enabled、 Font、Size（ Height， Width）、Location（ X， Y）、Visible等。在工具箱中，列表框和組合框的圖標(biāo)如圖 。 End Sub Private Sub RadioButton3_Click(ByVal sender As Object, _ ByVal e As ) Handles = S amp。這需要在窗體上建立一個(gè)文本框和三個(gè)單選按鈕，其屬性設(shè)置如下： ━━━━━━━━━━━━━━━━━━━━━━━━━━ 控件 屬性 設(shè)置值 ────────────────────────── 文本框 Name TextBox1 Text 空白 14 單選按鈕 1 Name RadioButton1 Text 西安 成都 昆明 單選按鈕 2 Name RadioButton2 Text 上海 杭州 廣州 單選按鈕 3 Name RadioButton3 Text 哈爾濱 沈陽(yáng) 大連 ━━━━━━━━━━━━━━━━━━━━━━━━━━ 在窗體層聲明如下變量并賦初值： Dim S As String = 選擇的路線是 : 為三個(gè)單選按鈕編寫事件過程如下： Private Sub RadioButton1_Click(ByVal sender As Object, _ ByVal e As ) Handles = S amp。 1. CheckedState屬性（用于復(fù)選框） 2. Checked屬性（用于復(fù)選框和單選按鈕） 3. Apperence屬性（用于復(fù)選框和單選按鈕） 4. FlatStyle屬性（用于復(fù)選框和單選按鈕） 應(yīng)用舉例 【 例 】 編寫程序，用單選按鈕選擇旅游路線，并在文本框中顯示出來(lái)。 復(fù)選框和單選按鈕的屬性和事件 ? 以前介紹的大多數(shù)屬性都可用于復(fù)選框和單選按鈕，包括： Enabled、 Font、 Size（ Height， Width）、Location（ X， Y）、 Name、 Text、 Visible等。與此相反，在一組單選按鈕中，只能選擇其中的一個(gè)，當(dāng)打開某個(gè)單選按鈕時(shí)，其他單選按鈕都處于關(guān)閉狀態(tài)，這與收（錄）音機(jī)上按鈕的作用類似，因此也稱收（錄）音機(jī)按鈕（ RadioButton）。 ? 在應(yīng)用程序中，復(fù)選框和單選按鈕用來(lái)表示狀態(tài)，可以在運(yùn)行期間改變其狀態(tài)。 ? 在工具箱中，復(fù)選框和單選按鈕的圖標(biāo)如圖 。為此， Visual 標(biāo)準(zhǔn)控件，包括復(fù)選框、單選按鈕、列表框和組合框。 信號(hào)燈有三種，分別為紅、黃、綠，在某個(gè)時(shí)刻只能亮一個(gè)，程序?qū)⒛M這種操作。如果可用，則其 Enabled屬性為 True，即 =True，過程中條件語(yǔ)句的“條件”為真，否則為假。這種功能可以用 Enabled和 Visible屬性來(lái)實(shí)現(xiàn)。 有時(shí)候，為了防止誤操作，可以讓按鈕暫時(shí)失去作用或消失。其默認(rèn)名稱和標(biāo)題（ Text屬性）為 ButtonX（其中 X為 3...）。 隱藏第三個(gè)圖片框 = False End Sub 按鈕控件 ? 按鈕是 Visual ，它提供了用戶與應(yīng)用程序交互的最簡(jiǎn)便的方法。 首先在窗體上建立三個(gè)圖片框 PictureBox PictureBox PictureBox3，其中PictureBox3的大小和位置任意，然后編寫如下事件過程： Private Sub Form1_Load(ByVal sender As , _ ByVal e As ) Handles = = = = (d:\) = (d:\) End Sub Private Sub Form1_Click(ByVal sender As Object, _ ByVal e As ) Handles 39。 在傳統(tǒng)的程序設(shè)計(jì)中，交換兩個(gè)變量的值是十分普通的操作，通常要引入第三個(gè)變量進(jìn)行交換。 ? 1. 在設(shè)計(jì)階段裝入圖形文件 ：用 屬性窗口 中的 Image屬性裝入 ；利用 剪貼板 把圖形粘貼（ Paste）到圖片框中。 圖片框的主要屬性 ? 1. 與窗體屬性相同的屬性 ? 2. Image屬性 ? 3. BorderStyle屬性 ? 4. SizeMode屬性 其中 BorderStyle是枚舉類型，可以取以下值： 無(wú)邊框 單線邊框 立體邊框 例如： = 其中 PictureBoxSizeMode是枚舉類型，可以取以下值： 例如： = 和窗體一樣，圖片框可以接收 Click（單擊）、 DblClick（雙擊）事件。在 Visual ，圖片框的圖標(biāo)如圖 。 【 例 】 用 TextChanged事件改變文本框的 Text屬性。該方法可以把焦點(diǎn)移到指定的控件中。只有當(dāng)一個(gè)文本框被激活并且其可見性（ Visible屬性）為 True時(shí)，才能接收到焦點(diǎn)（將在 ）。用TextChanged事件過程和 LostFocus事件過程都可以檢查文本框的 Text屬性值，但后者更有效。 （ 2） LostFocus事件：當(dāng)控件失去焦點(diǎn)時(shí)發(fā)生該事件。 （ 1） TextChanged事件：當(dāng)用戶向文本框中輸入新信息，或當(dāng)程序把 Text屬性設(shè)置為新值從而改變文本框的 Text屬性時(shí)，將觸發(fā) TextChanged事件。當(dāng)文本框的 MultiLine屬性被設(shè)置為 True時(shí)，如果把 WordWrap屬性設(shè)置為 True（默認(rèn)），則在文本框中輸入或輸出文本時(shí)可以自動(dòng)換行，并在下一行接著輸入或輸出；而如果把該屬性設(shè)置為 False，則即使把 MultiLine屬性設(shè)置為 True也不能使文本框的輸入或輸出自動(dòng)換行。如果把該屬性設(shè)置為 False（默認(rèn)），則在運(yùn)行期間文本框可以接收用戶的輸入，并可對(duì)文本框中的文本進(jìn)行編輯；而如果把該屬性設(shè)置為 True，則在運(yùn)行期間不能對(duì)文本框中的文本進(jìn)行編輯，在這種情況下，文本框中的文本可以顯示，也可以滾動(dòng)，但不能編輯。 （ 7） TextAlign：用來(lái)設(shè)置文本框中文本的對(duì)齊方式，可以取以下 3種值： Left 左對(duì)齊 Right 右對(duì)齊 Center 居中 上述設(shè)置值可以在屬性窗口中設(shè)置（通過下拉列表選擇）。 如果通過代碼設(shè)置 ScrollBars屬性，則格式如下： = 設(shè)置值 這里的“設(shè)置值”是枚舉類型 ScrollBars，可以取以下 4種值： 文本框中沒有滾動(dòng)條 只有水平滾動(dòng)條 只有垂直滾動(dòng)條 同時(shí)具有水平和垂直滾動(dòng)條 例如： = （ 6） Locked：該屬性用來(lái)指定文本框是否可以移動(dòng)。利用這一特性，可以設(shè)置口令。如果把 PassWordChar屬性設(shè)置為一個(gè)字符，例如星號(hào)（ *），則在文本框中鍵入字符時(shí)，顯示的不是鍵入的字符，而是被設(shè)置的字符（如星號(hào)）。 （ 3） PassWordChar：該屬性可用于口令輸入。如果把該屬性設(shè)置為 False，則在文本框中只能輸入單行文本，文本框的高度不能調(diào)整；當(dāng)屬性 Multiline被設(shè)置為 True時(shí)，可以使用多行文本，即在文本框中輸入或輸出文本時(shí)可以自動(dòng)換行，并在下一行接著輸入或輸出。如果把長(zhǎng)度超過 MaxLength屬性設(shè)置值的文本賦給文本框， Visual ，但會(huì)截去多余的字符。 1. 文本框?qū)傩? ? 前面介紹的一些屬性也可以用于文本框，這些屬性包括： BackColor、 BorderStyle、 Enabled、 Font、ForeColor、 Size（ Height， Width）、 Location（ X，Y）、 Name、 Visible。 文本框 ? 文本框是一個(gè)文本編輯區(qū)域。如果通過代碼設(shè)置，則格式如下： = (圖形文件名 ) 例如： = (d:\) 標(biāo)簽可觸發(fā) Click和 DblClick事件。 （ 6） Image：用來(lái)設(shè)置標(biāo)簽的背景圖像?？梢酝ㄟ^屬性窗口或程序代碼設(shè)置，格式如下： 對(duì)象 .Enabled[= Boolean] 這里的“對(duì)象”可以是窗體或控件。如果通過代碼設(shè)置，則格式如下