聊天程序不会写行

Question

我正在尝试创建一个基本的局域网聊天程序，并且进展顺利，但我有一个问题。我不能让我的程序写在新的一行！每当我点击button1时，它应该将你的文字添加到聊天记录中，不知道为什么这不起作用。任何帮助都会很棒！

代码：

Using Writer As StreamWriter = New StreamWriter("\\NAS02\Justin\Rocketdrive\support\" & My.Settings.chat & ".txt")
        Writer.Write(RichTextBox1.Text)
        Writer.WriteLine(My.Settings.name & ":" & "" & TextBox1.Text)
    End Using