OpenSTAAD V8i
Returns the length of the beam
Where:
A long variable providing the beam member number for which the length is to be retrieved.
A double variable containing the length of the beam.
Dim objOpenSTAAD As Object
Dim BeamNo As Long
Dim BeamLen As Long
'Get the application object --
Set objOpenSTAAD = GetObject( , "StaadPro.OpenSTAAD")
'Get length of the beam 10
BeamNo = 10
BeamLen = objOpenSTAAD.Geometry.GetBeamLength BeamNo