OpenSTAAD V8i

View.SelectMembersParallelTo

Select members parallel to the specified axis.

Where:

AxisID

A string variable that holds the Axis ID. It may have three values:

X = X-Axis

Y = Y-Axis

Z = Z-Axis

Dim objOpenSTAAD As Object
Dim strAxis as String
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
strAxis = “X”
'Select Members 
objOpenSTAAD.View.SelectMembersParallelTo (strAxis)