GefAlarmStateColorAnim.Parent (read-only property)

Gets the parent of the object.
Syntax: Set object = object.Parent
Description: The Parent property will return the container which owns this object.

Example:

Sub AlarmStateColorAnimation_Parent()
    
    Dim oCimAlmColorAnim As GefAlarmStateColorAnimation
    Dim oCimObj As GefObject
    
    Set oCimAlmColorAnim = CimGetObject.AlarmStateColorAnim
    Set oCimObj = oCimAlmColorAnim.Parent
    
    MsgBox "The parent object is " & oCimObj.Name
    
End Sub