DescriptionKeyFiles Example

DescriptionKeyFiles Example

Sub Example_DescriptionKeyFiles()

    ' This example returns the number of DescriptionKeyFiles

    ' in the current project.

    Dim proj As AeccProject

    Set proj = AeccApplication.ActiveProject

    MsgBox "The number of DescriptionKeyFiles in the current Project is: " & proj.DescriptionKeyFiles.Count _

        , vbInformation, "DescriptionKeyFiles Example"

End Sub