GefLinkFormat.LinkObjectName (property)

Gets and sets the name of link source object.
Syntax: VARIANT = object.LinkObjectName
object.LinkObjectName = VARIANT
Description: The LinkObjectName property holds the name of the source object.
If the LinkObjectName is blank then the object is not found on the source screen.

Example:

Sub LinkFormat_LinkObjectName()
    
    Dim oCimObj As GefObject
    Dim oCimLnkObj As GefLinkFormat
    
    Set oCimObj = CimGetObject
    Set oCimLnkObj = oCimObj.LinkFormat
    
    MsgBox "The source screen is " & oCimLnkObj.LinkObjectName
    
End Sub