Thank You... It worked!!!
Here is my new code to show others how I did it...
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
Dim rect As New Rectangle(0, 0, mybitmap.Width, mybitmap.Height)
Dim bmpData As...