duda con botones en VB

[peib0l]

buenas me gustaria saber como hacer para que un boton en VB tenga un fondo determinado (si se pude claro) y todavia mas para que la imagen cambie al pasar por encima el cursor, o al presionar en el....



Gracias Salu2

[cassiani]

Hola, si se puede,

Código (vb) [Seleccionar] Expandir

Option Explicit
Dim sRuta As String

Private Sub Cmd_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Cmd.Picture = LoadPicture(sRuta & "Imagen2.jpg")
End Sub

Private Sub Form_Load()
    'La popiedad Style del CommandButton debe ser igual a 1
   
    'definimos la ruta donde se encuentran las imagenes
    sRuta = "C:\Documents and Settings\usuario\Escritorio\Imagenes\"
   
    'cargamos la imagen
    Cmd.Picture = LoadPicture(sRuta & "Imagen1.jpg")
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
     Cmd.Picture = LoadPicture(sRuta & "Imagen1.jpg")
End Sub

También puedes hacer uso de los eventos Up y Down para lo que quieres hacer.

saludos!