OpenSTAAD V8i
Show the specified members.
Where:
A long variable that holds number of members to show.
Long array variable holds the member nos, which need to be shown.
Dim objOpenSTAAD As Object
Dim lMemberNumber as Long
Dim MemberNoArray() As Long
'Get the application object
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Variables
lMemberNumber = 5
ReDim MemberNoArray(0 to 4) As Long
MemberNoArray(0) = 1
MemberNoArray(1) = 2
MemberNoArray(2) = 5
MemberNoArray(3) = 7
MemberNoArray(4) = 10
'Show Member
objOpenSTAAD.View.ShowMembers (lMemberNumber, MemberNoArray)