vb.net - VB.Netを使用してテキストドキュメントの新しい行に移動する方法

Question

使用する

File.AppendAllText("c:\mytextfile.text", "This is the first line")
File.AppendAllText("c:\mytextfile.text", "This is the second line")

Enterキーを押したかのように、2行目のテキストを最初の行の下に表示するにはどうすればよいですか？このようにすると、2番目の行が最初の行のすぐ隣に配置されます。

Answer 1

使用するEnvironment.NewLine

File.AppendAllText("c:\mytextfile.text", "This is the first line")
File.AppendAllText("c:\mytextfile.text", Environment.NewLine + "This is the second line")

または、StreamWriter

Using writer As new StreamWriter("mytextfile.text", true)
    writer.WriteLine("This is the first line")
    writer.WriteLine("This is the second line")
End Using

Answer 2

この呼び出しが多数ある場合は、StringBuilderを使用する方がはるかに優れています。

Dim sb as StringBuilder = New StringBuilder()
sb.AppendLine("This is the first line")
sb.AppendLine("This is the second line")
sb.AppendLine("This is the third line")
....
' Just one call to IO subsystem
File.AppendAllText("c:\mytextfile.text", sb.ToString()) 

書き込む文字列が非常に多い場合は、すべてをメソッドでラップできます。

Private Sub AddTextLine(ByVal sb As StringBuilder, ByVal line as String)
    sb.AppendLine(line)
    If sb.Length > 100000 then
        File.AppendAllText("c:\mytextfile.text", sb.ToString()) 
        sb.Length = 0
    End If        
End Sub

Answer 3

多分：

File.AppendAllText("c:\mytextfile.text", "This is the first line")
File.AppendAllText("c:\mytextfile.text", vbCrLf & "This is the second line")

vbCrLf改行の定数です。