VB.NET 文本框控件

17 Mar 2025 | 4 分钟阅读

TextBox 控件用于在 VB.NET Windows 窗体上显示文本，接受用户输入的文本，或在运行时显示单行文本。此外，我们可以在文本框控件中添加多个文本和滚动条。但是，我们可以设置显示在窗体上的文本框上的文本。

让我们通过以下步骤在VB.NET Windows窗体中创建一个 TextBox 控件。

步骤 1： 我们必须从工具箱中拖动 TextBox 控件并将其拖放到 Windows 窗体上，如下所示。

步骤 2： 将 TextBox 添加到窗体后，我们可以通过单击 TextBox 控件来设置 TextBox 的各种属性。

VB.NET TextBox 属性

以下是 TextBox 控件的属性。

性质	描述
AutoCompleteMode	它用于获取或设置一个值，该值指示自动完成如何用于文本框控件。
Font	它用于设置 Windows 窗体上显示的文本的字体样式。
线	它用于设置 TextBox 控件中的行数。
CharacterCasing	它用于获取或设置一个值，该值表示 TextBox 控件是否可以在键入时修改字符的大小写。
Multiline	它用于在 TextBox 控件中输入多行，方法是将 Multiline 属性值从 False 更改为 True。
AcceptsReturn	它用于获取或设置一个值，该值指示是否在多行文本框中按下 Enter 按钮；它在控件中创建一个新的文本行。
PasswordChar	它用于设置密码字符，该密码字符可以是 TextBox 控件的单行中的掩码。
PreferredHeight	它用于设置窗口窗体中文本框控件的首选高度。
ScrollBars	它用于通过为 Textbox 控件设置一个值，在多行文本框上显示滚动条。
文本	它用于获取或设置与文本框控件关联的文本。
Visible	Visible 属性设置一个值，该值指示是否应在 Windows 窗体上显示文本框。
WordWrap	WordWrap 属性验证多行 Textbox 控件是否在必要时自动将单词换行到下一行的开头。

VB.NET TextBox 事件

事件	描述
Click	单击文本框时，将在文本框控件中调用 click 事件。
CausesValidationChanged	当 CauseValidation 属性的值更改时，它发生在 TextBox 控件中。
AcceptTabsChanged	当 AcceptTab 的属性值更改时，它在 TextBox 控件中找到。
BackColorChanged	当 BackColor 的属性值更改时，它在 TextBox 控件中找到。
BorderStyleChanged	当 BorderStyle 的值更改时，它在 TextBox 控件中找到。
ControlAdded（ControlAdded）	将新控件添加到 Control.ControlCollection 时，将找到它。
CursorChanged	当从 Control.ControlCollection 中删除文本框控件时，它在 TextBox 中找到。
FontChanged	当 Font 的属性更改时，会发生它。
GetFocus	它在 TextBox 控件中找到以获得焦点。
MouseClick	当鼠标单击控件时，会发生 MouseClick 事件。
MultilineChanged	当多行值更改时，它在文本框控件中找到。

此外，我们还可以参考 VB.NET Microsoft 文档以获取 TextBox 属性和事件的完整列表。

让我们创建一个显示登录详细信息的程序。

JavatPoint1.vb

Public Class JavatPoint1
    Private Sub JavatPoint1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Text = "JavaTpoint.com" ' title name
        Label1.Text = "User Login Details" ' Set the title name for Label1 
        Label2.Text = "Name"              ' Set the name for label2 
        Label3.Text = "Username"  ' Set the username for label2 
        Label4.Text = "Password"     ' Set the label name Passowrd
        Text3.PasswordChar = "*"
        Button1.Text = "Login"  ' Set the name of Button1 as Login
        Button2.Text = "Exit"       ' Set the name of Button2 As Exit
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        End ' terminate the program when the user clinks button 2
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim name As String
        Dim Uname As String
        Dim pass As String
        name = text1.Text
        Uname = Text2.Text
        pass = Text3.Text
        ' Display the user details, when the Button1 is clicked
        MsgBox(" Your Name: " & name + vbCrLf + "Your UserName: " & Uname + vbCrLf + "Your Password: " & pass)
    End Sub
End Class

输出