OpenSTAAD V8i

Geometry.GetSurfaceCount

This function returns the number of surfaces in the currently open STAAD file.

VB Syntax

Geometry.GetSurfaceCount ()

VB Example

 Dim objOpenSTAAD As Object
 Dim lSurfaceCount as Long
'Get the application object
 Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Get Surfaces Count
 lSurfaceCount = objOpenSTAAD.GetSurfaceCount

Reference Materials

Geometry.GetSurfaceList