vb.net - Raising Me.Click 在自定义用户控件 (VB.Net)

Question

嗨，我一直在为我的所有应用程序开发一个自定义控件库，但我也希望它是开源的，所以它需要易于使用。

我想使用 Me.Click 事件，因此当您单击Panel1(Panel) 或BtnText(Label) 时，它将引发事件Click，但由于某种原因，它不允许我使用该事件RaiseEvent。

这是我的代码：

Public Sub BtnText_Click(sender As Object, e As EventArgs) Handles BtnText.Click
    RaiseEvent Click()
End Sub

Public Sub Panel1_Click(sender As Object, e As EventArgs) Handles Panel1.Click
    RaiseEvent Click()
End Sub

Answer 1

要将事件传播到UserControl，您可以调用OnClick方法：

Public Sub BtnText_Click(sender As Object, e As EventArgs) Handles BtnText.Click
    Me.OnClick(e)
End Sub

Public Sub Panel1_Click(sender As Object, e As EventArgs) Handles Panel1.Click
    Me.OnClick(e)
End Sub