单选题在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a1(4，4)，a2(4，4) For i=1 To 4 Forj=1 To 4 a1(ij)=i+j a2(i，j)=a1(i，j)+i+j Next j，i MsgBox(al(3，3)*a2(3，3)) End Sub 程序运行后，单击命令按钮，消息框输出的是( )。

A、 48
B、 72
C、 96
D、 128

【正确答案】 B

【答案解析】解析：本题考查VBA中二维数组和循环的知识。本题使用了二重循环为两个二维数组中的元素均进行了赋值，最后求两个数组元素值的积。我们只需要注意这两个数组元素在循环中被赋了什么值，当i=3，j=3时，alf3，3)=3+3=6，a2(3，3)=a1(3，3)+3+3=12，所以最后二者之积为72。