将2行文本文件转换为2个数组

时间:2018-03-06 11:43:16

标签: arrays vb.net text-files

我有一个文本文件,我必须转换为两个数组(每行到数组)。它有一个标题行(第1行)和值行(第2行),它看起来像这样:

    AD1|PL0|EO2|DS2|OE4...
    42|0|321|3|56...

基本上,我需要将这些行放在单独的数组中,所以如果我例如删除第一行(EO2)中的第三项,则第二行(321)中的第三项也会删除。到目前为止,我做过类似的事情:

    Public Function FillArrayList(ByVal path As String) As List(Of String)
    Dim lines As New List(Of String)

    Try
        Dim reader As New System.IO.StreamReader(path)

        While Not (reader.Peek() = -1)
            lines.Add(reader.ReadLine())
        End While

        reader.Close()
        reader.Dispose()
    Catch ex As IOException
        lines.Add(ex.ToString())
    End Try


    Return lines
End Function

这会读取文件并将行放在不同的数组中,但我不知道如何在这个中使用Split()函数,以便分割项目。

1 个答案:

答案 0 :(得分:-1)

像这样填充数组,然后就像你说的那样删除第三个条目。

由于我不得不在手机上执行此操作,因此可能会出现一些小错误。 :)

Dim lines as String = file.readlines()
Dim array2d(lines.Length, 1) As String

For l As Integer To lines.Count - 1
    Dim countEl As Integer = lines(l).split("|").Count()
    If array2d.GetLenght(1) < countEl Then
        ReDim Preserve array2d(lines.Lenght, countEl) As String
    End If
    For e As Interger To lines(l).split("|").Count - 1
        array2d(l, e) = lines(l).split("|")(e)
    Next
Next