For counter As Integer = 0 To rgbValues.Length - 1 Step 4
rgbValues(counter) = hodnota_B
rgbValues(counter + 1) = hodnota_G
rgbValues(counter + 2) = hodnota_R
End If
Ale to je naposled, co radím bez toho, aby jsi projevil vlastní snahu. Jakýkoliv dotaz v podobném stylu už budu ignorovat.