This property returns the colour of the form encoded as 32 bit integer value, where the first byte contains Red channel, the second byte - Green channel and the third byte - Blue channel.
object.Color
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISProfileForm interface |
uint
Display some information about the form, including its colour in HEX format.
Dim aForm
Dim aMessage
Set aForm = Profile.Form
aMessage = "Form Info: " & vbNewLine & vbNewLine &_
"- Caption: " & aForm.Caption & vbNewLine &_
"- ID: " & aForm.ID & vbNewLine &_
"- Name: " & aForm.Name_ & vbNewLine &_
"- TypeName: " & aForm.TypeName & vbNewLine &_
"- Color: " & HEX(aForm.Color)
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Color cannot be found.