我想使用4度方程将数据存储在数组中。但我只想要一定范围内的积分。
我的范围必须为x=0,2*Q
到x=1,5*Q
,因此循环需要从x=0,2*Q
开始,到x=1,5*Q
时结束。 Q
是从文本文件读取的变量,例如9。
我使用这些数据在名为Solid Edge的3D Cad程序中绘制曲线。
问题是,数据不存储我如何知道它。它确实从我想要它开始,但在我想要的那一点上没有结束。当y
是该号码时,程序停止。但我只希望x
发生这种情况。
我的边缘版本是ST2,这个控制台应用程序需要在ST5上运行。 在实体边缘中,我使用计算出的数组来制作曲线:
Bsplinecurve2d = BsplineCurves2d.AddByPoints(order, ArraySize, dataArray)
我正在使用visual basic 2003,我知道使用更新的版本更好。但我不能。我是工程办公室的实习生,他们只有这个基本的视觉基础。 以下是我的代码中没有做我想做的事情的部分:
dim x as double
dim y as double
dim i as double
Dim listofdata As New ArrayList
For i = 0.2 To 1.5 Step 0.1
x = (i * Q)
y = (((x ^ 4) * A) + ((x ^ 3) * B) + ((x ^ 2) * C) + (x * D) + E)
listofdata.Add(x)
listofdata.Add(y)
Next
Dim dataArray() As Double
dataArray = DirectCast(listofdata.ToArray(GetType(Double)), Double())
答案 0 :(得分:0)
好的,我明白了。我的计数器在x = 1.5 * Q之前停止了。 但当我把它设为x = 1.6 * Q时,阵列在右边停止。 不知道为什么我必须这样做,但它现在有用了。