《第5章 数组和自定义类型》习题
（含第6章内容）
一、填空题
1． 在数组定义之前，可以使用语句 确定数组的下界值1。 2． 如果没有定义数组的数据类型，其缺省类型是 。 3． 数组按大小是否可变分为 和 两类。
4． 往往 循环对应一维数组的操作， 循环对应二维数组的操作。 5． 为了保留动态数组中原有的数据不丢失，可以使用带 进行动态定义。 6． 如用Array(1,2,3,4,5)给数组赋值，其数组的类型应该是 类型。 7． 用Dim A(-3 to5)语句定义的数组的元素个数是 。
8． 控件共用一个 的控件名字称控件数组，控件数组的下标也称 。 9． 建立控件数组的方法有 和 两种。 10． 建立Sub过程和Function过程的方法有 和 两种。 11． 语句可以中途退出Sub过程， 语句可以中途退出Function
过程。 12． Function过程的调用方式为 和 。 13． Sub过程的调用方式为 和 。 14． “虚实结合”的参数传弟有 和 两种形式。 15． 在通用声明中给出Option Base 1语句，则数组a包含 个元素。 Dim a(3, -2 To 1, 5) 二、选择题
1． 数组声明为Dim A(3,-2 to 2,5)，则数组A包含( )个元素。
A、200 B、120 C、75 D、60
2． VB子程序过程、函数过程的特点说明不正确的是( )。
A、 VB中有实现子程序的过程、返回结果的函数过程，用户可以选择有参数
或无参数进行设计，定义实现有参过程或无参过程
B、 VB中的子程序过程、函数过程，都可以通过“形参?>实参”，从而实现
调有环境与被调用环境中的数据交流。
C、 VB中函数过程不仅可以呈表达式的形式调用，也可以语句方式调用。 D、函数过程的返回值的类型可以是简单类型、定长字符串类型，定义是不可缺省。 3． VB语言中关于过程或函数的形参用法说明不正确的是( )。
A、 ByVal类别的形参，是按参数的值进行传递 B、 在传址调用时，实参可以是变量，也可以是常量 C、 一般调用时，所给定的实参需与形参的顺序及类型相容或相同。 D、 形参的类型可以用已知或用户已定义的类型来指定，也可以不指定。 4． 关于VB数组的使用说明不正确的是( )。
A、 固定数组通常用于存储个数范围可以确定的数据 B、 动态数组常用于存储数据类型不断变化的数据 C、 在设计数组时，其数组元素类型可以是数值类型、字符串类型或用户定义
的类型
D、 动态数组可以用Array(数据1，数据2…，数据n)对其进行初始化 5． 以下描述正确的是( )。
1
A、 过程的定义可以嵌套，但过程的调用不能嵌套 B、 过程的定义不可以嵌套，但过程的调用可以嵌套 C、 过程的定义和过程的调用可以嵌套 D、 过程的定义和过程的调用均不能嵌套 6． 下面过程语句说明合法的是(C )。
A、 Sub f1(byval n%()) B、 Sub f1(%n) as interger C、 Function f1%(f1%) D、 function f1(byval n%)
7． 在窗体上画一个命令按钮，然后编写如下代码：
Option base 1
Private sub command1_click() Dim a(10) as integer,p(3) as integer K=5
For i=1 to 10 a(i)=i next i
for i=1 to 3 p(i)=a(i*i) next i
for i=1 to 3 k=k+p(i)*2 next i print k end sub
程序运行后，单击命令按钮，输出结果是（ ） A、35 B、28 C、33 D、37 8． 阅读下面程序：
Public sub f1(n%,byval m%) N=n mod 10 M=m \\10 End sub
Private sub command_click1() Dim x%,y% X=12::y=34 Call f1(x,y) Print x,y End sub
单击命令按键运行该程序，则输出结果为（ ）
A、2 34 B、12 34 C、2 3 D、12 3 9． 下列叙述中，错误的是（C ）。
A、控件数组的每一个元素共享同样的事件过程 B、控件数组的每一个元素都有与之相关联的下标值
C、控件数组的每一个元素都有不同的Name属性作为标识
2
D、可在运行过程中删除控件数组的某个元素 10． 运行下列程序，单击窗体后输出的结果是（ B）。
Private Sub Form_Click() Dim a
Dim s As Integer, i As Integer a = Array(1, 2, 3) For i = 2 To 0 Step -1 s = s + a(i) * a(i) Next i Print s End Sub
A、13 B、14 C、不确定 D、程序出错 11． 下列语句错误的是（ B）。
A、Private a(-10 To 5) B、Dim a(N) 'N为变量 C、Dim a() As Integer D、Dim a%(10,-10 To -10) 12． 运行下列程序，单击窗体后输出的结果是（B ）。
Private Sub Form_Click() Dim a
Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6) s = 1
For i = 5 To 1 Step -2 s = s * a(i) Next i Print s End Sub
A、15 B、48 C、120 D、720 13． 窗体上有一个命令按钮Command1，编写如下事件过程：
Private Sub Command1_Click() Dim a(10) For j = 6 To 10 a(j) = j - 5 Next j
Text1.Text = a(0) + a(a(10) / a(6)) End Sub
运行时，单击按钮，Text1中显示（A ）。 A、0 B、1 C、2 D、3 14． 如下程序段中包含一个错误。
x = 4 Dim a(x)
For m = 4 To 0 Step -1 a(m) = m + 1
3