问题
单项选择题
设有如下程序：
Private Sub Form_Click()
Dim ary(1 To 5)As Integer
Dim i As Integer
Dim sum As Integer
For i=1 To 5
ary(i)=i+1
sum=sum+ary(i)
Next i
Print sum
End Sub
程序运行后，单击窗体，则在窗体上显示的是( )。
A．15
B．16
C．20
D．25
答案
参考答案：C
解析： 本题是一个简单的循环累加问题，在每次循环中累加i+1，即最后输出结果为2+3+4+5+6=20。