[计算机类试卷]国家二级（VB）机试模拟试卷58及答案与解析.doc

1、国家二级（ VB）机试模拟试卷 58及答案与解析 一、选择题 1 对于文本框 Text1，能够获得按键的 ASCII码值的事件过程是 （ A） Text1_KeyUp （ B） Text1_KeyPress （ C） Text1_Click （ D） Text1_Change 2 命令按钮 Command1的 MouseUp事件过程结构如下： Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) End Sub 则以下叙述中错误的是 （ A） X、 Y参数表示的是

2、Command1左上角在窗体中的位置 （ B） Button参数用于确定按下的鼠标键 （ C） Shift参数用于确定是否按下了 Alt、 Ctrl或 Shift键 （ D） MouseUp表示抬起鼠标按键时触发的事件 3 通用对话框 Filter属性的作用是 （ A）设置对话框的标题 （ B）指定对话框所选择的文件名 （ C）指定对话框的打开方式 （ D）指定对话框中显示的文件类型 4 以下关于菜单的叙述中错误的是 （ A）对于同一窗体中的菜单，各菜单项的名称必须唯一 （ B）对于同一窗体中的菜单，各菜单项的标题必须唯一 （ C）菜单中各菜单项可以是控件数组元素 （ D）弹出式菜单的编辑、定

3、义在菜单编辑器中进行 5 窗体上有一个名称为 Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() For i = 3 To 1 Step -1 Sum = 0 For j = 1 To i Sum = Sum + i * j Next Next Print Sum End Sub 运行程序时，单击命令按钮，则窗体上显示的是 （ A） 1 （ B） 6 （ C） 18 （ D） 25 6 以下能够正常结束循环操作的程序段是 （ A） i = 5 Do i = i + 1 Loop Until i 0 i = i - 2 Loop （ D）

4、i = 0 Do While i 1 And j 1 Then a(i, j) = a(a(i - 1, j - 1), a(i, j - 1) + 1 Else a(i, j) = i * j End If Next Next Print a(2, 2); a(3, 3) End Sub 运行程序，单击命令按钮，窗体上显示的是 （ A） 1 3 （ B） 2 1 （ C） 2 2 （ D） 3 3 9 窗体上有一个名称为 Command1的命令按钮，并有如下程序代码： Private Sub Command1_Click() Static a a = 1: b = 2: c = 3 Call

5、 f(a, b, c) Print a; b; c End Sub Sub f(ByVal x, ByRef y, z) x = x + 1 y = y + 1 z = z + 1 End Sub 运行程序，单击命令按钮，窗体上显示的是 （ A） 1 3 3 （ B） 1 3 4 （ C） 2 3 3 （ D） 2 3 4 10 窗体上有一 个名称为 Command1的命令按钮，单击该按钮时所实现的功能 是产生 10个随机整数，然后从键盘输入一个整数，查找该数在数组中的位置。若找到，输出该数的位置；若没有找到，给出相应的提示。该命令按钮的单击事件过程如下： Private Sub Comman

6、d1_Click() Dim a(10) As Integer Dim x As Integer For i = 1 To 10 a(i) = Int(Rnd * 100) Next x = InputBox(“输入 100以内的整数： “) p = 0 For i = 1 To 10 If a(i) = x Then p = i Exit For End If Next If p = 0 Then Print “没有找到与输入数据相同的数！ “ Else Print Str(x) + “在数组中的位置是 “ + Str(p) End If End Sub 对于上述事件过程，以下叙述中正确的是

7、 （ A）本程序实际产生的随机数是 0-99 （ B）若产生的随机数中有相同数，则 p是其中最后一个数的位置 （ C）程序有错， p的初值设置不对 （ D）程序有错， InputBox函数产生的数据与 x的类型不匹配 11 窗体上有一个名称为 Command1的命令按钮，其单击事件过程如下： Private Sub Command1_Click() Dim s As Double s = 0: i = 1 Do While i a(i, j) Then y = a(i, j) Next s = s + a(i, i) Next Print x, y, s End Sub 关于以上程序，以下叙述

8、中错误的是 （ A）二维数组元素的值是不大于 99的随机整数 （ B）计算结果 x是二维数组各元素中的最大数 （ C）计算结果 y是二维数组各元素中的最小数 （ D）计算结果 s是二维数组各行第一个元素之和 13 窗体上有一个名称为 Text1的文本框，一个名称为 Command1的命令按钮。命令按钮的单击事件过程如下： Private Sub Command1_Click() Dim x1 As Integer, x2 As Integer, x3 As Integer s = Trim(Text1.Text) strLen = Len(s) For i = 1 To strLen c =

9、Mid(s, i, 1) Select Case c Case “0“ To “9“ x1 = x1 + 1 Case “A“ To “Z“ x2 = x2 + 1 Case “a“ To “z“ x3 = 3 + 1 Case Else x4 = x4 + 1 End Select Next Print “x1“; x1, “x2“; x2, “x3“; x3, “x4“; x4 End Sub 以下关于上述程序的叙述中，正确的是 （ A） s是去掉文本框中字符串末尾的空格 （ B） Select Case c有误， Case后应该是一个表达式 （ C）各 Case分支条件有误，不能用 To

10、表示字符的取值区间 （ D） x4是字符串中非字母、非数字字符的个数 14 窗体上有一个名称为 Command1的命令按钮。要求编写程序，把文件 f1.txt的内容写到文件 f2.txt中，然后将 f1.txt删除。命令按钮的单击事件过程如下： Private Sub Command1_Click() Open “c:f1.txt“ For Input As #1 Open “c:f2.txt“ For Output As #2 Do While Not EOF(2) Line Input #1, str1 Print #2, str1 Loop Close Kill “c:f1.txt“ E

11、nd Sub 该程序运行时发生错误，应该进行的修改是 （ A）打开 f1.txt应该使用 Output 方式，打开 f2.txt 应该使用 Input 方式 （ B） Not EOF(2)应该改为 Not EOF(1) （ C） Line Input应改为 Get （ D） Close语句改为 Close All 15 下列叙述中正确的是 （ A）程序执行的效率与数据的存储结构密切相关 （ B）程序执行的效率只取决于程序的控制结构 （ C）程序执行的效率只取决于所处理的数据量 （ D）以上说法均错误 16 下列与队列结构有关联的是 （ A）函数的递归调用 （ B）数组元素的引用 （ C）多重循

12、环的执行 （ D）先到先服务的作业调度 17 一个栈的初始状态为空。现将元素 1,2,3,A,B,C依次入栈，然后再依次出栈，则元素出栈的顺序是 （ A） 1,2,3,A,B,C （ B） C,B,A,1,2,3 （ C） C,B,A,3,2,1 （ D） 1,2,3,C,B,A 18 下面属于白盒测试方法的是 （ A）等价类划分法 （ B）逻辑覆盖 （ C）边界值分析法 （ D）错误推测法 19 下面对对象概念描述正确的是 （ A）对象间的通信靠消息传递 （ B）对象是名字和方法的封装体 （ C）任何对象必须有继承性 （ D）对象的多态性是指一个对象有多个操作 20 软件设计中模块划分应遵循

13、的 准则是 （ A）低内聚低耦合 （ B）高耦合高内聚 （ C）高内聚低耦合 （ D）以上说法均错误 21 下面描述中不属于数据库系统特点的是 （ A）数据共享 （ B）数据完整性 （ C）数据冗余度高 （ D）数据独立性高 22 数据库设计过程不包括 （ A）概念设计 （ B）逻辑设计 （ C）物理设计 （ D）算法设计 23 以下不合法的 VB变量名是 （ A） filename （ B） read （ C） _y （ D） e5 24 以下关于 VB的叙述中，错误的是 （ A） VB采用事件驱动的编程机 制 （ B）如果程序中有 Sub_Main过程时，则一定从该过程开始执行 （ C）工

14、程文件中包含多个窗体时，可以指定启动窗体 （ D） VB程序既可以编译执行，也可以解释执行 25 VB中，若没有显式声明变量的数据类型，则默认的类型是 （ A）整型 （ B）字符型 （ C）日期型 （ D）变体类型 26 设程序中有以下语句： MsgBox “Visual“, , “Basic“, “等级考试 “, 2 执行该语句后，显示一个信息框，以下关于该信息框的叙述中，正确的是 （ A）提示信息是 Visual （ B）提示信息是 Basic （ C）标题栏显示为 Visual （ D）标题栏显示为 “等级考试 “ 27 设有如下声明语句 Option Base 1 Dim arr(2,

15、 -1 To 5) As Integer 则数组 arr中数组元素的个数是 （ A） 10 （ B） 12 （ C） 14 （ D） 21 28 以下关于 VB对象属性的叙述中，错误的是 （ A）属性是对象的特征 （ B）对象的所有属性值都可以在属性窗口中设置 （ C）不同对象可以具有同名的属性 （ D）对象的某些属性可以在程序中设置 29 设 a = 10， b = 4， c = 5， d = 7，表达式 a b And Not c 0条件不满足，退出循环。选C）。 7 【正确答案】 D 【试题解析】 Command1_Click（）中通过嵌套循环给数组 a元素赋初值，执行完后 a（ 1,1

16、） =2， a（ 2， 2） =4， a（ 3,3） =6， a（ 4,4） =8； Call f(a, b)语句调用子函数 Sub f(x() As Integer, ByRef y As Integer)。该函数内 For循环把 a数组中一维下标和二维下标相同的元素值相加。值为 20，选 D）。 8 【正确答案】 D 【试题解析】 a是个整形的二维数组。通过 For循环给数组 a 元素赋值。 i 1 并且 j 1时执行 a(i, j) = a(a(i - 1, j - 1), a(i, j - 1) + 1语句，否则执行 a(i, j) = i * j，因此执行完第一个大循环后，数组 a中

17、的元素值分别是： a（ 1,1） = 1， a（ 1,2） = 2， a（ 1,3） = 3。以此类推，可知 a（ 2,2） =3， a（ 3,3） =3。选 D）。 9 【正确答案】 B 【试题解析】 子函数 Sub f(ByVal x, ByRef y, z)中 x值通过值传递， y， z是传引用，子函数执行后 b， c值会被加 1。而 a值维持不变。选 B）。 10 【正确答案】 A 【试题解析 】 Rnd 生成的随机数为 0-1的小数，乘以 100后取整后范围为 0-99，选 A）。 11 【正确答案】 D 【试题解析】 WhileLoop 循环。 i初值为 1，把 i值代入 i /

18、(i + 1)语句可得公式为 1/2+2/3+3/4+4/5+5/6，选 D）。 12 【正确答案】 D 【试题解析】 程序首先通过 For循环给数组 a元素赋值。取随机数函数返回的值介于 0和 1之间。乘以 100后取整介于 0和 99。故 A）正确。接下来对 x和 y赋初值（ a的第一个元素），在循环内部进行数据大小的比较，把当前比 x大 的存入x，比 y小的存入 y，循环结束后， x中存储的是最大值， y中存储的是最小值。故B）， C）对。 s中存储一维和二维下标相同的数组元素的和。选 D）。 13 【正确答案】 D 【试题解析】 Trim函数是去掉字符串前面和后面的空格， A）错。 S

19、elect Case语句的测试表达式，可以是算术表达式或字符表达式，其值应是数字或字符型， B）错。 Case语句可以是连续的范围：界 1 To 界 2 ，如： 12 To 20， C）错。 x4是排除了字符串中字母、数字字符的个数的和。选 D）。 14 【正确答案】 B 【试题解析】 Open打开文件时，可以用三种模式，即 OutPut：打开一个文件，将对该文件进行写操作； Input：打开一个文件，将对该文件进行读操作；Append：打开一个文件，将在该文件末尾追加记录。 Do While循环应该判断 1#文件的结尾，即 Do While Not EOF(1)，不是结尾的话把内容写到 2#

20、文件中。 Line Input语句为从已打开的顺序文件中读出一行并将它分配给 String变量。 Close语句后面有文件号，就关闭这个文件，否则就关闭所有打开的文件。此题中应该关闭所有的文 件。选 B）。 15 【正确答案】 A 【试题解析】 程序执行的效率与数据的存储结构、数据的逻辑结构、程序的控制结构、所处理的数据量等有关。 16 【正确答案】 D 【试题解析】 队列的修改是依先进先出的原则进行的， D正确。 17 【正确答案】 C 【试题解析】 栈的修改是按后进先出的原则进行的，所以顺序应与入栈顺序相反，故选 C。 18 【正确答案】 B 【试题解析】 白盒测试法主要有逻辑覆盖、基本路

21、径测试等。逻辑覆盖测试包括语句覆盖、路径覆盖、判定覆盖、条件覆盖、判断 -条件覆盖，选择 B。其余为黑盒测试法。 19 【正确答案】 A 【试题解析】 对象之间进行通信的构造叫做消息， A正确。多态性是指同一个操作可以是不同对象的行为， D错误。对象不一定必须有继承性， C错误。封装性是指从外面看只能看到对象的外部特征，而不知道也无须知道数据的具体结构以及实现操作， B 错误。 20 【正确答案】 C 【试题解析】 根据软件设计原理提出如下优化准则： 划分模块时，尽量做到高内聚、低耦合，保持模块相对独立性，并以此原则优化初始的软件结构。 一个模块的作用范围应在其控制 范围之内，且判定所在的模块

22、应与受其影响的模块在层次上尽量靠近。 软件结构的深度、宽度、扇入、扇出应适当。 模块的大小要适中。 C正确。 21 【正确答案】 C 【试题解析】 数据库系统的特点为高共享、低冗余、独立性高、具有完整性等，C错误。 22 【正确答案】 D 【试题解析】 数据库设计过程主要包括需求分析、概念结构设计、逻辑结构分析、数据库物理设计、数据库实施、数据库运行和维护阶段。答案为 D选项。 23 【正确答案】 C 【试题解析】 变量的命名规则是： 必须以字母开头 ，由字母、汉字、数字或下划线组成； 不能在变量名中出现句点 “.“、空格或者嵌入字符，例如！、 、 #、$、 %、 Mat(i, j)； Next j Print Next i Print Print “左上 右下对角线上的数为： “ For i = 1 To N For j= 1 To M If ? Then Print Tab(5 * j); Mat(i, j)； Next j Next i End Sub 程序结束 参考答案 第 1个？处填入： Mat(N, M) As Integer或 Mat(5, 5) As Integer 第 2个？处填入： For Input 第 3个？处填入： Input #1, Mat(i, j) 第 4个？处填入： i=j 步骤 3：调试并运行程序，关闭程序后按题目要求存盘。