CAD VBA求直线两点之间的中点的程序出错 求助高手来帮帮我……
其实我是想设置一个新的UCS
程序如下 坐标系的原点为ptcenter1因为一直报错我想做两个点，为X轴和Y轴中点，结果出现报错
我感觉是
TempPointUcsX1 = LineUcsX.StartPoint
TempPointUcsX2 = LineUcsX.EndPoint
XAxisPoint(0) = (TempPointUcsX1(0) + TempPointUcsX2(0)) / 2
这里有错，这是求中点， 两个线的夹角是90度应该没错。
求助高手来帮忙看看呀 555555
页:
[1]