alex77755

Кажется мне, что массив должен быть двумерным, а не одномерным - у точки рисунка должно быть две координаты.
А узнать цвет точки по координатам поможет свойство
C = Рисунок2.Point(X, Y)
узнать цвета можно так:
B = C 65536
G = (C - (C 65536) * 65536) 256
R = C - (C 65536) * 65536 - ((C - (C 65536) * 65536) 256) * 256
перевести цвет в HEX формат можно так
R = Hex(R)
If R = 0 Then
R = "00"
End If
G = Hex(G)
If G = 0 Then
G = "00"
End If
B = Hex(B)
If B = 0 Then
B = "00"
End If
Форма1.Метка4.Caption = "#" & R & G & B