Draw region and fill the closed regions with a color

[opus]

OK, so use two For next loop's to get each pixel of your PictureBox1,
change the pixel-value to the coordinate value (you got the code in the old threat) and save those values along with the colorvalue of that picture!
Something like:

For i=1 to PictureBox1.ScaleWidth
   For j=1 to PictureBox1.ScaleHeight
      'Change i to Longitude
      'Change j o Latitude
      ColorValue=PictureBox.Point(i,j)
      'Write Latitude, Longitude, Color to your file
   Next j
Next i

The actual coding should be no problem now

BTW : You didn't expect me to do all of your work, didn't you