我正在为名为 Soplid Edge 的 3D CAD 程序制作控制台应用程序。有了这个应用程序,我让 Visul Basic 在 Solid Edge 中绘制曲线和线条。为了制作曲线,我计算点,将存储到数组中的内容使用 4 度方程。现在的问题。我从文本文件中读取数据。但是这个文本文件有不同曲线的多条线。我的代码读完了它们,最后一行包含了数据。我的问题:我怎样才能让我的代码读取第一行,计算点,制作曲线,然后对下一行的数据做同样的事情。
这是我想为文本文件中的每一行重复的代码:
'Dmax(Array)
Dim listofdata As New ArrayList
For x = (0.2 * QT) To ((QFACTOR + 0.1) * QT) Step (0.1 * QT)
listofdata.Add(x)
y = (((x ^ 4) * C1) + ((x ^ 3) * C2) + ((x ^ 2) * C3) + (x * C4) + C5)
listofdata.Add(y)
Next
Dim dataArray() As Double
dataArray = DirectCast(listofdata.ToArray(GetType(Double)), Double())
' Creating a Curve2d object by using the above defined points
objCurves.AddByPoints(PointCount:=14, Points:=dataArray)
这就是我阅读文件的方式:
Console.Write("Path to file:")
Dim strFileName As String
strFileName = Console.ReadLine
Dim objFS As New FileStream(strFileName, FileMode.Open, FileAccess.Read)
Dim objSR As New StreamReader(objFS)