例题2：下列程序的执行结果是_____。
Dim a(5) As String
Dim b As Integer
Dim I As Integer
For I =0 To 5
a(I)=I+1
Print a(I)
Next I
a) 123456
b) 6
c) 654321
d) 0
例题3．当发生Command1_Click事件，以下程序的输出结果是________。
Private Sub Command1_Click()
Dim i As Integer
Dim a(10) As Integer
For i=9 To 0 Step -1
a(i)=10-i
Next i
Print a(2);a(5);a(8)
End Sub
A) 2 5 8 B) 7 4 1 C) 85 2 D) 3 6 9
4．下列程序的功能是对一个具有二十个元素的一维数组a按每行5个元素输出，请在下划线处填上适当的内容。
Option Base 1
Private Sub Command1_Click()
DimA(20) As Integer
Fori=1 To 20
A(i)=i*i/2
Nexti
Fori=1 To 20
PrintA(i),
If【 】Then
Print
EndIf
Nexti
End Sub
5. Dim M(2) As Integer
For I=1 To 2
M(I)=0
Next I
k=2
For I=1 To k
For J=1 To k
M(J)=M(I)+1
Print M(k)
Next J
NextI

2.这个题没有正确答案，正确的结果应该是：
1
2
3
4
5
6
没错，一行一个数字
运行过程如下：i从0到5循环，每次循环将i+1的值赋给数组元素a(i)，然后输出数组元素的值并换行
3.程序对数组a的部分元素（下标范围0~9）赋值，公式为a(i)=10-i，即a(2)=8，a(5)=5，a(8)=2，输出时数字之间由空格隔开（正确选项少了空格）
4.这题代码严重缺空格啊……
每行5个数，意思就是当i是5的倍数时进行换行，答案为i Mod 5=0
5.从k=2开始是有执行效果的代码，一共进行了4次循环：
第一次，i=1，j=1，M(1)=M(1)+1，M(1)变成1，输出M(2)，为0
第二次，i=1，j=2，M(2)=M(1)+1，M(2)变成1，输出M(2)，为1
第三次，i=2，j=1，M(1)=M(2)+1，M(1)变成2，输出M(2)，为1
第四次，i=2，j=2，M(2)=M(2)+1，M(2)变成2，输出M(2)，为2