vb6.0 如何能让text继续写下去，而不覆盖原来的内容？

如题

例如我有一个text1，和一个command1
在text1里本来就有一段文字：你好！

现在我点击command1，在text1里会出现内容入下：
你好！
谢谢！

而不会出现：
谢谢！

“谢谢！”是在原有的文字下面加入的，不会只出现“谢谢！”

请写出代码，谢谢！
MsgBox "最好有解释啊！", vbOKCancel

Private Sub Command1_Click()
Text1.Text = Text1.Text & "谢谢！" '只要使用字符串连接,每次修改的时候保留先前的文本即可
End Sub

text1.text = text1.text & vbcrlf & "谢谢！" '这样就行,在添加新数据前在添加一个回车

Private Sub Command1_Click() c = InputBox("请输入:") Text1.Text = Text1.Text + c End Sub Private Sub Form_Load() Text1.Text = "你好！" End Sub

它会自己跳到最后一行的“谢谢abc”，而不用手动拉动垂直滚动条呢？ 下面是完整代码: Option Explicit Private Sub Command1_Click() Text1.Text = Text1.Text & vbCrlf & "谢谢！" Text1.SelStart = Len(Text1.Text) End Sub