Create Curve in CorelDraw with VBA macro with same length of the segments

Hi,

Maybe somebody can help me on this.

I try to create a curve with 3 or more equal segments. When I draw random curve using the "Freehand tool" I always get curve with several not equal segments.

So how can I create a curve using VBA Macro so that the curve has equal length of the segments.

I attach two pictures with curve that i have and with curve that I need to have.

Thanks.