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

题干

运行如下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(6)) '④
End Sub

A．①

B．②

C．③

D．④

上一题下一题 0.99难度选择题更新时间:2019-04-21 10:37:12

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

同类题1

以下合法的变量名是（）

同类题2

在VB语句dim s(9) as integer中，数组s的变量个数和类型是：

C．9 单精度型

D．10 单精度型

同类题3

下列关于VB中数组的叙述，错误的是（）

A．数组是一种基本数据类型

B．数组是一组相同类型的变量集合

C．数组中的元素的个数可以计算出来

D．数组元素的引用形式为“数组名(下标)”

同类题4

在VB中，下列选项属于字符串型数据的是（）

同类题5

下面的程序代码是通过函数求出二个整数型变量a、b中的较大值，其中所定义的函数名是（）
Function max(a, b As Integer) As Integer
If a > b Then max = a Else max = b
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer, s as integer
a =" Val(Text1.Text):" b = Val(Text2.Text)
s =" max(a," b)
Text3.Text = s
End Sub

A．Command1_Click

D．max(a, b As Integer)

相关知识点