CorelDraw VBA 求曲线上某一点的坐标

Question

CorelDraw 不熟，仅提供思路。必须具备三个前提：
Ⅰ: 已知一条曲线，可以求得其长度。
Ⅱ: 已知一条曲线，给出 x 可以求得 y（可能有多个解）。
Ⅲ: 已知一条曲线，给出曲线上一点，可以分割为两条曲线。过程：
1)假定原曲线的两个端点为A、B，描述为曲线AB。先用Ⅰ求得曲线AB的长度 L。
2)使得点 C1=A，点 C2=B
3)取 C3.x=(C1.x+C2.x)/2，用Ⅱ求得 C3.y，用Ⅲ分割出曲线C1C3，用Ⅰ求得曲线C1C3的长度 Lc。
4)如果 Abs(L/2 - Lc) < 某下限
则   C3为所求结果；
如果 Lc < L/2
则   C1=C3，重复 3)；
否则 C2=C3，重复 3)。

Answer 1

我来回答你的问题吧，昨天我遇到你一样的问题，今天全网搜下来，只发现你的贴子，于是我苦思了一下，终于发现一个可用方法
1.操作前，先选中曲线
2.代码中，取曲线的起始点坐标 及结束点坐标
3.代码创建2个任意形状（我创建的是圆形）。圆1圆心位置在曲线的起点，圆2圆心在曲线的结束点坐标
4.代码创建2个圆之间的调和，个数为曲线的长度除以《你要取得曲线长度点坐标的长度》
5.拆分调和，拆分组，第一个调和圆的圆心就是你要的坐标啦，希望采纳。

Answer 2

如果长度超过曲线长度的1/3，调和的个数多设几个，但距离要被你要取得长度整除。

Answer 3

延绅一下，角度问题只要把上一个调和圆心坐标，当前调和圆心坐标，下一个调和圆心坐标连起来就是角度了。