| Name | Type | Description |
|---|---|---|
| AbsoluteOffset |
Double
|
|
| Segment | ||
| ParamOffset |
Double
|
|
| Remainder |
Double
|
Specifies the value of the remainder. |
Sub Test() Dim seg As Segment Dim t As Double If ActiveShape.Curve.Subpaths(1).FindSegmentOffset(3, seg, t) Then seg.Type = cdrLineSegment Else MsgBox "The first subpath is less than 3"" long." End If End Sub