GefExprListAnimElement.Text (property)

Gets the text string that will be for the object.

Syntax:

String = object.Text
object.Text = String

Description:

The Text property sets the text for the text animation.

Example:

Sub ExprListAnimElement_AnimatesText()

    Dim oCimExprListAnim As
GefExprListAnim

    Dim oCimExprListAnimElmt As
GefExprListAnimElement

    Set oCimExprListAnim =
CimGetObject.ExprListAnim

    Set oCimExprListAnimElmt =
oCimExprListAnim.Add

    If Not oCimExprListAnimElmt Is
Nothing Then

        oCimExprListAnimElmt.Expression
= "1"

        oCimExprListAnimElmt.AnimatesText
= "1"

        oCimExprListAnimElmt.Text
= "Animated text"

    End If
    CimGetScreen.Refresh False

End Sub