Problem Description:
How can I get the section dimensions of any tapered “I section” i.e. (web depth at the start, web depth at the end, width of the flange at start, width of the flange at the end …. etc) using OpenSTAAD function?
Solution:
You may use function GetSectionPropertyValuesEx
Parameter:
A sample VBA syntax:
Dim nSectionPropValuesCount As Long
Dim RetVal As Long
Dim propValues() As Double
Dim propType As Long
Dim refID As Long
Set objOpenStaad = GetObject(, "StaadPro.OpenSTAAD")
nSectionPropValuesCount = objOpenStaad.Property.GetCountofSectionPropertyValuesEx() '24 maxValue of theProperty Array.
ReDim propValues(nSectionPropValuesCount)
refID = 6
RetVal = objOpenStaad.Property.GetSectionPropertyValuesEx(refID, propType, propValues)
'0-6 index will have value F1-F7 respectively
Output: