Чтение / сортировка файла с использованием VB.Net - PullRequest
0 голосов
/ 01 октября 2019

У меня есть проект для чтения и сортировки файла:

1234562343243489897654,876546322348976549876543,8974323467890965323667490965436654 2345675432345678996525,457843984164457832445546,6356454464466. ,,.

Я использую VB.Net, я хочу прочитать этот файл, извлечь несколько цифр из каждой строки в соответствии с определенными условиями (например, извлечь последние / первые 17 цифр из каждой строки). Я прочитал файл, используя system.io.file.readalllines. Пожалуйста, помогите мне извлечь цифры и отсортировать.

мой код

Dim alllines As String = "/Path"
Dim Lines = File.ReadAllLines(alllines)
Dim newline As String = ""

For Each line In Lines
    newline = line.Substring(0, 17)
    Richtextbox1.Text=Richtextbox1.Text + newline
Next

, но вывод показывает подстроку только из последней строки ..

Ответы [ 2 ]

0 голосов
/ 01 октября 2019

это ваш код:

Dim allLines = System.IO.File.ReadAllLines("myFilePath")
Dim lines(allLines.Length - 1) As String
For i = 0 To lines.Length - 1
    lines(i) = allLines(i).Substring(0, 17)
Next
System.Array.Sort(lines)
0 голосов
/ 01 октября 2019

это ваш код

    Dim MyFile As String = PathToFileString
    Dim Lines = File.ReadAllLines(MyFile)
    Dim newLines As ArrayList = New ArrayList()
    Dim newLine As String = ""

    For Each line In Lines
        newLine = line.Substring(line.Length - 17, 17)
        newLines.Add(newLine)
    Next

    newLines.Sort()
...