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

Life is soft - evento anual de software empresarial
 
Vista:

cambio color de 1etiqueta en tiempo de ejecucion

Publicado por ivanpvisual (3 intervenciones) el 10/05/2006 11:56:54
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
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Daniel Steckler

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por Daniel Steckler (360 intervenciones) el 10/05/2006 12:15:09
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por ivanpvisual (3 intervenciones) el 10/05/2006 12:42:54
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
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por sandreo (11 intervenciones) el 10/05/2006 13:09:26
en qué quedamos, Label8 o Label9?. SÍ FUNCIONA!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por L.G.Molero (8 intervenciones) el 10/05/2006 23:16:53
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.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por L.G.Molero (8 intervenciones) el 10/05/2006 23:19:08
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.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:cambio color de 1etiqueta en tiempo de ejecucio

Publicado por L.G.Molero (8 intervenciones) el 10/05/2006 23:19:19
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.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar