关于richtextbox

Question

请问我怎么在richtextbox一行一行添加text,该用到什么属性或者方法，请告知

Answer 1

RichTextBox1.Text=RichTextBox1.Text & chr(10) & chr(13) & "下一行要显示的内容"

Answer 2

Private Sub Form_Load()    RichTextBox1.Text = "中国人" & vbCrLf & "网络公司"
    
    RichTextBox1.Font = "宋体"
    RichTextBox1.SelStart = 0
    RichTextBox1.SelLength = 3
    RichTextBox1.SelFontName = "宋体"
    RichTextBox1.SelFontSize = 25
    RichTextBox1.SelColor = vbBlue
    RichTextBox1.SelStart = 5
    RichTextBox1.SelLength = 4
    RichTextBox1.SelFontName = "黑体"
    RichTextBox1.SelFontSize = 18
    RichTextBox1.SelColor = vbRed
    RichTextBox1.SelLength = 0
End Sub

Answer 3

RichTextBox1.Text = RichTextBox1.Text  & "中国人" & vbCrLf & "网络公司"
RichTextBox1.Text = RichTextBox1.Text  & "dfdfd人" & vbCrLf & "sdfsdfds"

Answer 4

richtextbox.text = richtextbox.text &　ｖｂｃｒｌｆ　＆ text1.text