NumberOfPoints Example

Sub Example_NumberOfPoints()

    ' This example returns the NumberOfPoints for the first surface in the collection.

    Dim surf As AeccSurface

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

    MsgBox "The NumberOfPoints for the first surface is: " & surf.NumberOfPoints, vbInformation, "NumberOfPoints Example"

End Sub