这道简单选择题怎么做呢??高人指点啊~~~ 急。。。
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
运行结果
--------------------编程问答-------------------- 自己就不会试试吗?什么都要问?太懒了。
补充:VB , 基础类