如何将（RichTextBox1.Text）添加到textfile.txt

Question

我有一个名为foodadvices.txt的文本文件我的应用程序有一个2 richtextbox和按钮 按钮作业是将rtb1中的所有文本添加到文本文件中 我的想法是将文本文件读入rtb2 所以读完textfile后的最终代码是 RichTextBox2.Text = richtextbox 1.text＆amp; richtextbox2.text

所以如果我的rt​​b1.text让我们去今天停车 rtb2让我们去电影院

点击按钮后的rtb2应为

• 让我们今天去公园

• 让我们去电影院

  然后将yhe rtb2保存到foodadvices.txt 但问题是点击按钮后rtb2不是那样的 这是

• 让我们去公园今天去电影院

Answer 1

在字符串之间添加换行符：

RichTextBox2.Text = richtextbox1.text & Environment.Newline & richtextbox2.text

如果第一个文本已经以换行符结尾，您可能希望跳过添加一个：

Dim text1 as String = richtextbox1.text
If Not test1.EndsWith(Environment.Newline) Then
  text1 = text1 & Environment.Newline
End If
RichTextBox2.Text = text1 & Environment.Newline & richtextbox2.text