Question

vb中数组输出的问题

希望把一维数组输出在同一行上，应该怎么写
譬如我想输出 123456789
于是这样写了
Private Sub Form_DblClick()
Dim i
Dim a(9) As Integer
For i = 1 To 9
a(i) = i
Next i
For i = 1 To 9
Print Tab(2 * i); a(i)
Next
End Sub
最后结果却是这样
1
2
3
……
究竟怎样才能实现同行输出啊！各大高手，恳请不吝赐教！先行谢过。

Answer 1

说的是动态数组。使用方法是
dim
a()
as
integer
redim
a(5)
上面的代码是利用动态数组定义的一个一维的大小为6的数组。
dim
a()
as
integer
redim
a(5,9)
上面的代码是利用动态数组定义的一个2维的大小为6*10的数组。

Answer 2

Private Sub Form_DblClick()
Dim i
Dim a(9) As Integer
For i = 1 To 9
a(i) = i
Next i
For i = 1 To 9
Print a(i); 或者 Print Space(2 * i); a(i);
Next
End Sub