Label Example
Sub Example_Label()
' 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