UC知道VB给数组赋值后如何在文本框Text里输出
来源：百度知道 编辑：UC知道 时间：2024/06/20 11:31:18
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
比如说数组是十个数，在文本框里输出后，这十个数在一排，每个数之间用空格分开
下面的代码是赋值，，如何利用文本框Text1按照上面的规定输出呢？请高手指点下．．．．．．．
Dim s(10) As Integer
Dim i As Integer
Randomize
For i = 0 To 9
s(i) = Int(Rnd * 100 + 10)
Next i
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
for i =0 to 9
text1.text= text1.text & s(i) & vbTab
next
zz396988160的我觉得这里使用CSTR完全没必要 因为使用了&
for i = 0 to 9
text1.text = text1.text & " " & Cstr(s(i))
next i
for i=0 to 9
text1.text=text1.text & s(i) & space(5)
next