Output Example

Output Example

Sub Example_Output()

    ' This example returns the Count of Faces for the first Surface

    ' in the collection by using the Outputs property.

    Dim surf As AeccSurface

    Set surf = AeccApplication.ActiveProject.Surfaces.Item(0)

    MsgBox "The number of Faces in the first surface is: " & surf.Outputs.Faces.Count _

        , vbInformation, "Outputs Example"

End Sub