vb：怎么让text里的内容倒着追加

来源：百度知道 编辑：UC知道 时间：2024/06/14 05:00:54
要做一个窗体，上面有text1和text2两个文本框，一个按钮。现在让它实现这个效果：在text1里输入1，点按钮后 text2显示text1中输入的内容。当再一次在text1中输入2时。让text2里还显保留之前输入的1，并换行在1下面显示2,当输入的字符的行数超过text2的高度时，之前输入的内容会向上移动一行！请高手帮忙也下代码！

你要的是不是这样的效果啊
Private Sub Command1_Click()
If Text2.Text = "" Then
Text2.Text = Text1.Text
Else
Text2.SelStart = Len(Text2.Text)
Text2.SelText = vbCrLf & Text1.Text
End If
End Sub

补充：别忘了把Text2的MultiLine属性设为True