WithEvents关键字的浅显理解

whb4321985

楼主你好，现在我有一个问题想请教一下
我现在申明了一个
Public WithEvents cmdHUP As MSForms.CommandButton
然后在一个窗体模块中初始化
Private Sub UserForm_Initialize()
Set cmdHUP = MultiPage.Pages(0).Controls.Add("Forms.CommandButton.1", "cmdHUP", True)
        With cmdHUP
        .Left = 150
        .top = 220
        .Width = 100
        .AutoSize = True
        .Caption = "打分"
        End With

End Sub

最后申明了点击事件
Public Sub cmdHUP_Click()
    MsgBox UserForm.Controls("Label1").Caption
End Sub
其中Label1是我动态添加的一个Label
这样子运行的时候，点击这个按钮会报错：无法找到指定的对象，请问点击事件中怎么样能获取到这个Label呢？

lysm

谢谢分享，学习了。

variant

好好学习一下，谢谢分享

wls_198210100

谢谢分享，楼主能系统的讲讲为模块的定义和运用吗？