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