寫一個.txt文件，沒有額外的線？

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，任何人都知道如何在寫入文件時不添加額外的行？寫一個.txt文件，沒有額外的線？

來源

2011-08-05 SirAudens

魔獸......有時我需要閱讀我寫的東西之前，我打了帖子。 – SirAudens

那麼你的問題就解決了嗎？投票結束（或者只是刪除問題）。 –

*不會打擾我，但它加起來，東西，只有**** – SirAudens

file.WriteLine(SourceToWrite)

WriteLine（）函數會將一個換行符附加到它的輸出。爲了避免這種情況，使用：

file.Write(SourceToWrite)

來源

2011-08-05 17:12:47 wpwall

...我想刪除此評論，但idk如何.. – SirAudens

......我不喜歡來這裏的原因之一。它可以讓我感覺真的很蠢......那麼簡單......：D好謝謝！ – SirAudens

這節省了我很多時間，謝謝！ – dhruvpatel

寫一個.txt文件，沒有額外的線？

回答

相關問題