问题
单项选择题
在窗体上画一个名称为Label1的标签，然后编写如下事件过程：
Private Sub Form_Click()
Dim arr(10,10)As Integer
Dim i As Integer,j As Integer
For i=2 To 4
For j=2 To 4
arr(i,j)=j*j
Next j
Next i
Label1.Caption=Str(arr(2,2)+arr(3,3))
End Sub
程序运行后，单击窗体，在标签中显示的内容是( )
A．12
B．13
C．14
D．15
答案
参考答案：B
解析： 程序的二重循环中将数组arr(10,10)的a(2,2)到a(4,4)之间的元素赋值。根据题意arr(2,2)、arr(3,3)的值分别为2*2=4，3*3=9，故arr(2,2)+arr(3,3)=13。函数Str将13转换为字符串输出到Label1.Caption中。