Examples:
The following VBA example selects a shape in the active document and determines if the selected shape is a curve object. If the shape is a curve, it displays the number of nodes found on the selected curve in a message box.
Sub CurveNodes()
Dim s As Shape
Dim nr As NodeRange
Set s = ActiveSelection.Shapes(1)
If s.Type = cdrCurveShape Then
MsgBox "The selected shape has " & _
s.Curve.Nodes.Count & " nodes"
End If
End Sub