How to use mouse over in vb.net : Visual Basic Programming
This video demonstrates How to use Mouse Hover on Picture Box and Label
and How to Change image and font on mouse hover event using visual basic and how to set it to default on mouse leave event
OR leave a comment
If you enjoyed this video, then please subscribe to my channel
Donate / Support :
Paypal : [email protected]
OR
Wallet Address:
1) ETHÂ 0x35D8adB1B80864a55eE6503a9072bfadA1E9196D
2) Bitcoin
37pVEehBmvEJe6yiZWw2dYHRrPsPCnaFrQ
Source Code :
Public Class Form1
Private Sub FolderPic_MouseHover(sender As Object, e As EventArgs) Handles FolderPic.MouseHover
FolderPic.Image = My.Resources.Open
End Sub
Private Sub FolderPic_MouseLeave(sender As Object, e As EventArgs) Handles FolderPic.MouseLeave
FolderPic.Image = My.Resources.Close
End Sub
Private Sub BluePic_MouseHover(sender As Object, e As EventArgs) Handles BluePic.MouseHover
BluePic.Image = My.Resources.Green
End Sub
Private Sub BluePic_MouseLeave(sender As Object, e As EventArgs) Handles BluePic.MouseLeave
BluePic.Image = My.Resources.Blue
End Sub
Private Sub LockPic_MouseHover(sender As Object, e As EventArgs) Handles LockPic.MouseHover
LockPic.Image = My.Resources.Lock
End Sub
Private Sub LockPic_MouseLeave(sender As Object, e As EventArgs) Handles LockPic.MouseLeave
LockPic.Image = My.Resources.Unlock
End Sub
Private Sub Label1_MouseHover(sender As Object, e As EventArgs) Handles Label1.MouseHover
Label1.Font = New Font(“HelvLight”, 40, FontStyle.Bold)
Label1.Text = “Mouse Hover”
End Sub
Private Sub Label1_MouseLeave(sender As Object, e As EventArgs) Handles Label1.MouseLeave
Label1.Font = New Font(“HelvLight”, 15.75, FontStyle.Bold)
Label1.Text = “Mouse Leave”
End Sub
End Class
Comments are closed.