这道简单选择题怎么做呢？？高人指点啊~~~ 急。。。

31703. 运行下列程序，单击窗体后输出的结果是（ ）。
Private Sub Form_Click()
Dim a
Dim s As Integer, i As Integer
a = Array(1, 2, 3)
For i = 2 To 0 Step -1
s = s + a(i) * a(i)
Next i
Print s
End Sub
(A) 13
(B) 14
(C) 不确定
(D) 程序出错
求详细解析，麻烦各位啦！

s=3*3+2*2+1*1=14

a是variant变量，a = Array(1, 2, 3)后，a变成一个数组，a(0)=1,a(1)=2,a(2)=3

数组a(2)=3;a(1)=2;a(0)=1;
i从2开始循环
s=a(2)*a(2)
运行后i减1，i=1
s=s+a(1)*a(1)=a(2)*a(2)+a(1)*a(1)
运行后i减1，i=0
s=s+a(0)*a(0)=a(2)*a(2)+a(1)*a(1)+a(0)*a(0)
  =3*3+2*2+1*1=14
运行结果