GefMoveAnimAttrib.SliderActionCondition (read-only property)

Gets the GefExecutionCondition condition that determines whether the slider action will occur.
Syntax: Set GefExecutionCondition = object.SliderActionCondition
Description: The SliderActionCondition gets and sets the execution conditions of the slider event.


Sub MoveAnimAttrib_SliderActionCondition()
    Dim oCimObj As GefObject
    Dim oCimMoveAnim As GefMoveAnim
    Dim oCimMoveAnimAttrib As GefMoveAnimAttrib
    Dim oCimExecCond As GefExecutionCondition
    Set oCimObj = CimGetObject
    Set oCimMoveAnim = oCimObj.MoveAnim
    If Not oCimMoveAnim Is Nothing Then
        Set oCimMoveAnimAttrib = oCimMoveAnim.HorizontalAttrib
        If Not oCimMoveAnimAttrib Is Nothing Then
            Set oCimExecCond = oCimMoveAnimAttrib.SliderActionCondition
            If Not oCimExecCond Is Nothing Then
                MsgBox "The expression is " & _
            End If
        End If
    End If
End Sub