Hi ... - Import the System.Drawing.Bitmap - Declare a new bitmap image: Dim pic As New Bitmap(filename) - Now use the pic.getpixel(x,y) method to get the A,R,G,B numbers in the image ... x & y r the coordinates for i = 0 to pic.width - 1 for j = 0 to pic.height - 2 c = pic.getpixel(x,y) 'c is a color next next - You can declare and array of colors and increment its index for color repitition in the loop the divide the total color occurances by the total colors in the image Hope It's useful ... And if u need anything else in this field don't hesitate to ask me :-D
Best Regards 3ala2 :)