[单项选择题] 设有如下程序: Private Sub Form_Click() Dim ary(1 To 5)As Integer Dim i As Integer Dim sum As I

17 查阅

[单项选择题] 设有如下程序:

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。

计算机考试