窗体上有一个名称为Command1的命令按钮，其单击事件过程如下：

Private Sub Command1_Click( )

Dim a,b(2,3) As Integer

a=Array(3,7,5,11,31,43,17,62,9,23,37,41)

i=0

Do While i<=UBound(a)

For j=0 To 2

For k=0 To 3

B(j,k)=a(i)

i=i+1

Next

Next

Loop

Pritn b(2,2)

End Sub

运行程序，窗体上显示的是（）。

A．43

B．17

C．37

D．23