我想使用 4 度方程将数据存储在数组中。但我只想要一定范围内的积分。我的范围必须是x=0,2*Q
to x=1,5*Q
,所以循环需要从 开始x=0,2*Q
并结束x=1,5*Q
。Q
是从文本文件中读取的变量,例如 9。我使用这些数据在名为 Solid Edge 的 3D Cad 程序中绘制曲线。问题是,数据不存储我如何处理它。它确实从我想要它开始,但不会在我想要它的时候结束。y
程序在那个数字时停止。但我只希望发生这种情况x
。
我的solid edge 版本是ST2,这个控制台应用程序需要在ST5 上运行。在 Solid Edge 中,我使用计算出的数组来制作曲线:
Bsplinecurve2d = BsplineCurves2d.AddByPoints(order, ArraySize, dataArray)
我正在使用visual basic 2003,我知道使用更新的版本会更好。但我不能。我是工程办公室的实习生,他们只有这个 Visual Basic 的副本。这是我的代码中没有做我想做的事情的部分:
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())