| Name | Type | Description |
|---|---|---|
| PositionX |
Double
|
|
| PositionY |
Double
|
Sub Test() Dim n As Node Dim x As Double, y As Double For Each n In ActiveShape.Curve.Nodes n.GetPosition x, y ActiveLayer.CreateEllipse2 x, y, 0.05 Next n End Sub