设有如下程序: Private Sub Form_Click() Dim ary(1 To 5)As Integer Dim i As Integer Dim sum As Integer For i=1 To 5

admin2011-10-24  35

问题 设有如下程序:
  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(j)=i+1
        sum=sum+ary(i)
        Next 1
        Print sum
    Eud Sub
    程序运行后,单击窗体,则在窗体上显示的是

选项 A、15
B、16
C、20
D、25

答案C

解析 i=1时,ary(1)=1+1=2,sum=O+2=2,i=2时,ary(2)=2+1=3,sum=2+3=5,i=3时,ary(3)=3+1=4,sum=5+4=9,i=4时,ary(4)=4+1=5,sum=9+5=14,i=5时,ary(5)=5+1=6,sum=14+6=20。因此本题答案为C)。
转载请注明原文地址:https://jikaoti.com/ti/AHO0FFFM
0

最新回复(0)