问题
单项选择题
程序代码如下，当单击窗体上的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 3For j=0 To 3 aa(i，j)=i*4+j+1Next j Next i For i=0 To 3s=s+aa(i，1) Next i Print s End Sub
A．32
B．28
C．30
D．36
答案
参考答案：A
解析： 当发生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。