API Documentation > CorelDRAW > 2025-v26 > Segment > IVGSegment
Segment.GetStartingControlPointPosition method
Returns the starting control point position
Syntax:
Sub GetStartingControlPointPosition(ByRef PositionX As Double, ByRef PositionY As Double)
Parameters:
Name Type Description
PositionX
Double
PositionY
Double
Remarks:
The GetStartingControlPointPosition method returns the position of the starting control point.
Examples:
The following VBA example creates a curve, and it sets the starting control point of the last segment to the same position as the starting control point for the second segment.
Sub Test()
Dim s As Shape, s2 As Shape
Dim sp As SubPath
Dim crv As Curve, crv2 As Curve
Dim seg As Segment, seg2 As Segment
Dim x As Double, y As Double
Set crv = CreateCurve(ActiveDocument)
ActiveDocument.ReferencePoint = cdrBottomLeft
Set sp = crv.CreateSubPath(1, 1)
sp.AppendLineSegment 1, 1
sp.AppendCurveSegment 3, 3
sp.AppendCurveSegment 5, 1
sp.AppendCurveSegment 6, 4
sp.Nodes(2).Type = cdrSmoothNode
sp.Nodes(3).Type = cdrSmoothNode
Set s = ActiveLayer.CreateCurve(crv)
Set seg = ActiveShape.Curve.Segments(2)
seg.GetStartingControlPointPosition x, y
Set seg2 = ActiveShape.Curve.Segments(ActiveShape.Curve.Segments.Count)
seg2.SetStartingControlPointPosition x, y 
End Sub