RGB Wert durch Commondialog Control (VB6)

Wie kann ich die RGB Werte von Commondialog control.Color bekommen ?
Wenn ich Commondialog.color aufrufe, bekomme ich nur die Long Typ Zahl :frowning:
Ich wollte nämlich separat die R,B,G Werte haben.

Vielen Dank !

r:= farbe and $000000ff;
g:= (farbe SHR 8) and 000000ff;
b:= (farbe SHR 16) and 000000ff;