题目

有如下程序： Private Sub Command1_Click()   Dim a(5) as Integer   Dim n as Integer, i as Integer   n = Val(Text1.Text)   i = 0   a(1) = 1   a(2) = 1   For i = 3 To n     a(i) = a(i-1) + a(i-2)   Next i   Label1.Caption = a(i) End Sub 若在Text1中输入5，则点击按钮后的运行结果为（  ） A . Label1中输出5 B . Label1中输出10 C . 报“下标越界”错误 D . Label1中无内容 答案：C

查看本题答案和解析