StreamReader, StreamWriter - какая справочная библиотека мне нужна? Как заставить работать приведенный ниже код? - PullRequest
0 голосов
/ 09 мая 2020
Sub UseStreamReader ()

    Dim fileReader As System.IO.StreamReader
    fileReader =
    My.Computer.FileSystem.OpenTextFileReader("C:\\testfile.txt")
    Dim stringReader As String
    stringReader = fileReader.ReadLine()
    MsgBox("The first line of the file is " & stringReader)`enter code here`

End Sub

1 Ответ

0 голосов
/ 09 мая 2020

Это проще:

Sub UseStreamReader ()

    For Each line in File.ReadLines("C:\testfile.txt")
      MsgBox("The line of the file is " & line )
    Next line

End Sub

ReadLines читает инкрементально; если вы остановитесь до того, как он прочитает весь файл, он не прочитал файл в память. Это отличается от File.ReadAllLines, который читает все это и возвращает вам массив

Это все (включая ваш код) в пространстве имен System.IO. У вас должна быть ссылка на System (это должно быть в каждом проекте) и строка в верхней части класса, в которой написано

Imports System.IO

. Если у вас нет оператора импорта, вам придется полностью квалифицировать каждый использовать:

For Each line in System.IO.File.ReadLines...
...