换行的问题……

Question

这是做的一个简单的列表框控件~~但form2换行的时候出了点小问题……请帮忙看下
这是form1的
Public strA, strB, strC As String
Private Sub Command1_Click()
Form2.Show
End Sub
Private Sub Command2_Click()
End
End SubPrivate Sub List1_Click()
If List1.Selected(0) = True Then
strA = List1.List(0)
ElseIf List1.Selected(1) = True Then
strA = List1.List(1)
ElseIf List1.Selected(2) = True Then
strA = List1.List(2)
End If
End Sub
Private Sub List2_Click()
If List2.Selected(0) = True Then
strB = List2.List(0)
ElseIf List2.Selected(1) = True Then
strB = List2.List(1)
ElseIf List2.Selected(2) = True Then
strB = List2.List(2)
End If
End Sub
Private Sub List3_Click()
If List3.Selected(0) = True Then
strC = List3.List(0)
ElseIf List3.Selected(1) = True Then
strC = List3.List(1)
ElseIf List3.Selected(2) = True Then
strC = List3.List(2)
End If
End Sub
这是form2的
Private Sub Form_Load()
Text1.Text = "你喜欢的水果是：" & Form1.strA & vbCrLf _
& "你喜欢的饮料是：" & Form1.strB & vbCrLf _
& "你喜欢的运动是：" & Form1.strC & vbCrLf
End Subvbcrlf _不是换行吗~可为什么不行……

Answer 1

检查一下Text1的属性,里面有个MultiLine是否设置为true.
vb换行也可以用vbnewline

Answer 2

scrollbars = 3 of 2
MultiLine=true

Answer 3

楼上都对,我接分.顺便说一句: 
Public strA, strB, strC As String 
这样的写法在VB里面只定义了最后一个strC为字符串变量,前面两个都是无类型的,要分开写.
还有阿,如果FORM2只是显示这几个"喜欢的水果"的话,大可不要这个FORM2,
只要在FORM1的按钮事件里面写:
MSGBOX "你喜欢的水果是：" & Form1.strA & vbCrLf _ 
& "你喜欢的饮料是：" & Form1.strB & vbCrLf _ 
& "你喜欢的运动是：" & Form1.strC & vbCrLf 
就可以了,并且显示回车无误

Answer 4

[Quote=引用 4 楼 WallesCai 的回复:]
Public strA, strB, strC As String 
这样的写法在VB里面只定义了最后一个strC为字符串变量,前面两个都是无类型的,要分开写.我试过了~好象不用分开也行吧~…

Answer 5

Public strA As String, strB As String, strC As String