OpenSTAAD V8i
Gets all primary load case numbers.
Where:
A long array which stores the load case numbers for all the primary load cases present in the current structure.
Dim lPrimaryLoadCaseCount as Long
Dim lPrimaryLoadCaseNumbersArray() as Long
'Get the application object --
'Get Primary Load Case Count
lPrimaryLoadCaseCount = objOpenSTAAD.Load.GetPrimaryLoadCaseCount
ReDim lPrimaryLoadCaseNumbersArray (lPrimaryLoadCaseCount)
'Get Primary Load Case Numbers
objOpenSTAAD.Load.GetPrimaryLoadCaseNumbers lPrimaryLoadCaseNumbersArray