VB.NET 窗体控件

17 Mar 2025 | 4 分钟阅读

在 VB.NET 中，窗体用于创建基于窗体或基于窗口的应用程序。使用窗体，我们可以构建一个吸引人的用户界面。它就像一个容器，用于容纳不同的控件，允许用户与应用程序交互。控件是窗体中的对象，例如按钮、文本框、文本区域、标签等，以执行某些操作。但是，我们可以通过创建控件的实例将任何控件添加到运行时。

窗体使用 System.Windows.Form 命名空间，它有一个广泛的控件系列，可在基于窗口的用户界面中添加窗体和功能。

VB.NET 窗体属性

以下是与窗体相关的最重要的属性列表。这些属性可以在应用程序执行时设置或读取。

性质	描述
BackColor	它用于设置窗体的背景颜色。
BackgroundImage（背景图片）	它用于设置窗体的背景图像。
光标	它用于设置光标悬停在窗体上时的光标图像。
AllowDrop	使用窗体中的 AllowDrop 控件，它允许是否在窗体上拖放。
Font	它用于获取或设置窗体中使用的字体。
已锁定	它确定窗体是否已锁定。
FormBorderStyle	它用于设置或获取窗体中的边框样式。
文本	它用于设置窗体窗口的标题。
MinimizeBox	MinimizeBox 用于在窗体的标题栏上显示最小化选项。
IsMDIChild	它用于验证窗体是否为多文档界面 (MDI) 子窗体的容器。
自动滚动	它允许是否在窗体中启用自动滚动。
MaximizeBox	它用于在窗体的标题栏上显示最大化选项。
MaximumSize	它用于设置窗体的最大高度和宽度。
语言	它用于指定窗体中本地化的语言。
AcceptButton	如果按下 Enter 键，它用于设置窗体按钮。
Top, Left	它用于设置窗体左上角的坐标（以像素为单位）。
名称	它用于定义窗体的名称。
MinimumSize	它用于设置窗体的最小高度和宽度。
已启用	它使用 True 或 False 值来启用窗体中的鼠标或键盘事件。
TopMost	它使用一个布尔值，表示您是否要将窗口窗体放在其他窗体的顶部。默认情况下，它为 False。

窗体事件

以下是与窗体相关的最重要的事件列表。

事件	描述
已激活	当用户或程序激活窗体时，会找到激活事件。
Click	单击窗体时，会激活单击事件。
封闭	在关闭窗体之前会找到已关闭事件。
正在关闭	当窗体正在关闭时，它存在。
DoubleClick	DoubleClick 当用户双击窗体时，会激活 DoubleClick 事件。
DragDrop（拖放）	当执行拖放操作时，会激活 DragDrop 事件。
MouseDown	当鼠标指针位于窗体上并且按下鼠标按钮时，会激活 MouseDown 事件。
GotFocus（获得焦点）	当窗体控件获得焦点时，会激活 GotFocus 事件。
HelpButtonClicked	当用户单击帮助按钮时，它会被激活。
KeyDown	当在聚焦于窗体时按下键时，会激活 KeyDown 事件。
KeyUp	当在聚焦于窗体时释放键时，会激活 KeyUp 事件。
加载	加载事件用于在首次显示窗体之前加载窗体。
LostFocus	当窗体失去焦点时，它会被激活。
MouseEnter	当鼠标指针进入窗体时，会激活 MouseEnter 事件。
MouseHover	当鼠标指针放置在窗体上时，会激活 MouseHover 事件。
MouseLeave	当鼠标指针离开窗体表面时，会激活 MouseLeave 事件。
显示	每当第一次显示窗体时，它就会被激活。
滚动	当通过用户或代码滚动窗体时，会激活 Scroll 事件。
Resize	当调整窗体大小时，会激活 Resize 事件。
移动	当移动窗体时，会激活 Move 事件。

为了在 VB.NET 中创建 Windows 窗体应用程序，我们需要在 Microsoft Visual Studio 中按照以下步骤操作。

转到文件菜单。
单击新建项目。
单击 Windows 窗体应用或应用程序

最后，单击“创建”按钮以创建您的项目，然后，它将显示以下名称为 Form1 的窗口窗体。

现在在 VB.NET 中创建一个简单的 Windows 窗体控件程序。

Form1.vb

Public Class Form1
' Create nameStr and num variables
    Dim nameStr As String
    Dim num As Integer
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    End Sub
   ' It is Label1
    Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label1.Click

    End Sub
  ' It is TextBox1 for inserting the value.
    Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

    End Sub
    ' It is Label2
    Private Sub Label2_Click(sender As Object, e As EventArgs) Handles Label2.Click

    End Sub

' It is a Button1 for transferring the control.
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        nameStr = TextBox1.Text
        num = TextBox2.Text
        Label3.Text = "You have entered the Name " & nameStr + " Number " & num

    End Sub

    ' It is TextBox2 for inserting the value.
    Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged

    End Sub
' It is label3
    Private Sub Label3_Click(sender As Object, e As EventArgs) Handles Label3.Click

    End Sub
End Class

输出