想问问关于直线的问题

holic536

俺学VBA还没入门，想问问关于直线的问题，请不吝赐教！

1.通过getpoint鼠标拾取一个点后，如何判断此点是否在某条线段上？（或者,如何用鼠标拾取某条直线？）

2.如何判断两条线段的位置关系（相交or平行），若平行，如何得到此平行距离？

不知道我表达清楚了没有

谢谢各位了

fjfhgdwfn

完全是数学问题，看看书就是了。

xinghesnak

1.说实话，前面和后面的要求是不一样的。。如果是后者，就用selection选择一下就行，如果是前者就用IntersectWith属性

2。 同样用IntersectWith判断是不是平行。假如平行，就在直线上随便取一点（例如端点）量一下点到直线的距离就行了