题库 高中信息

题干

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

Private Sub Command1_Click()
Dim a(0 To 7) As Integer
Dim i As Integer'①
a(0)=1 
For  i = 1 To 7   '②
a(i)= 2 * a(i-1)+ 1   '③
Next i
Text1.Text = Str(a(i))'④
End Sub
A.①
B.②
C.③
D.④
上一题 下一题 0.99难度 选择题 更新时间:2019-03-02 02:54:42

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