GefButtonFormat.ColorAnimate (property)

Gets and sets whether the face or the text of the button is animated by color animation.
Syntax: GefColorButtonEnum = object.ColorAnimate
object.ColorAnimate = GefColorButtonEnum
Description: The ColorAnimate property changes whether the face or the text of the button has color animation.

Example:

Sub ButtonFormat_ColorAnimate()
    
    Dim oCimBtnFmt As GefButtonFormat
    
    Set oCimBtnFmt = CimGetObject.ButtonFormat
    
    Select Case oCimBtnFmt.ColorAnimate
        Case gefColorButtonFace
            MsgBox "The button face is set to animate"
        Case gefColorButtonMixed
            MsgBox "The button is in a mixed animation state"
        Case gefColorButtonText
            MsgBox "The button text is set to animate"
    End Select
    
End Sub