GefTransparencyAnim.MinValue (property)

Gets and sets the maximum value used in expression based animations.

Syntax:

VARIANT = object.MinValue
object.MinValue = VARIANT

Description:

This value sets minimum visibility level desired, when expression reaches minimum value.
minimum value for MinValue is 0 (fully invisible).

Example:

Sub TransparencyAnim_MinValue()

Dim oCimObj As GefObject

    Dim oCimTransparencyAnim As
GefTransparencyAnim

Set oCimObj = CimGetObject

    Set oCimTransparencyAnim =
oCimObj.TransparencyAnim

    If Not oCimTransparencyAnim Is
Nothing Then

        oCimTransparencyAnim.MinValue
= 0

        oCimTransparencyAnim.MaxValue
= 100

        oCimTransparencyAnim.MinExprValue
= 100

        oCimTransparencyAnim.MaxExprValue
= 1000

        MsgBox "The
current range for the transparency animation " & _

            "is
" & oCimTransparencyAnim.MinValue & " to " &
_

            oCimTransparencyAnim.MaxValue
    End If

End Sub