问题
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a(5,5) As Integer
For i=1 To 5
For j=1 To 5
a(i,j)=(i+j)*5\10
Next j
Next i
s=0
For i=1 To 5
s=s+a(i,i)
Next i
Print s
End Sub
程序运行后，单击命令按钮，输出结果是
A．15
B．13
C．11
D．9
答案
参考答案：A
解析： 本题中，变量i和变量j的取值范围均为[1，5]，在二重循环中对数组a进行了赋值；在随后的for循环中，变量s依次加上数组元素a(1，1)、a(2，2)、a(3，3)、a(4，4)、a(5，5)的值，通过计算可知本题的答案为A。