Code:
Public Class Form1
Dim counter As Integer = 0
Dim MyPictures(3) As Bitmap
' OPTION ONE
Private Sub Button1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown
If e.Button = Windows.Forms.MouseButtons.Right Then
' do other stuff..
End If
If e.Button = Windows.Forms.MouseButtons.Left Then
' change picture
End If
End Sub
' OPTION TWO
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If counter > 2 Then
counter = 0
End If
Button1.BackgroundImage = MyPictures(counter)
counter = counter + 1
' and other stuff
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MyPictures(0) = New Bitmap("<filepath for 1st pic>")
MyPictures(1) = New Bitmap("<filepath for 2nd pic>")
MyPictures(2) = New Bitmap("<filepath for 3rd pic>")
End Sub
End Class
Cycles through the 3 pictures when left-clicked.
For the mouse-over / border things. Try out the "FlatAppearance" and "FlatStyle" properties of your button.
Good luck.