Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: peib0l en 15 Septiembre 2008, 01:55 AM

Título: duda con botones en VB
Publicado por: peib0l en 15 Septiembre 2008, 01:55 AM
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
Título: Re: duda con botones en VB
Publicado por: cassiani en 15 Septiembre 2008, 15:43 PM
Hola, si se puede,

Código (vb) [Seleccionar]
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!  ;)