Segments.Range

Function Range(IndexArray() As Variant) As SegmentRange

Member of Segments

The Range method returns a SegmentRange object that contains all specified segments from the collection.

This method accepts a variable number of arguments. It also accepts arrays.

The following code example converts segments 2, 3, and 4 of the selected curve to lines:

Sub Test() 
 Dim sgr As SegmentRange 
 Set sgr = ActiveShape.Curve.Segments.Range(Array(2, 3, 4)) 
 sgr.SetType cdrLineSegment 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.