|
我这边要把360度分成几段曲线来画,每段的角度是通过其它参数算出来的,参数不同每段的角度也不同。但是我想把每段的的点画出来,然后再用样条曲线拟合,后面还要通过这个360度里面的样条曲线进行拉伸实体。但是现在存在的问题是通过改变参数每段的角度不一样,我也不知道该用多少个点。大家有没有什么好方法可以把样条曲线拟合进行循环。就算事先不知道它有多少个点也照样实现点的拟合。
8 g$ p7 x$ o8 b8 c5 mReDim points(0 To 3 * (360 / (m1 * N)) / 1.8 - 1) As Double2 g, X* B; Z2 q, Y8 Y
points(i) = r * Cos((k * 1.8) * pi / 180) * 0.0015 m: m; B3 c3 h8 z* z9 g
points(i + 1) = r * Sin((t + k * 1.8) * pi / 180) * 0.001
N. J4 n$ b7 R0 N' @$ Lpoints(i + 2) = 0# d$ g; T, _( X2 ~
0 w& g* _9 k6 Q0 y) U- W( V
l
5 N Q& |" d7 V
e: X7 H+ x( j5 m5 ^# Qpoints(i) = rr * Cos((k * 1.8) * pi / 180) * 0.001: O5 g9 F, x& i) |% L7 y2 j% i
points(i + 1) = rr * Sin((t + k * 1.8) * pi / 180) * 0.001/ N+ C) C; i6 R2 B2 |
points(i + 2) = 0
6 n9 u9 c4 d% K& h' j+ f _. R3 j8 k# W/ }. e# j, D. ?" t# Z
pointArray = points& d" k3 j! x0 _. s2 i. G
Set skSegment = Part.SketchManager.CreateSpline((pointArray))
& V, z5 X, x4 {3 d- x+ s就像这种能不能实现拟合呀
+ a& X$ x; t5 _( d" T8 a# ^" z% \; _5 c+ Z5 i+ l
/ w; t1 _1 B6 ] x4 |7 t+ l0 D
, F4 s4 U9 {2 {; j2 v, E |
|