Código
Private Sub Form_Load() Image2.Picture = LoadPicture(App.Path & "\images\cerrar.gif") End Sub Private Sub Image2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Image2.Picture = LoadPicture(App.Path & "\images\cerrariluminado.gif") End Sub

Por cierto, cuanto pasas el ratón por encima se pone la otra imágen pero, cuando deja de estar el ratón encima de la imágen, ¿vuelve a la imágen principal?
Un saludo