单选题 编写如下程序：
Private Sub Command1_Click()
Dim a(3,3)As Integer
Dim s As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=i*j+i
Next j
Next i
s=0
For i=1 To 3
s=s+a(i,4-i)
Next i
Print s
End Sub
程序运行后，单击命令按钮Command1，输出结果为______。
【正确答案】 C
【答案解析】[解析] 程序中通过For循环为数组a的元素赋值，具体值如下：
a(1，1)=1+1=2，a(1，2)=2+1=3，a(1，3)=3+1=4；
a(2，1)=2+2=4，a(2，2)=4+2=6，a(2，3)=6+2=8；
a(3，1)=3+3=6，a(3，2)=6+3=9，a(3，3)=9+3=12；
程序中要计算指定数组元素的和，这几个元素为a(1，3)，a(2，2)，a(3，1)，所以s=4+6+6=16。因此本题答案为C。