VB.Net文字框（TextBox）

文字框(TextBox)控制元件允許在執行時在表單上輸入文字。預設情況下，它只需要一行文字，但是，可以使其接受多個文字，甚至新增捲動條。

通過從工具箱中拖動一個文字框控制元件並將其放在表單上來建立一個文字框。

TextBox控制元件的屬性

以下是TextBox控制元件的一些常用屬性：

編號	屬性	描述
1	`AcceptsReturn`	獲取或設定一個值，該值指示在多行`TextBox`控制元件中按ENTER鍵是否在控制元件中建立新的文字行或啟用表單的預設按鈕。
2	`AutoCompleteCustomSource`	獲取或設定`AutoCompleteSource`屬性設定為`CustomSource`時使用的自定義`System.Collections.Specialized.StringCollection`。
3	`AutoCompleteMode`	獲取或設定一個選項，用於控制`TextBox`的自動完成工作方式。
4	`AutoCompleteSource`	獲取或設定一個值，指定用於自動完成的完整字串的來源。
5	`CharacterCasing`	獲取或設定`TextBox`控制元件是否修改輸入字元的大小寫。
6	`Font`	獲取或設定控制元件顯示的文字的字型。
7	`FontHeight`	獲取或設定控制元件的字型高度。
8	`ForeColor`	獲取或設定控制元件的前景色。
9	`Lines`	獲取或設定文字框控制元件中的文字行。
10	`Multiline`	獲取或設定一個值，該值指示這是否為多行`TextBox`控制元件。
11	`PasswordChar`	獲取或設定用於在單行`TextBox`控制元件中掩蓋密碼字元的字元。
12	`ReadOnly`	獲取或設定一個值，該值指示文字框中的文字是否是唯讀的。
13	`ScrollBars`	獲取或設定哪些捲動條應出現在多行文字框控制元件中。該屬性具有值：`None`，`Horizontal`,`Vertical`,`Both`
14	`TabIndex`	獲取或設定控制元件在其容器中的`Tab`鍵順序。
15	`Text`	獲取或設定`TextBox`中的當前文字。
16	`TextAlign`	獲取或設定文字在`TextBox`控制元件中的對齊方式該屬性具有值：`Left`，`Right`，`Center`
17	`TextLength`	獲取控制元件中文字的長度。
18	`WordWrap`	指示多行文字框控制元件是否在必要時自動將單詞包裝到下一行的開頭。

TextBox控制元件的方法

以下是TextBox控制元件的一些常用方法：

編號	方法	描述
1	`AppendText`	將文字附加到文字框的當前文字。
2	`Clear`	清除文字框控制元件中的所有文字。
3	`Copy`	將文字框中的當前選擇複製到剪貼簿。
4	`Cut`	將文字框中的當前選擇移動到剪貼簿。
5	`Paste`	用剪貼簿的內容替換文字框中的當前選擇。
6	`Paste(String)`	將選定的文字設定為指定的文字，而不清除撤消緩衝區。
7	`ResetText`	將`Text`屬性重置為其預設值。
8	`ToString`	返回一個表示`TextBoxBase`控制元件的字串。
9	`Undo`	取消文字框中的最後一個編輯操作。

TextBox控制元件的事件

以下是Text控制元件的一些常用事件：

編號	事件	描述
1	`Click`	在單擊控制元件時發生。
2	`DoubleClick`	在雙擊控制元件時發生。
3	`TextAlignChanged`	在`TextAlign`屬性值更改時發生。

範例

在本例中，我們建立了三個文字框，並使用按鈕的Click事件來使用訊息框顯示輸入的文字。採取以下步驟：

在表單上拖放三個Label控制元件和三個TextBox控制元件。
將標籤上的文字分別更改為：Name，Organization和Comments。
將文字框的名稱分別更改為：txtName，txtOrg和txtComment。
拖放表單上的按鈕控制元件。將其名稱設定為：btnMessage，將其文字屬性設定為「傳送訊息」。
點選按鈕在程式碼視窗中新增Click事件並新增下面的程式碼。

參考以下範例程式碼 -

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) _
       Handles MyBase.Load
        ' Set the caption bar text of the form.  
        Me.Text = "Tw511.com Load Title"
    End Sub

    Private Sub btnMessage_Click(sender As Object, e As EventArgs) Handles btnMessage.Click
        MessageBox.Show("Thank you " + txtName.Text + " from " + txtOrg.Text)
    End Sub
End Class

當上面的程式碼執行並使用Microsoft Visual Studio工具列上的「開始」按鈕執行時，它將顯示以下視窗：

單擊「傳送訊息」按鈕將顯示以下訊息框：