VB单选题(第5章).doc

315 用语句Dim A (-3 To 5) As Integer定义的数组的元素个数是(). A) 6 B) 7 C) 8 D) 9 答案 D 316 若有数组说明语句为:Dim a(-3 to 8),则数组a包含元素的个数是(). A) 5 B) 8 C) 11 D) 12 答案 D 317 以下属于合法的数组元素是(). A) x8 B) x[A] C) x(3) D) x{6} 答案 C 318 若有数组说明语句为:Dim a(10),则数组a包含元素的个数是(). A) 10 B) 11 C) 8 D) 12 答案 B 319 如果TAB函数的参数小于1,则打印位置在第()列. A) 0 B) 1 C) 2 D) 3 答案 B 320 为了防止用户随意将光标置于控件上,应(). A) 将控件的TABINDEX属性设置为0 B) 将控件的TABSTOP属性设置为TRUE C) 将控件的TABSTOP属性设置为FALSE D) 将控件的ENABLED属性设置为FALSE 答案 D 321 如果要设置窗体的标题栏,应选择以下那种属性(). A) Name B) Caption C) Tips D) Text 答案 B 322 可以惟一标识控件数组中的每一个控件属性的是 A) Name B) Caption C) Index D) Enabled 答案 C 323 有以下的语句: Option Base 1 Dim xscj(3,4,5) As String 声明的数组xscj有 个数组元素. A) 120 B) 20 C) 12 D) 60 答案 D 324 下面程序段输出的结果是 Private Sub Command1_Click() Dim a(1 To 3, 4) As Integer Print LBound(a, 1), UBound(a, 1), LBound(a, 2), UBound(a, 2) End Sub A) 1 3 0 4 B) 0 3 1 4 C) 1 3 1 4 D) 0 3 0 4 答案 A 325 设执行以下程序段时依次输入11、33、55,执行结果为 Dim a(4) As Integer, b(4) As Integer For K = 0 To 2 a(K + 1) = Val(InputBox(请输入数据)) b(3 - K) = a(K + 1) Next K Print b(K) A) 11 B) 33 C) 55 D) 0 答案 A 326 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a As Variant a = Array(1, 2, 3, 4, 5) Sum = 0 For i = 1 To 5 Sum = Sum + a(i) Next i x = Sum / 5 For i = 1 To 5 If a(i) x Then Print a(i); Next i End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是 A) 1 2 B) 1 2 3 C) 3 4 5 D) 4 5 答案 D 327 有以下程序: Option Base 1 Dim arr() As Integer Private Sub Form_Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr(i,j)=i*10+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=10*j+5 Next j Print arr(3,2);arr(3,4) End Sub 程序运行后,单击窗体,输出结果为 A) 0 22 B) 31 35 C) 32 45 D) 0 0 答案 C 328 要分配存放如下方阵的数据： 1.1 2.2 3.3 4.4 5.5 6.6 7.7 8.8 9.9 数组声明语句能实现（不能浪费空间）的是 A) Dim a(9) As Single B) Dim a(3,3) As Single C) Dim a (-1 To 1,-5 To -3) As Single D) Dim a (-3 To 1,-5 To 7) As Integer 答案 C 329 如下数组声明语句:Dim a(3,-2 To 2,5),则数组a