跪求代码

ghy_420

我想在CAD中通过VBA代码对图元上的点采样，并且能指定采样精度。
3 k4 L6 S% Y; z2 Z% b- H
1、怎样判断图元类型？
) m& Z# [) g/ k- f5 \   不同的图元采样方法不一样，所以必须首先确定图元类型。

2、怎样读取图元的关键点坐标？
* p% z4 \0 [9 X& S1 h/ J   比如直线的关键点就是它的两个端点。

3、怎样按照指定精度得到采样点？
. V* a9 f$ _. g$ c   比如一条直线其实坐标是（0，0，0）终点坐标（10，10，10），怎样才能每隔1个长度单位取出一个点？

/ s) Z2 @; s) Y, i- g* O请大家一定帮帮我呀！工期紧呀！
4 N0 D' p& Q8 s5 ?) [0 l
+ y4 G7 F* O1 i我是新人，不知道咱们的论坛能不能送分什么的，要是能送我全送出去。