Yo tengo un code:
Recuerda poner en el Form load alguna imagen.
Y como supondrás el Mini_Off es un Dim...
Un saludo.
Código (vbnet) [Seleccionar]
Private Sub picMini_MouseEnter(sender As Object, e As EventArgs) Handles picMini.MouseEnter
sender.Image = Mini_Off
End Sub
Private Sub picMini_MouseLeave(sender As Object, e As EventArgs) Handles picMini.MouseLeave
sender.Image = Mini_On
End Sub
Recuerda poner en el Form load alguna imagen.
Código (vbnet) [Seleccionar]
Private Sub frmMain_Load(sender As Object, e As EventArgs) Handles MyBase.Load
picMini.Image = Mini_On 'Aqui se carga la que se va a mostrar por defecto
picMini.BackColor = Color.Transparent 'Por si tiene transparencias la imagen
Y como supondrás el Mini_Off es un Dim...
Código (vbnet) [Seleccionar]
Dim Mini_Off As Image = Image.FromFile(".\Art\Buttons\Mini_Off.png")
Dim Mini_On As Image = Image.FromFile(".\Art\Buttons\Mini_On.png")
Un saludo.