OpenSTAAD V8i
Select entities as specified in type and connected with the specified Member.
Where:
An integer variable that holds entity type. Values may be as follows:
1 = Member
2 = Beam
3 = Plate
4 = Solid
5 = Surface
A long variable that holds Member numbers with which connected entities needs to be selected.
Dim objOpenSTAAD As Object
Dim intEntityType as Integer
Dim lMemberNo as Long
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Entities Connected to the Member
objOpenSTAAD.View.SelectEntitiesConnectedToMember (intEntityType, lMemberNo)