OpenSTAAD V8i

Geometry.SelectSolid

This function selects a solid in the structure.

Where:

SolidNo

Long variable providing the solid number to be selected.

 Dim objOpenSTAAD As Object
 Dim SolidNo As Long
'Get the application object
 Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Select solid no 2
 SolidNo = 2
 objOpenSTAAD.Geometry.SelectSolid SolidNo