eventmember7.vb

来自「大名鼎鼎的mono是.NET平台的跨平台（支持linux」· VB 代码 · 共 22 行

Class EventMember7

    Event SomeEvent()
    Sub New()
        Dim i As Integer
        i = 2
    End Sub

    Sub New(ByVal a As Boolean)
        Dim i As Integer
        i = 4
    End Sub

    Sub New(ByVal B As String)
        Me.new()
    End Sub

    Sub EventHandler() Handles me.someevent

    End Sub

End Class