Visual Basic 文本框 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 获取或设置应在多行 TextBox 控件中显示的滚动条。此属性有效值为: None Horizontal Vertical Both
14	TabIndex 获取或设置控件在其容器中的制表符顺序。
15	Text 获取或设置文本框中的当前文本。
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 将文本属性重置为其默认值。
8	ToString 返回表示 TextBoxBase 控件的字符串。
9	Undo 撤消文本框中的最后一次编辑操作。

TextBox 控件的事件

以下是 TextBox 控件的一些常用事件:

编号	事件 & 描述
1	Click 单击控件时发生。
2	DoubleClick 双击控件时发生。
3	TextAlignChanged 在 TextAlign 属性值更改时发生。

编号

事件 & 描述

Click

单击控件时发生。

DoubleClick

双击控件时发生。

TextAlignChanged

在 TextAlign 属性值更改时发生。

实例

在本例中，我们创建了 3 个文本框，并使用按钮的 Click 事件来使用消息框显示输入的文本。使用以下步骤：

在窗体上拖放 3 个 Label 控件和 3 个 TextBox 控件。
将标签上的文本分别更改为：Name，Organization 和 Comments。
将文本框的名称分别更改为：txtName，txtOrg 和 txtComment。
拖放窗体上的按钮控件。将其名称设置为：btnMessage，将其文本属性设置为 'Send Message'。
点击按钮在代码窗口中添加 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 = "tutorialspont.com"
  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 工具栏上的 "开始" 按钮运行时，它将显示以下窗口:

单击 Send Message 按钮将显示以下消息框:

Visual Basic 文本框 TextBox

TextBox 控件的属性

TextBox 控件的方法

TextBox 控件的事件

实例

分类导航