openstaad .. syntax problem

Am not able to get the node distance of between two nodes .. am a basic level programmer.. pls clarify if I have made a mistake here

Public Sub node()

Dim NodeDistance As Long
Dim NodeNoA As Long
Dim NodeNoB As Long

Set objOpenSTAAD = GetObject(, "StaadPro.OpenSTAAD")

NodeNoA = 498
NodeNoB = 665

objOpenSTAAD.Geometry.GetNodeDistance NodeNoA, NodeNoB

Cells(1, 8) = NodeDistance

End Sub