Делегирование ........
сильный инструмент, из нововведений
В общих чертах, обьяснит пример:
[Public Class TestClass
Public Delegate Sub SubTest(ByVal Value1 As Integer, ByVal Value2 As String)
Event Event1 As SubTest
Event Event2 As SubTest
End Class
Public Class Test
Public WithEvents Client As TestClass
Sub New()
Client = New TestClass()
End Sub
Private Sub HandleEvent1(ByVal One As Integer, _
ByVal Two As String) Handles Client.Event1
End Sub
Private Sub HandleEvent2(ByVal One As Integer, _
ByVal Two As String) Handles Client.Event2
End Sub
End Class]
Вроде всё очевидно, попробуй, возможности огромадные
Что и нравиться мне в NET
Удачи .....[/code]