.Net 自定义事件

1.定义事件类：

Public Class clsEvent    Public Event MyEvent1()    Public Event MyEvent2()    Public Sub StartMyEvent1()        RaiseEvent MyEvent1()    End Sub    Public Sub StartMyEvent2()        RaiseEvent MyEvent2()    End SubEnd Class

2.实例化事件对象

    Public WithEvents mEventObj As New clsEvent

3.事件响应

    Private Sub On_Event1() Handles mEventObj.MyEvent1        Console.WriteLine("Event1")    End Sub

4.触发事件

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click        mEventObj.StartMyEvent1()    End Sub