Visual Basic - cambio color de 1etiqueta en tiempo de ejecucion

mi problema esta enque tengo una etiqueta qes una enlace a otro formulario y quiero qal pasar el raton por encima se cambie de color y cuando ya no este encima de la etiqueta se vuelva a cambiar al color inicial pero esto ultimo no sucede:

Private Sub Label9_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label9.ForeColor = &HFF&

End Sub

este es mi codigo y no me funciona.
alguiene me ayuda?? gracias

Hasta alli vas bien, ahora tienes que colocar lo mismo en el evento mousemove del form pero con el otro color claro,

O sea que al pasar el mouse por el formulario la etiqueta vuelva a su color original

perdona otra vez pero esq con este codigo al ejecitarlo no cambia a ningun color:

Private Sub Label8_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label9.ForeColor = &HFF&

End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label9.ForeColor = &H0&

End Sub

graciassssss

en qué quedamos, Label8 o Label9?. SÍ FUNCIONA!!!!!

Creo que tienes un error en la definición de Label8 y Label9, pero esta rutina camina perfectamente bien.

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbBlue
End Sub

Esta otra cuando se pone el ratón sobre la imágen.

Private Sub Label9_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbRed
End Sub

espero te sirva.

Creo que tienes un error en la definición de Label8 y Label9, pero esta rutina camina perfectamente bien.

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbBlue
End Sub

Esta otra cuando se pone el ratón sobre la imágen.

Private Sub Label9_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbRed
End Sub

espero te sirva.

Creo que tienes un error en la definición de Label8 y Label9, pero esta rutina camina perfectamente bien.

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbBlue
End Sub

Esta otra cuando se pone el ratón sobre la imágen.

Private Sub Label9_MouseMove(Button As Integer, Shift As Integer, _
X As Single, y As Single)
Label9.ForeColor = vbRed
End Sub

espero te sirva.