Mira este ejemplillo:

Private Sub Label1_MouseMove(button As Integer, shift As _
Integer, x As Single, y As Single)
Label1.ForeColor = vbBlue
End Sub

Private Sub Form_MouseMove(button As Integer, shift As _
Integer, x As Single, y As Single)
Label1.ForeColor = vbBlack
End Sub

Por si tienes dudas lo he sacado de aqui:

- http://www.geocities.com/alpha_productions2/vb_code1.htm?20078#OnMouseOverScript

Y aqui otro ejemplo pero con imágenes:

- MouseOver con imágenes

Y más ejemplos:

http://www.codeguru.com/vb/controls/vb_othctrl/ocxcontrols/article.php/c7079/
http://articles.techrepublic.com.com/5100-3513-5648718.html

Un saludooo