程序代码如下，当单击窗体上的Command1控件时，在窗体上输出的结

问题单项选择题

程序代码如下，当单击窗体上的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

答案

参考答案：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。