单选题
设有如下程序:
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、
26
【正确答案】
C
【答案解析】
[解析] 本题主要考查数组的基本操作。首先为数组ary的各个元素赋值,然后计算数组元素的和并保存在变量sum中。即sum=2+3+4+5+6=20。
提交答案
关闭