问一个cad vba的问题，求交点坐标。

yuming2004

在画面上有一个梯形，我想用vba画一条直线，如果该直线与梯形相交，那么我想求它们交点的坐标，请问用vba应该怎么编呢？思路是怎么样的？用什么方法呢？谢谢大家。

woaishuijia

求交点用对象的IntersectWith方法，返回值是一个双精度数组。如果数组下标是-1，说明没有交点；如果下标是2，说明有一个交点，数组的三个元素分别是交点的XYZ坐标；如果下标是5，则说明有两个交点，依此类推。