OpenSTAAD V8i
Returns the number of selected solids.
A Long variable containing the number of solids selected.
Dim objOpenSTAAD As Object
Dim SelSolidsNo As Long
'Get the application object --
'Get no. of selected solids
SelSolidsNo = objOpenSTAAD.Geometry.GetNoOfSelectedSolids
Reference Materials