Connector.EndPoint

Property EndPoint As SnapPoint

The EndPoint property returns or sets the ending point of the connector object. This ending point is a snap point. For example, EndPoint(5) begins the connector line at the fifth snap point of the object.

The following code example sets the reference point of the document to the lower left corner and creates a new snap point with coordinates (1, 6), one inch above and six inches to the right of the reference point. A rectangle and ellipse are created, and a connector line is drawn between them, starting at the ninth snap point of the rectangle to the first snap point of the ellipse.

Sub PointStart() 
 Dim sp as New SnapPoint 
 Dim s1 As Shape, s2 As Shape, c As Shape 
 ActiveDocument.ReferencePoint = cdrBottomLeft 
 sp.PositionX = 1 
 sp.PositionY = 6 
 Set s1 = ActiveLayer.CreateRectangle(0, 0, 3, 3) 
 Set s2 = ActiveLayer.CreateEllipse(4, 4, 6, 1) 
 Set c = ActiveLayer.CreateConnector(s1.SnapPoints(9), 
s2.SnapPoints(1)) 
 c.Connector.StartPoint = s1.SnapPoints(9) 
 c.Connector.EndPoint = s2.SnapPoints(1) 
End Sub