Ver Mensaje Individual
  #2 (permalink)  
Antiguo 18/03/2009, 03:03
Avellaneda
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 3 meses
Puntos: 37
Respuesta: Efecto de Boton

Hola,

puedes hacer algo parecido en los eventos MouseMove del botón y del Form:

(La propiedad Style del boton = Graphical)

Código vb:
Ver original
  1. Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  2. Command1.BackColor = vbRed
  3. End Sub
  4.  
  5.  
  6. Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  7. ' vuelve al color original
  8. Command1.BackColor = "&H8000000F"
  9. End Sub