| Gets and sets the maximum value used in expression based animations. | |
| Syntax: | VARIANT =
object.MaxExprValue object.MaxExprValue = VARIANT |
| Description: | In expression based animations, when the
expression reaches this maximum value, the object is filled to
100%. Example: Sub FillAnim_MaxExprValue() Dim oCimObj As GefObject Dim oCimFillAnim As
GefFillAnim Set oCimObj = CimGetObject Set oCimFillAnim =
oCimObj.FillAnim If Not oCimFillAnim Is Nothing
Then oCimFillAnim.MinExprValue
= 100 oCimFillAnim.MaxExprValue
= 1000 MsgBox "The
current range for the fill animation " & _ "is
" & oCimFillAnim.MinExprValue & " to " & _ oCimFillAnim.MaxExprValue End If End Sub |