Gets and sets the ARGB value of the color, if the Type of the GefColorFormat is gefColorRGB. | |
Syntax: | VARIANT =
object.ARGB object.ARGB = VARIANT |
Description: | When set, also sets the Type to gefColorRGB. The format of the ARGB value is &HAARRGGBB&. Where AA,RR,GG, and BB are the two digit hex values(from &h00 to &hFF) for the alpha, red, green, and blue components of the color you want. Example: Sub GefButtonFormat_ARGB() Dim oCimObj As GefObject Dim oCimBtnFmt As
GefButtonFormat Dim oCimColorFmt As
GefColorFormat Set oCimObj = CimGetObject Set oCimBtnFmt =
oCimObj.ButtonFormat If Not oCimBtnFmt Is Nothing
Then Set
oCimColorFmt = oCimBtnFmt.FaceColor If Not
oCimColorFmt Is Nothing Then oCimColorFmt.ARGB
= &H7BFF0000& 'red(50%) End
If End If End Sub |