○VB.netにてイベントとイベント・ハンドラ 

'イベントを扱う側のソース
    Private WithEvents instance As New test
　　'上の変数を書いた時点でVB.netの開発環境のイベントで選択できます。
    Private Sub instance_testEvent(ByVal sender As Object, ByVal e As SampleEvent) Handles instance.testEvent
        MsgBox("testEvent")
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        instance.sendEvent()
    End Sub


'イベントクラス
Public Class SampleEvent
    Inherits System.EventArgs

End Class
'イベントを送信するクラス
Public Class test
    Public Event testEvent(ByVal sender As Object, ByVal e As SampleEvent)
    Sub sendEvent()
        RaiseEvent testEvent(Me, New SampleEvent)
    End Sub
End Class



○VB6イベントの送信

'イベントの定義
Public Event testEvent()

Public Sub sendEvent()

    'イベント送信
    RaiseEvent testEvent

End Sub