OpenSTAAD V8i

Geometry.SelectMultipleNodes

This function selects multiple nodes in the structure.

Where:

aNodeNos

Long array variable providing the node numbers to be selected.

 Dim objOpenSTAAD As Object
 Dim NodeNos(6) As Long
'Get the application object
 Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Select nodes no 1 to 7
 For I = 0 To 6
  NodeNos(I) = I+1
 Next I
 objOpenSTAAD.Geometry.SelectMultipleNodes NodeNos