第七章 vb理论第2次练习.docVIP

选择题 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 可以用来清除数组内容或对数组重新定义的语句是Unload B Cls C Erase D Free 解答 数组一旦被定义就在内存中分配了相应的存储空间其大小是不能改变的但有时可能需要清除数组的内容或对其重新定义这可以用 Erase 语句来实现其格式为 Erase 数组名[, 数组名]… 该语句用来重新初始化静态数组的元素或者释放动态数组的存储空间其中数组名不带括号和下标 Unload 语句是从内存中卸载窗体或控件当所占内存另有它用或需要重新设置窗体控件的属性值为初始值时就有必要卸载窗体或控件而 Cls Clear 都是 Visual Basic 中的方法本题正确答案为 C 下面能正确表示 Visual Basic 中数组 a 的元素的是 A a[5] B a5 C a D a(5) 解答 在Visual Basic 中使用数组元素时必须把下标放在一对紧跟在数组名之后的括号不能写其他的形式如要表示数组 s 中下标为 5 的元素必须写成 s(5) 答案为 D 下列数组定义中错误的是其中 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 使用语句 Dim A As Integer 声明数组 A 之后以下说法正确的是A A 数组中的所有元素值为 0 B A 数组中的所有元素值不确定 C A 数组中的所有元素值为 Empty D 执行 Erase A 后 A 数组中的所有元素值为 0 解答 所谓数组就是能够保存具有数据类型的多个数值的存储空间当声明一个数组后在没有给它赋值前数组中的所有元素值为 因此可知选项 A 是正确的B ，C选项都是错误的在选项 D 中出现了 Erase 语句使用 Erase 语句将释放动态数组所占的内存空间而题中语句 Dim A As Integer 正好是声明动态数组 A 的所以选项 D 的说法不正确正确答案为 A计算下列定义的语句中数组所占有的空间为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 有下列程序： 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 程序代码如下，当单击窗体上的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 本题首先通过一个双重For循环给一个3行3列的数组X的每个元素赋值，赋值规律是每个元素的值是它的行下标减1乘3加上列下标；然后通过一个For循环输出3个元素：X(1,3)、 X(2,2)和X