vbnet 把读取SUM文件的数据然后从第4行开始读取数据每隔3行读取1行数据直至最后一行都为0时结束将每行的7个数据存入二维数组空格符号不算

以下是一个示例代码，用于读取SUM文件的数据，并将每行的7个数据存入二维数组中。代码中使用了StreamReader类来读取文件内容，并使用Split方法将每行的数据分割为多个字符串，然后将非空格字符串转换为整数存入二维数组中。

Dim filePath As String = "C:\path\to\file.sum" ' SUM文件路径
Dim data As New List(Of List(Of Integer))() ' 二维数组

Using reader As New StreamReader(filePath)
    Dim lineCount As Integer = 0 ' 行计数器
    Dim line As String = reader.ReadLine() ' 读取第一行数据

    While line IsNot Nothing
        lineCount += 1

        If lineCount >= 4 AndAlso line.Trim() <> "0" Then ' 从第4行开始，并且最后一行不为0时继续读取数据
            Dim rowData As New List(Of Integer)() ' 存放一行数据的列表
            Dim lineData As String() = line.Split(" "c) ' 将行数据分割为字符串数组

            ' 将非空格字符串转换为整数，并添加到行数据列表中
            For Each str As String In lineData
                If str.Trim() <> "" Then
                    rowData.Add(Integer.Parse(str))
                End If
            Next

            data.Add(rowData) ' 添加一行数据到二维数组中
        End If

        line = reader.ReadLine() ' 读取下一行数据
    End While
End Using

' 输出二维数组中的数据
For Each row As List(Of Integer) In data
    For Each value As Integer In row
        Console.Write(value & " ")
    Next

    Console.WriteLine()
Next

请注意，以上代码仅提供了一个示例，你需要根据实际情况进行修改和适配