OpenSTAAD V8i

Geometry.GetSelectedNodes

Returns the node numbers selected in SelNodeArray variable. Call this function after GetNoOfSelectedNodes.

Where:

SelNodeArray

An Long array variable to receive the selected node numbers.

Sorted

Integer variable: 1 = return the selections in sorted order, 0 = to return in the order of selection.

 Dim objOpenSTAAD As Object
 Dim SelNodesNo As Long
 Dim SelNodes() As Long
'Get the application object --
'Get no. of selected nodes
 SelNodesNo = objOpenSTAAD.Geometry.GetNoOfSelectedNodes
'Reallocate
 ReDim SelNodes (SelNodesNo - 1) As Long
 objOpenSTAAD.Geometry.GetSelectedNodes SelNodes 1