Написание .txt файла без лишней строки? - PullRequest
Новая
       6

Написание .txt файла без лишней строки?

2 голосов
/ 05 августа 2011 
Public Sub WriteTextFile(ByVal SourceToWrite As String, ByVal LocationToWrite As String)
    Dim file As System.IO.StreamWriter
    IO.File.Delete(LocationToWrite)
    file = My.Computer.FileSystem.OpenTextFileWriter(LocationToWrite, True)
    file.WriteLine(SourceToWrite)
    file.Close()
End Sub

Это модуль, который я сделал для записи в файл .txt. Каждый раз он добавляет новую строку с нулевым значением. не очень-то меня беспокоит, но он добавляет, но тогда что-то, что должно иметь всего 3 строки, со временем заканчивается 5000, кто-нибудь знает, как не добавить эту дополнительную строку при записи файла?

1 Ответ

7 голосов
/ 05 августа 2011 
file.WriteLine(SourceToWrite)

Функция WriteLine () добавляет символ новой строки к своему выводу. Чтобы избежать этого, используйте: 

file.Write(SourceToWrite)
...