单项选择题
在窗体上画两个命令按钮，名称分别为Command1、Command2，并编写如下程序
Const n=5,m=4
Dim a(m,n)
Private Sub Command1_Click()
k=1
For i=1 To m
Forj=1 To n
a(i,j)=k
k=k+1
Next j
Next i
End Sub
Private Sub Command2_Click()
summ=0
For i=1 Tom
For j=1 To n
If i=1 Or i=m Then
summ=summ+a(i,j)
Else
If j=1 Or j=n Then
summ=summ+a(i,j)
End If
End If
Next j
Next i
Print summ
End Sub
过程Command1 Click()的作用是在二锥数组a中存放—个m行n列的矩阵；过程Command2 Click()的作用是（）。
A．计算矩阵外围一圈元素的累加和
B．计算矩外围一圈以外的所有元素的累加和
C．计算矩阵第1列和最后—列元素的累加和
D．计算矩阵第1行和最后—行元素的累加和