|
我这边要把360度分成几段曲线来画,每段的角度是通过其它参数算出来的,参数不同每段的角度也不同。但是我想把每段的的点画出来,然后再用样条曲线拟合,后面还要通过这个360度里面的样条曲线进行拉伸实体。但是现在存在的问题是通过改变参数每段的角度不一样,我也不知道该用多少个点。大家有没有什么好方法可以把样条曲线拟合进行循环。就算事先不知道它有多少个点也照样实现点的拟合。; D- N. v! z; s1 h
ReDim points(0 To 3 * (360 / (m1 * N)) / 1.8 - 1) As Double8 y- ~( h, t! i
points(i) = r * Cos((k * 1.8) * pi / 180) * 0.001
: W! I( S- m% y# Xpoints(i + 1) = r * Sin((t + k * 1.8) * pi / 180) * 0.001
5 A) N$ v# m ~6 F0 s" E! f9 Jpoints(i + 2) = 0
. P2 D8 w5 r& ^- n" g6 T: j. a; U1 Z6 U* [+ j1 a, }0 P
l
2 A" _% }3 k- }, C, m* s8 {( P7 ~: x7 @7 K
points(i) = rr * Cos((k * 1.8) * pi / 180) * 0.001
) j/ A0 Y5 k& I8 p; Xpoints(i + 1) = rr * Sin((t + k * 1.8) * pi / 180) * 0.001& l) L/ l6 G- X+ @& a
points(i + 2) = 0
* Z) d% H% }; I1 \# r$ ~8 u) F* T7 g
8 {& L8 Q! N" p9 T. `7 opointArray = points
& n% \& m3 n* X, {1 d2 E% lSet skSegment = Part.SketchManager.CreateSpline((pointArray))8 W6 M% m5 n; J/ P0 A( I8 l& f e
就像这种能不能实现拟合呀: m3 F+ y; @4 a
) D8 S( a, Q& a: W. q6 m& k! \
& o. j3 ~1 |; R6 y
/ c) U( n; a* @+ @- c( f
|
|