Например:
- Код: Выделить всё
Private Sub Test(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave, Button1.Click
If если произошло событие Button1.MouseLeave Then
ElseIf если произошло событие Button1.Button1.Click Then
End If
End Sub
То что можно указывать разные события для разных функций я знаю Обработчик каждого события будет содержать по 1-2 однотипных сточки и таких событий будет много, поэтому в данном чем меньше будет функций тем лучше.