Создание / редактирование текстового файла через VB.NET

Как я могу кодировать алгоритм ниже в VB.NET?

Procedure logfile()
{
    if "C:textfile.txt"=exist then
        open the textfile;
    else
        create the textfile;
    end if  
    go to the end of the textfile;
    write new line in the textfile;
    save;
    close;
}
7
text-files vb.net

3 ответов

Dim FILE_NAME As String = "C:\textfile.txt"
Dim i As Integer
Dim aryText(4) As String

aryText(0) = "Mary WriteLine"
aryText(1) = "Had"
aryText(2) = "Another"
aryText(3) = "Little"
aryText(4) = "One"

Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)

For i = 0 To 4
    objWriter.WriteLine(aryText(i))
Next

objWriter.Close()
MsgBox("Text Appended to the File")

Если вы выберите второй параметр True на он будет добавлен к файлу, если он уже существует, или создать новый, если это не так.

12

Это также может быть достигнуто в одной строке:

System.IO.File.AppendAllText(filePath, "Hello World" & vbCrLf)

он создаст файл, если отсутствует, добавьте текст и закройте его снова.

см. MSDN,.Способ AppendAllText.

8

лучше всего использовать компонент, который выполняет этот тип выхода из коробки. The Блок Регистрации Приложений С Корпоративная Библиотека например. Таким образом, вы получаете гибкость, масштабируемость и не имеете разногласий с вашим файлом журнала.

чтобы ответить на ваш вопрос конкретно (извините, я не знаю VB, но перевод должен быть достаточно простым) ...

void Main()
{
    using( var fs = File.Open( @"c:\textfile.txt", FileMode.Append ) )
    {
        using( var sw = new StreamWriter( fs ) )
        {
          sw.WriteLine( "New Line" );
          sw.Close();
        }

        fs.Close();
    }
}
2