Public Event Click As EventHandler

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        RaiseEvent Click(sender, e)
    End Sub

    Public ReadOnly Property TextBox() As TextBox
        Get
            Return Me.TextBox
        End Get
    End Property