Question

我有一个交错列表保存为文本文件，我需要将该文件读入多维数组，其中标题位于第一级，其下的所有行都是第二级。

EX：

Greetings
    Hello
    How are you
    Have a great day
Needs
    Help
    I need a drink

数组（0,0）=问候语

数组（0,1）= Hello

数组（0,2）=你好吗

如何循环显示此信息并知道何时到达第二列？

Answer 1

为此使用列表而不是数组会更容易。但是，以下代码将创建一个表示您的类别的参差不齐的数组。

Dim lists As New List(Of String())
Dim currentGroup As New List(Of String)
For Each line As String In IO.File.ReadAllLines(filePath)
    If line.StartsWith(" ") Then
        currentGroup.Add(line.Trim)
    Else
        If currentGroup.Count > 0 Then lists.Add(currentGroup.ToArray)
        currentGroup = New List(Of String) From {line}
    End If
Next
If currentGroup.Count > 0 Then lists.Add(currentGroup.ToArray)
Dim myArray()() As String = lists.ToArray

将Staggerd List读入MultiDimensional Array

1 个答案: