Active Example

Land Auto

previous page next page

Active Example 

Sub Example_Active()
    
    ' This example returns the Active setting for the first Project
    ' in the collection
    Dim proj As AeccProject
    Set proj = AeccApplication.Projects.Item(0)
    
    MsgBox "The Active value for the first Project in the collection is: " & proj.Active, _
        vbInformation, "Active Example"
    
End Sub

previous page start next page