RichTextBoxへの文字列追加はAppendText

例えば改行を追加する場合×の方だとフォント情報消えますよ。知らずにやりがちかと思われます。

'〇
RichTextBox1.AppendText(vbLf)

'×
RichTextBox1.Text &= vbLf

Before

〇を実行

×を実行