选择题第五章.docVIP

选择题第五章 第5章 1、 Dim A(-3 To 0，3)声明的数组有( A )个元素。 A．16 B．9 C．12 D．10 2、 下列语句声明的数组A有 ( A )个元素。 Option Base 1 Dim A(-2 To 2,3,4) A．60 B．48 C．100 D．120 3、 下列程序执行后的结果为( B ) Dim a(8) For i = 0 To 8 a(i) = 3 * i Next i Print a(a(2)) A．10 B．18 C．20 D．28 4、 下列程序执行后的结果为( B ) Dim a(10), b(10) As Integer n = 3 For i = 1 To 5 a(i) = i b(n) = 2 * n + i Next i Print a(n); b(n) A．13 4 B．3 11 C．1 13 D．2 33 5、 在标准模块中，定义全局数组用( D )语句。 A．Dim B．ReDi m C．Static D．Public 6、 使用Array函数给某X赋值时，X必须是（ C ）。 A．已经声明的静态数组 B．已经声明的动态数组 C．Variant类型的变量 D．整型变量 7、 执行以下程序时依次输入“1、3、5”，则输出结果为（B ）。 Dim a(4), b(4) As Integer For i = 0 To 2 a(i + 1) = Val(InputBox(请输入数据：)) b(3 - i) = a(i + 1) Next i Print b(i) A．0 B．1 C．3 D．5 8、 下列程序执行后的结果为( D ) Dim a a = Array(1, 2, 3, 4) j = 1 For i = 3 To 0 Step -1 s = s + a(i) * j j = j * 10 Next i Print s A．4321 B．12 C．34 D．1234 9、 Dim a(11 To 30)所定义的数组有( B )个元素。 A．11 B．20 C．30 D．330 10、 下列程序执行后的结果为( A ) Dim A(5, 10) As Integer For i = 1 To 5 For j = 1 To 10 A(i, j) = j - i Next j Next i Print A(A(1, 2), 4) A．3 B．4 C．5 D．6 11、 默认数组的数据类型必须是(C ) (A) Integer型 (B) Double型 (C)Variant型 (D) 任意类型 12、 数组变量的数据类型必须是( C) (A) Integer型 (B) Double型 (C)Variant型 (D) 任意类型 13、 在程序运行过程中，单击窗体时，以下程序的输出结果为(D) Private Sub Form_Click() Dim x x=Array(“Basic” ,”Pascal” ,”Foxpro” ,”Database”) Print Ucase(Mid(x(2),Len(x(2))-3)) End Sub (A) scal (B) SCAL (C)xpro (D) XPRO 14、 在窗体上添加一文本框Text1和一命令按钮Command1，然后编写以下事件过程： Option Base 1 Private Sub Command1_Click() Dim arr1(5, 5) As Integer Dim I As Integer, j As Integer For I=1 To 3 For j=2 To 4 Arr1(I, j)=I + j Next j Next I Text1.Text=arr1(2, 3) + arr1(3, 4