OpenSTAAD V8i
Returns the distance between the nodes as a double variable.
Where:
Long variables providing the node numbers.
(Numeric value) A double variable containing distance between the nodes.
Dim objOpenSTAAD As Object
Dim NodeNoA As Long
Dim NodeNoB As Long
Dim NodeDistance As Double
'Get the application object
'Get the distance between node 10 and 11
NodeNoA = 10
NodeNoB = 11
NodeDistance = objOpenSTAAD.Geometry.GetNodeDistance NodeNoA, NodeNoB