GefRotateAnim.MinExprValue (property)

Gets and sets the minimum value used in expression based animations.
Syntax: VARIANT = object.MinExprValue
object.MinExprValue = VARIANT
Description: In expression based animations, when the expression reaches this minimum value, the object is rotated by the MinAngle.


Sub GefRotateAnim_MinExprValue()
    Dim oCimObj As GefObject
    Dim oCimRotateAnim As GefRotateAnim
    Set oCimObj = CimGetObject
    Set oCimRotateAnim = oCimObj.RotateAnim
    If Not oCimRotateAnim Is Nothing Then
        MsgBox "The minimum expression value is " & _
    End If
End Sub