Собственый евент обработчик - VB

Формулировка задачи:

Не знаю реально ли такое вообще, но хочу сделать свой евент обработчик MouseOut противоположность MouseMove. Чтоб можно было писать в коде сразу объект_MouseOut() без добавления всяких классов и тд. Если реально то подскажите куда копать? Знаю как делать что то подобное обрабатывая координаты курсора с помощью таймера но эт не то, в самой форме как я понял уже заложен таймер который обрабатывает такие события, вот как бы туда приконектится

Не по теме:

Во понесло

Решение задачи: «Собственый евент обработчик»

textual
                            Листинг программы 
                        

                            Option Explicit
 
Public Sub cmdBtn_MouseLeave()
    Me.Caption = "cmdBtn_Leave"
End Sub
Public Sub cmdBtnArray_MouseLeave(Index As Integer)
    Me.Caption = "cmdArray_Leave(" & Index & ")"
End Sub
Public Sub cmdChildBtn_MouseLeave()
     Me.Caption = "cmdChildBtn"
End Sub
Public Sub picSimple_MouseLeave()
    Me.Caption = "picSimple_MouseLeave"
End Sub
Public Sub txtText_MouseLeave()
    Me.Caption = "txtText_MouseLeave"
End Sub
Public Sub picContainer_MouseLeave()
    Me.Caption = "picContainer_MouseLeave"
End Sub
Private Sub Form_Load()
    Hook Me
End Sub
Private Sub Form_Unload(Cancel As Integer)
    UnHook Me
End Sub
                        