Foro de programacion

Tengo una imagen en mi formulario, con la que quiero que cuando el puntero del mouse pase sobre ella esta cambie por otra imgen.
Lo que hice fue usar el evento MouseMove de dicha imagen. Hasta ahi todo funciona bien. El problema que tengo que es que no se como hacer para que cuando el puntero salga de la imagen se vuelva a cargar la imagen original.

Desde ya, muchas gracias.

Si la imagen no ocupa todo el formulario, apoyate en el evento MouseMove del formulario y vuelve a restaurar tu imagen.

Saludos.

Este es un ejemplo que use para poder hacer el sawp de imagenes.

Option Explicit

Private Declare Function GetCapture Lib "user32" () As Long
Private Declare Function SetCapture Lib "user32" (ByVal hwnd As Long) As Long
Private Declare Function ReleaseCapture Lib "user32" () As Long

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
With Me
If GetCapture <> .hwnd Then SetCapture .hwnd
If X < 0 Or Y < 0 Or X > .ScaleWidth Or Y > .ScaleHeight Then ' fuera del form
ReleaseCapture
Debug.Print "afuera"
Else
' dentro del form
Debug.Print "adentro"
End If
End With
End Sub