MinFaceArea Example
Sub Example_MinFaceArea()
' This example returns the MinFaceArea for the first surface in the collection.
Dim surf As AeccSurface
Set surf = AeccApplication.ActiveProject.Surfaces.Item(0)
MsgBox "The MinFaceArea for the first surface is: " & Format(surf.MinFaceArea, "0.00"), _
vbInformation, "MinFaceArea Example"
End Sub