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 originalPrivate Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.BackColor = vbRed
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
' vuelve al color original
Command1.BackColor = "&H8000000F"
End Sub