[单项选择题] 设有如下程序:
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。

![[单项选择题] 设有如下程序: Private Sub Form_Click() Dim ary(1 To 5)As Integer Dim i As Integer Dim sum As I [单项选择题] 设有如下程序: Private Sub Form_Click() Dim ary(1 To 5)As Integer Dim i As Integer Dim sum As I](http://www.mshxw.com/aiimages/31/254889.png)
