例:Dim iA(1 To 10) As Integer
For i=1 To 10
A(i)=0
Next i
利用Array函数
例:Dim a As Variant, b As Variant, i%
a = Array (1,2,3,4,5)
b = Array (”abc”,"def”,"67")
For i=0 To Ubound (a)
Picture1。print a(i);"”;
Next i
For i=0 To Ubound (b)
Picture1。print b(i);”";
Next i
数组的输入
通过InputBox函数输入适合输入少量数据
例:Dim sB(3,4) As singer
For i=0 To 3
For j=0 To 4
SB(i,j) =InputBox(”输入" & i & j & ”的值")
Next j
Next i