几个VB的小问题

1，怎么让text里不能输入东西 但是可以选中里面的任何文字 进行复制 就像是QQ里聊天时上面的那个聊天显示框一样

2，怎么让指定的文字显示在text里已有文字的下一行？

解答下~ 小弟没分······谢谢了！！

1. 设置Text 属性Locked=True,就不能输入文字了

2.首先设置 Text属性MultiLine=True 多行显示为真,然后假如 A="要显示的文字" ,Text1.text=text1.text & vbcrlf & A 其中 VBCRlf 是换下一行

3.在窗体上加个timer ,设置Interval 属性为200,就是0.2秒,然后

Private Sub Timer1_Timer()

Dim a as long
a = Label1.Left
If a < ME.WIDTH Then
Label1.Left = a + 200 '向右
Else
Label1.Left = 0 '这样就可以回到左面了

End If
End Sub

1，怎么让text里不能输入东西 但是可以选中里面的任何文字 进行复制 就像是QQ里聊天时上面的那个聊天显示框一样

text控件有LOCKED属性，为真是就不能输入数据了。

2，怎么让指定的文字显示在text里已有文字的下一行？

text控件多行要为真时，才可以实现这个功能。