Example 4:
Using the For Each syntax to query each pixel of the bitmap
' Display each bitmap color For Each pix In mybmp.Pixels MsgBox "(" & pix.Column & "," & pix.Row & ")=" & pix Next