全部显示

初始化控件属性

可以在运行时初始化控件，方法是在宏中使用 Visual Basic 代码。例如，可以填写列表框，设置文本值，或设置选项按钮。

以下示例使用 AddItem 方法向列表框中添加数据。然后它设置文本框的值并显示窗体。

Private Sub GetUserName()
    With UserForm1
        .lstRegions.AddItem "North"
        .lstRegions.AddItem "South"
        .lstRegions.AddItem "East"
        .lstRegions.AddItem "West"
        .txtSalesPersonID.Text = "00000"
        .Show
        ' ...
    End With
End Sub

也可以使用窗体的 Initialize 事件中的代码设置窗体中控件的初始值。在 Initialize 事件中设置控件初始值的优点是初始化代码与窗体放在一起。可以将窗体复制到另一个项目，当运行 Show 方法以显示对话框时，控件将被初始化。

Private Sub UserForm_Initialize()
    With UserForm1
        With .lstRegions
           .AddItem "North"
            .AddItem "South"
            .AddItem "East"
            .AddItem "West"
        End With
        .txtSalesPersonID.Text = "00000"
    End With
End Sub