Examples:
The following VBA example creates an ellipse at the position of each connection point of the active shape.
Sub Test()
Dim sp As SnapPoint
For Each sp In ActiveShape.SnapPoints
ActiveLayer.CreateEllipse2 sp.PositionX, sp.PositionY, 0.1
Next sp
End Sub
The following VBA example creates a rectangle and an ellipse, and it connects their centers with a connector line.
Sub Test()
Dim rect As Shape, ell As Shape
Dim lr As Layer
Set lr = ActiveLayer
Set rect = lr.CreateRectangle(0, 0, 3, 3)
Set ell = lr.CreateEllipse2(5, 5, 1, 1)
lr.CreateConnector rect.SnapPoints(2), ell.SnapPoints(4)
End Sub