VB给数组赋值后如何在文本框Text里输出

Question

VB给数组赋值后如何在文本框Text里输出？
比如说数组是十个数，在文本框里输出后，这十个数在一排，每个数之间用空格分开

下面的代码是赋值，，如何利用文本框Text1按照上面的规定输出呢？请高手指点下．．．．．．．
Dim s(10) As Integer
Dim i As Integer
Randomize
For i = 0 To 9
s(i) = Int(Rnd * 100 + 10)
Next i

Answer 1

Private Sub Command1_Click()
Text1.Text = ""
Dim s(10) As Integer
Dim i As Integer
Randomize
For i = 0 To 9
s(i) = Int(Rnd * 100 + 10)
Text1.Text = Text1.Text & s(i) & " "
Next i
End Sub本回答被提问者采纳

Answer 2

for i = 0 to 9
text1.text = text1.text & " " & Cstr(s(i))
next i

Answer 3

for i =0 to 9
text1.text= text1.text & s(i) & vbTab
next

zz396988160的我觉得这里使用CSTR完全没必要 因为使用了&

Answer 4

for i=0 to 9
text1.text=text1.text & s(i) & space(5)
next