题库 高中信息

题干

运行如下Visual Basic程序,单击命令按钮Command1,出现如图所示的出错信息。发生"下标越界"错误时所执行的语句是(   )

Private Sub Command1_Click()
Dim a(0 To 5) As Integer
Dim i As Integer    '①
a(0) = 1   '②
For i =" 1" To 5
a(i) =" 2" * a(i-1) + 1 '③
Next i
Text1.Text = Str(a(i)) '④
End Sub
A.①B.②
C.③D.④
上一题 下一题 0.99难度 选择题 更新时间:2016-01-21 08:17:48

答案(点此获取答案解析)