程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是( )。 Private Sub Command1_Click() Dim i As Integer,k As Integer Dim a(9) As Integ

admin2009-02-13  32

问题 程序代码如下,当单击窗体上的Command1控件时,窗体上显示的结果是(    )。    Private Sub Command1_Click()    Dim i As Integer,k As Integer    Dim a(9) As Integer,p(2)As Integer    k=5    For i=0 To 9        a(i)=i    Next i    For i=0 To 2        p(i)=a(i*(i+1))    Next i    For i=0 To 2        k=k+p(i)*2    Next i    Print k    End Sub

选项 A、20
B、21
C、22
D、23

答案2

解析 本题首先定义了两个一维数组a和p,然后通过一个For循环给a数组的元素赋值,通过赋值,使a(0)~a(9)的值分别为0~9。接着再通过一个循环给p数组的各元素赋值,赋值情况为:p(0)=a(0*1)=0:p(1)=a(1*2)=2;p(2)=a(2*3)=6。接着通过一个循环把p数组的各元素值乘以2加到变量k中,最后k的值为21。
转载请注明原文地址:https://kaotiyun.com/show/mn1p777K
0

最新回复(0)