程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是( )。 Private Sub Command1_Click() Dim aa(3,3)As Integer Dim i As Integer,j As In

admin2009-02-13  39

问题 程序代码如下,当单击窗体上的Command1控件时,在窗体上输出的结果是(    )。    Private Sub Command1_Click()    Dim aa(3,3)As Integer    Dim i As Integer,j As Integer    Dim s As Integer    For i=0 To 3       For j=0 To 3         aa(i,j)=i*4+j+1       Next j    Next i    For i=0 To 3       s=s+aa(i,1)    Next i    Print s    End Sub

选项 A、32
B、28
C、30
D、36

答案1

解析 当发生Command1_click事件时,将定义一个4行4列的数组aa (数组下标从0开始),然后通过一个两层For循环给它的各个元素赋值,赋值规律是给每一个元素赋它的行下标值乘以4,再加上列下标值再加1。然后通过一个For循环把数组元素 aa(0,1)、aa(1,1)、aa(2,1)和aa(3,1)的值2、6、10、14加到s中,s的值为32。
转载请注明原文地址:https://jikaoti.com/ti/Pvq0FFFM
0

最新回复(0)