[討論]如何把Pline「截彎取直」後又自動接合成一條Pline

如圖，程序如下：
(1)Break指令選取A點及B點，以截斷AB間之弧線；
(2)自動補一條AB間直線段；
(3)自動選取3條pline並join成一條Pline。

這樣的功能要用到VBA嗎？
我曾經找到將多條Pline接合的指令列：^C^CPEDITACCEPT;1;SELECT;\PEDIT;M;P;;J;1;;PEDITACCEPT;0;
但是在我的第二步驟中，指令列要如何抓取A點及B點座標值，並且補上一條Pline直線？？？
亦或必須用到LISP或VBA的判斷式才行？？？

麻煩各位大大幫忙解惑！

在Cadalyst Polyline Edit Tools In VBA找到可以增加或刪除Polyline頂點的VBA程式碼，原來它也是用逼近法求得Pline頂點的序號後，再處理的！
我無法上傳原始碼，請大家自行至連結下載……
但我自己尚未研究完成，請大家交流交流！