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 scaled by the
MaxScaleFactor. Example: Sub GefScaleAnimAttrib_MaxExprValue() Dim oCimObj As GefObject Dim oCimScaleAnim As
GefScaleAnim Dim oCimScaleAnimAttrib As
GefScaleAnimAttrib Set oCimObj = CimGetObject Set oCimScaleAnim =
oCimObj.ScaleAnim Set oCimScaleAnimAttrib =
oCimScaleAnim.HorizontalAttrib MsgBox "The maximum expression value
for the horizontal scale animation is " &
oCimScaleAnimAttrib.MaxExprValue End Sub |