NodeRange.Add

Sub Add(Node As Node)

Member of NodeRange

The Add method places a specified node in a NodeRange object

Adding a node to a node range doesn’t make that node active within a curve — it merely includes the node in future references to the node range.

The following code example creates a node range containing the first, second, and third nodes of the curve. A fifth node is added to the curve, and then all four nodes are deleted from the curve.

Sub Test() 
 Dim nr As NodeRange 
 Set nr = ActiveShape.Curve.Nodes.Range(1, 2, 3) 
 nr.Add ActiveShape.Curve.Nodes(5) 
 nr.Delete 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.