【正文】 ： = 設(shè)置值 其中“設(shè)置值”是 BorderStyle枚舉類(lèi)型，可以取以下三種值： 無(wú)邊框 單線邊框 立體邊框 例如： = 把標(biāo)簽的邊框設(shè)置為單線。 （ 2） TextAlign：該屬性用來(lái)確定標(biāo)簽中文本的放置方式，可以在屬性窗口中設(shè)置，也可以通過(guò)代碼設(shè)置，一般格式為： = 設(shè)置值 這里的“設(shè)置值”是枚舉類(lèi)型 ContentAlignment，可以取以下 9種值： 文本在標(biāo)簽的左上角顯示（默認(rèn)） 文本在標(biāo)簽的頂部居中顯示 文本在標(biāo)簽的右上角顯示 文本在標(biāo)簽的左部居中顯示 文本在標(biāo)簽的中部居中顯示 文本在標(biāo)簽的右部居中顯示 文本在標(biāo)簽的左下角顯示 文本在標(biāo)簽的底部居中顯示 文本在標(biāo)簽的右下角顯示 例如： = （ 3） Autosize：如果把該屬性設(shè)置為 True，則可根據(jù) Text屬性指定的文本自動(dòng)調(diào)整標(biāo)簽的大小；如果把 Autosize屬性設(shè)置為 False，則標(biāo)簽將保持設(shè)計(jì)時(shí)定義的大小，在這種情況下，如果文本太長(zhǎng)，則只能顯示其中的一部分。 ? 其他屬性 （ 1） Text：設(shè)置在標(biāo)簽中顯示的文本。有時(shí)候，標(biāo)簽常用來(lái)標(biāo)注本身不具有 Text屬性的控件，例如，可以用標(biāo)簽對(duì)文本框、列表框、組合框等控件附加描述性信息。標(biāo)簽的默認(rèn)名稱（ Name）和標(biāo)題（ Text）為 LabelX（ X為 3...），文本框的默認(rèn)名稱和標(biāo)題為 TextBoxX（ X為 3...）。在標(biāo)簽中只能顯示文本，不能進(jìn)行編輯，而在文本框中既可顯示文本，又可在文本框中輸入文本。其中在 Windows窗體中使用的控件稱為Windows窗體控件，這類(lèi)控件數(shù)量較多，在這一章中，我們將介紹部分常用的 Windows窗體控件。Visual Basic. NET 程序設(shè)計(jì)(中 ) Visual Basic. NET 程序設(shè)計(jì) 第 6章 常用 Windows窗體控件 內(nèi)容提要 ? 文本控件 ? 圖形控件 ? 按鈕控件 ? 選擇控件 ——復(fù)選框和單選按鈕 ? 選擇控件 ——列表框和組合框 ? 滾動(dòng)條 ? 計(jì)時(shí)器 ? 分組框控件 ? 焦點(diǎn)與 Tab順序 ? 控件是重要的可視化編程工具，是構(gòu)成用戶界面的基本元素，只有掌握了控件的屬性、事件和方法，才能編寫(xiě)具有實(shí)用價(jià)值的應(yīng)用程序。Visual Windows窗體中，也可以出現(xiàn)在 Web窗體中。 文本控件 ? 與文本有關(guān)的控件有兩個(gè)，即標(biāo)簽（ Label）和文本框（ TextBox）。 ? 在 Visual （“ Windows窗體”選項(xiàng)卡，下同）中，標(biāo)簽和文本框的圖標(biāo)如圖 。 標(biāo)簽 ? 標(biāo)簽主要用來(lái)顯示文本信息，所顯示的文本只能用 Text屬性來(lái)設(shè)置或修改，不能直接編輯。 1. 標(biāo)簽的屬性、事件和方法 ? 標(biāo)簽的部分屬性與窗體及其他控件相同，包括BackColor、 ForeColor、 Font、 Height、 Left、Name、 Top、 Visible、 Width等。標(biāo)簽中的文本只能用 Text屬性顯示。 （ 4） BorderStyle：用來(lái)設(shè)置標(biāo)簽的邊框，可以取以下 3種值： None 無(wú)邊框（默認(rèn)） FixedSingle 單直線邊框 Fixed3D 立體邊框（凹陷） 當(dāng)在屬性窗口中設(shè)置該屬性時(shí)，可以通過(guò)單擊屬性條右端的箭頭，在下拉列表中選擇。 （ 5） Enabled：該屬性返回或設(shè)置一個(gè)值，用來(lái)確定一個(gè)窗體或控件是否能夠?qū)τ脩舢a(chǎn)生的事件作出反應(yīng)。 Enabled屬性的值為 Boolean類(lèi)型，當(dāng)該值為 True時(shí)，允許對(duì)象對(duì)事件作出反應(yīng)；如果為 False，則禁止對(duì)事件作出反應(yīng)，在這種情況下，對(duì)象變?yōu)榛疑．?dāng)在屬性窗口中設(shè)置該屬性時(shí)，可單擊該屬性條，然后單擊右端的“ …‖ ，顯示“打開(kāi)”對(duì)話框，在該對(duì)話框中選擇所需要的圖形文件。此外，標(biāo)簽主要用來(lái)顯示一小段文本，通過(guò) Text屬性定義，一般不需要使用其他方法。可以在設(shè)計(jì)階段或運(yùn)行期間在這個(gè)區(qū)域中輸入、編輯、修改和顯示文本，類(lèi)似于一個(gè)簡(jiǎn)單的文本編輯器。 ? 其他屬性 （ 1） MaxLength：用來(lái)設(shè)置允許在文本框中輸入的最大字符數(shù)，在一般情況下，該屬性使用默認(rèn)值（ 32767）。 （ 2） Multiline：用來(lái)確定文本框是否接收多行文本。按 Ctrl+Enter可以插入一個(gè)空行。在默認(rèn)狀態(tài)下，該屬性被設(shè)置為空字符串（不是空格），用戶從鍵盤(pán)上輸入時(shí)，每個(gè)字符都可以在文本框中顯示出來(lái)。不過(guò)文本框中的實(shí)際內(nèi)容仍是輸入的文本，只是顯示結(jié)果被改變了。 （ 4） ScrollBars：該屬性用來(lái)確定文本框中有沒(méi)有滾動(dòng)條，可以取以下 4種值： None 文本框中沒(méi)有滾動(dòng)條 Horizontal 只有水平滾動(dòng)條 Vertical 只有垂直滾動(dòng)條 Both 同時(shí)具有水平和垂直滾動(dòng)條 上述屬性值可以在屬性窗口中設(shè)置（通過(guò)下拉列表），注意，只有當(dāng)MultiLine屬性被設(shè)置為 True時(shí)，用 ScrollBars屬性設(shè)置的滾動(dòng)條才能起作用。當(dāng)設(shè)置值為 False（默認(rèn)值）時(shí)，在設(shè)計(jì)階段可以移動(dòng)文本框；如果設(shè)置值為 Ture時(shí)，則不能移動(dòng)文本框。如果通過(guò)代碼設(shè)置，則格式如下： = 設(shè)置值 這里的“設(shè)置值”是枚舉類(lèi)型 HorizontalAlignment，可以取以下 3種值： 左對(duì)齊 右對(duì)齊 居中 （ 8） ReadOnly：設(shè)置文本框是否為只讀。 （ 9） WordWrap：用來(lái)確定多行文本框是否自動(dòng)換行。 2. 文本框事件 文本框支持 Click、 DblClick等鼠標(biāo)事件，同時(shí)支持 TextChanged、 LostFocus、GotFocus事件。程序運(yùn)行后，在文本框中每鍵入一個(gè)字符，就會(huì)引發(fā)一次 TextChanged事件。例如當(dāng)按下 Tab鍵使輸入光標(biāo)離開(kāi)文本框或者用鼠標(biāo)選擇窗體中的其他控件時(shí)觸發(fā)該事件。 （ 3） GotFocus事件：當(dāng)文本框具有輸入焦點(diǎn)（即處于活動(dòng)狀態(tài)）時(shí)發(fā)生該事件，從鍵盤(pán)上輸入的每個(gè)字符都將在該文本框中顯示出來(lái)。 3. 文本框方法 Focus是文本框中較常用的方法，格式如下： [對(duì)象 .]Focus 這里的“對(duì)象”可以是任何具有焦點(diǎn)的控件。當(dāng)在窗體上建立了多個(gè)文本框后，可以用該方法把光標(biāo)置于所需要的文本框。 在窗體上建立三個(gè)文本框和一個(gè)按鈕，其 Name屬性分別為 TextBoxTextBox TextBox3和 Button1，然后編寫(xiě)如下的事件過(guò)程： Private Sub Button1_Click(ByVal sender As , _ ByVal e As ) Handles = Visual End Sub Private Sub TextBox1_TextChanged(ByVal sender As Object, _ ByVal e As ) Handles = LCase() = UCase() End Sub 圖片框 ? 圖片框是 Visual 件，用于在窗體的指定位置顯示圖形信息。其默認(rèn)名稱為 PictureBoxX（ X為 3...）。 圖形文件的裝入 ? 所謂圖形文件的裝入，就是把 Visual 收的圖形文件裝入圖片框或其他控件中。 ? 2. 在運(yùn)行期間裝入圖形文件 在運(yùn)行期間裝入圖形文件 ，其一般格式為： 圖片框名 .Image = (文件名 ) 例如： = (d:\metafile\) 圖片框舉例 例如： 在窗體上建立 4個(gè)圖片框，然后編寫(xiě)如下的事件過(guò)程： Private Sub Form1_Click(ByVal sender As Object, _ ByVal e As ) Handles = = = = = (d:\) = (d:\) = (d:\) = (d:\) End Sub 【 例 】 編寫(xiě)程序，交換兩個(gè)圖片框中的圖形。交換兩個(gè)圖片框中圖形的操作與此類(lèi)似。 交換兩個(gè)圖片中的圖形 = = = 39。在工具箱中，按鈕的圖標(biāo)如圖 。 屬性和事件 ? 1. Text屬性 ? 2. FlatStyle屬性 ? 3. Image屬性 ? 4. BackGroundImage屬性 ? 5. ImageAlign屬性 ? 6. TextAlign屬性 應(yīng)用舉例 在應(yīng)用程序中，按鈕的應(yīng)用十分廣泛，以前我們?cè)啻我?jiàn)過(guò)這方面的例子。例如，想要復(fù)制數(shù)據(jù)或文件，但在某個(gè)時(shí)刻數(shù)據(jù)或文件不存在，此時(shí)就需要使“復(fù)制”按鈕暫時(shí)失去作用或消失。例如： 設(shè)置 = True 使按鈕生效 設(shè)置 Button1Enabled = False 使按鈕失去作用 設(shè)置 = False 使按鈕消失 設(shè)置 = True 使按鈕重新出現(xiàn) 用 Enabled屬性可以檢查一個(gè)按鈕是否有效，例如： If Then = Button is enabled Else = Button is disabled End If 上述過(guò)程測(cè)試按鈕 Button1是否可用。 【 例 】 編寫(xiě)程序，模擬交通信號(hào)燈的切換。在窗體上畫(huà)三個(gè)圖片框和兩個(gè)按鈕，其屬性設(shè)置如下： ━━━━━━━━━━━━━━━━━━━━━━━ 控件 屬性 設(shè)置值 ─────────────────────── 窗體 Text 信號(hào)燈 圖片框 Image Name PictureBox1 SizeMode AutoSize 圖片框 Image Name PictureBox 2 SizeMode AutoSize 圖片框 Image Name PictureBox 3 SizeMode AutoSize 按鈕 Text 切換信號(hào)燈 Name Button1 按鈕 Text 結(jié)束程序 Name Button2 ━━━━━━━━━━━━━━━━━━━━━━━ 編寫(xiě)如下的事件過(guò)程： Private Sub Form1_Load(ByVal sender As , _ ByVal e As ) Handles = False = False End Sub Private Sub Button1_Click(ByVal sender As , _ ByVal e As ) Handles If = True Then = False = True Els