在用VB6.0写一个小程序时遇到的问题

Question

在用VB6.0写一个元素周期表程序时，遇到了点小困难。
我昨天刚刚安装好VB6.0，以前也没学过，所以有很多东西不知道。
我想实现的功能是在一个label上点击鼠标左键,触发click事件，使程序界面下部的一个testbox变换内容。一开始我将内容直接写在点击click事件后改变的caption属性，但是因为内容很多而且换行，无法这样子实现。有没有其他的控件可以实现这样的功能呢？就是点击一个label使另一个控件的内容变成指定的内容？

Answer 1

label1_click
   text1.text="XXXXXXXXXXXXXX"

Answer 2

text1.text="XXXXXXXXXXXXXX"这样不行吗?
换行用Chr(13)
text1.text="" & "" & Char(13) & "换行了"
你想怎么动态转换?
要在文本框显示的内容是固定的吗?
文本框可以设置成显示多行的:
text1.MultiLine=True属性很多!!!!

Answer 3

textbox有多行显示功能，把MultiLine属性设成True就可以了

Answer 4

设置textbox的MultiLine和ScrollBars属性，MultiLine=True,ScrollBars=Vertical.
Private Sub Label1_Click()
Me.Text1.Text = Me.Label1.Caption
End Sub

Answer 5

不，不是这样。
比如，有label1，label2，在程序中还有一个test1。当点击label1时，触发click事件，代码如下：
Private Sub Label1_Click()
test1.text="点击label产生这些文字
元素周期表第一号元素：H
性质：&&&&
质量分数：&&&&&&
End Sub
就像这样
当点击label2时，label2中的text1.text="&&&&&&&&&&&***(&&"
在text1中显示出来如图，点击元素小方格，下方的text1显示指定内容，该怎样实现？

Answer 6

Private Sub Label1_Click() 
test1.text= "元素周期表第一号元素：H " & vbCrLf & _
            "性质：&&&&" & vbCrLf & _
            "质量分数：&&&&&&"
End Sub 你看看这个,可以的!
我试过了!
先在开发环境下设置TEXTBOX的MultiLine属性为真!不能在代码中设置!!
是我的错!