理论第次练习.doc

选择题 1 用下面语句定义的数组元素个数是（ ） 。 Option Base 1 Dim Arr4(6,5) As Integer A）42 B）30 C）37 D）36 解答 该题首先通过Option Base 1语句使数组的下标从１开始，所以数组定义语句Dim Arr4(6,5) As Integer与语句Dim Arr4(1 to 6,1 to 5) As Integer等价，不难算出该数组元素个数为30。 答案 B 2 可以用来清除数组内容或对数组重新定义的语句是（） A Unload B Cls C Erase D Free 解答 数组一旦被定义，就在内存中分配了相应的存储空间，其大小是不能改变的但有时可能需要清除数组的内容或对其重新定义，这可以用 Erase 语句来实现，其格式为 Erase 数组名[, 数组名]…， 该语句用来重新初始化静态数组的元素或者释放动态数组的存储空间，其中，数组名不带括号和下标。 Unload 语句是从内存中卸载窗体或控件，当所占内存另有它用或需要重新设置窗体控件的属性值为初始值时，就有必要卸载窗体或控件，而 Cls Clear 都是 Visual Basic 中的方法。 本题正确答案为 C 3 下面能正确表示 Visual Basic 中数组 a 的元素的是（） A a[5] B a5 C a D a(5) 解答 在Visual Basic 中使用数组元素时，必须把下标放在一对紧跟在数组名之后的括号不能写其他的形式，如要表示数组 s 中下标为 5 的元素必须写成 s(5) 。 答案为 D 4 下列数组定义中错误的是：其中 n 是一个变量 A Dim a(7, 3 To 9) As String B Dim b(n) As Intege C Dim c(1, 7, 9) As Integer D ReDim(n) 解答 在使用 Dim 定义一个数组时其上下标不能为变量，而在 ReDim 中就可以使用变量来改变数组的维数 答案为 B 5 使用语句 Dim A（） As Integer 声明数组 A 之后，以下说法正确的是： A A 数组中的所有元素值为 0 B A 数组中的所有元素值不确定 C A 数组中的所有元素值为 Empty D 执行 Erase A 后 A 数组中的所有元素值为 0 解答 所谓数组就是能够保存具有数据类型的多个数值的存储空间，当声明一个数组后，在没有给它赋值前，数组中的所有元素值为0， 因此可知选项 A 是正确的，B ，C选项都是错误的，在选项 D 中出现了 Erase 语句，使用 Erase 语句将释放动态数组所占的内存空间，而题中语句 Dim A As Integer 正好是声明动态数组 A 的，所以选项 D 的说法不正确。 正确答案为 A 6 计算下列定义的语句中数组所占有的空间为（） Option Base 1 Dim sngLp(3, 2 To 5) As Single A 80 字节 B 48 字节 C 60 字节 D 96 字节 解答 首先使用了 Option Base 1 将数组的下标定位为 1，所以数组 sngLp 的定义实际是 Dim sngLp(1 To 3, 2 To 5) As Single，又因为 Single 单精度类型的所占空间为 4个字节，因此所占空间=(3-1+1)*(5-2+1)*4=48 字节。 正确答案为 B 7 有下列程序： Private Sub Command1_Click() Dim MyWeek, MyDay MyWeek=Array(Mon,Tue,Wed,Fri,Sat,Sun) MyDay= MyWeek(2) MyDay= MyWeek(4) MsgBox MyDay End Sub 程序运行后，弹出的消息窗口显示（ ） 。 A）Sat B）Tue C）Wed D）Thu 解答 由于数组下界从0开始，所以MyWeek(4)中存放的是数组中的第5个字符， 故消息窗口中显示的是Sat。 答案 A 8 程序代码如下，当单击窗体上的Command1控件时， 窗体上显示的结果是（ ）。 Option Base 1 Private Sub Command1_Click() Dim I As Integer For I=1 To 3 For j=1 To 3 X(I,j)=(I-j)*3+j Next j Next I For I=1 To 3 Print x(I,4-I) Next I End Sub A）1 5 9 B）1 4 7 C）3 5 7 D）3 6 9 解答 本题首先通