Returns the three color components.
Syntax: GetRGB (Color)
The three values are returned as an array or a structure.
Example:
Sub Globals
Dim Type
(R,G,B) clr
End Sub
Sub App_Start
Form1.Show
clr() = GetRGB(Form1.Color)
Msgbox("Red=" & clr.R & " Green="
& clr.G & " Blue=" & clr.B)
End Sub