Owner Example

Land Auto

Owner Example

Sub Example_Owner
    
    ' This example returns the Label for the first FileLock in the collection.
    Dim filelock As AeccFileLock
    Set filelock = AeccApplication.ActiveProject.fileLocks.Item(0)
    
    MsgBox "The Label of the first FileLock in the collection is: " & filelock.Label _
        , vbInformation, "Label Example"
    
End Sub