VBA-第 12.1 课。用户表单 (UserForm)

UserForm 对象是一个窗口或对话框，是应用程序用户界面的一部分。

UserForm 允许您在项目中创建窗口或对话框。在窗体上，您可以绘制并可以看到控件。

用户窗体具有定义其外观的属性，例如位置、大小、颜色及其行为的方面。

开发表单时：

创建表单（UserForm）

要添加 UserForm，我们需要在添加新模块时执行相同的操作：

之后就会出现表单（UserForm）和工具栏（Toolbox）：

如果您没有看到“属性”窗口 (Properties)，请确保它已显示，然后首先编辑名称 UserForm（以便您以后可以轻松找到它）：

表单 (UserForm) 有自己的事件，就像工作簿或工作表一样。要添加事件，请双击 UserForm。

现在让我们创建两个事件来看看它是如何工作的。第一个事件将设置 UserForm 的初始大小，第二个事件将在用户单击时将其大小增加 50px。

UserForm_Initialize 事件将在 UserForm 启动时触发：

Private Sub UserForm_Initialize()
    my_userform.Height = 100
    my_userform.Width  = 100
End Sub

为了简化代码，我们可以使用 Me 代替名称 UserForm （因为此代码位于我们正在使用的 UserForm 中）：

Private Sub UserForm_Initialize()
    Me.Height = 100
    Me.Width  = 100
End Sub

当用户单击 UserForm 时，将发生第二个事件：

Private Sub UserForm_Initialize()
    Me.Height = 100
    Me.Width  = 100
End Sub

Private Sub UserForm_Click()
    Me.Height = Me.Height + 50
    Me.Width  = Me.Width + 50
End Sub

启动表单 (UserForm)

要在过程中运行 UserForm，请使用 Show：

Sub show_userform()
     my_userform.Show
End Sub