[VBA]请问:如何求交点?

zhu1

直线之间的交点可以通过解方程来求 请问,直线和样条曲线的交点怎么求? 还有,知道X值,如何求的样条曲线上对应的y值?

yulijin608

语法

RetVal = object.IntersectWith(IntersectObject, ExtendOption)

Object

所有图形对象 (除了 Pviewport 和 PolygonMesh)
使用该方法的对象或对象集合。

IntersectObject

Object, 为输入项;
对象可以是 所有图形对象中的任一个。

ExtendOption

AcExtendOption 枚举值; 为输入项
该选项指定两个对象中是否没有、单个或两个对象延伸来得到交点。

acExtendNone	两个对象均不延伸。
acExtendThisEntity	延伸基本对象。
acExtendOtherEntity	延伸作为参数传递的对象。
acExtendBoth	延伸两个对象。

RetVal

Variant[变体] (双精度数组)
点数组为图形中对象与其它对象相交的点数组。

说明

如果两个对象不相交，则没有返回数据。用户可以要求一个或两个对象延伸相交来产生相交点。例如，在以下例图中，线1为该方法调用的基本对象，而线3作为参照传递给该方法。如果 ExtendOption 传递的是 acExtendThisEntity，则点A将作为线1在延伸后与线3相交的点返回 。如果 ExtendOption 为 acExtendOtherEntity，则不会返回数据，因为即使线3延伸了，它也与线1没有相交。

如果相交类型为 acExtendBothEntities 并且线2作为参数图元传递，则返回点B。如果 ExtendOption 为 acExtendNone 并且线2为参数图元，则无数据返回。

zhu1

谢谢yulijin608的解答.我一定按你给的函数试试. 再次表示感谢. 论坛是学习的好地方!