在vb.net中如何从私有子声明一个公共变量

Question

我正在从私有子动态创建标签，我希望能够在用户点击它们时执行某些操作。但是，我不能使用“Dim withEvents blah ...”，因为它说withEvents不能用于局部变量，但我也不能在我的Private Sub中使用“Public withEvents blah”。我该如何做到这一点？

感谢。

Answer 1

创建动态控件时，可以为其添加处理程序

Dim mylbl As New Label
mylbl.Name = "button1"
mylbl.Text = "hi"
Me.Controls.Add(mylbl)

AddHandler lbl.Click, AddressOf AllLabels_Click

这是你的Handler Sub

Sub AllLabels_Click(ByVal sender As Object, ByVal e As System.EventArgs)

    Dim lbl As Label = CType(sender, Label)

    MsgBox(lbl.Text)

End Sub