OpenSTAAD V8i

View.SelectEntitiesConnectedToSolid

Select entities as specified in type and connected with the specified Solid.

Where:

EntityType

An integer variable that holds entity type. Values may be as follows:

1 = Solid

2 = Beam

3 = Plate

4 = Solid

5 = Surface

SolidNo

A long variable that holds Solid numbers with which connected entities needs to be selected.

Dim objOpenSTAAD As Object
Dim intEntityType as Integer
Dim lSolidNo as Long
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Entities Connected to the Solid
objOpenSTAAD.View.SelectEntitiesConnectedToSolid (intEntityType, lSolidNo)