1、国家二级（ VB）机试模拟试卷 37及答案与解析 一、选择题 1 有如下数据定义语句： Dim X， Y As Integer 以上语句表明 ( )。 （ A） X、 Y均是整型变量 （ B） X是整型变量， Y是变体类型变量 （ C） X是变体类型变量， Y是整型变量 （ D） X是整型变量， Y是字符型变量 2 以下关于控件数组的叙述中，正确的是 ( )。 （ A）数组中各个控件具有相同的名称 （ B）数组中可包含不同类型的控件 （ C）数组中各个控件具有相同的 Index 属性值 （ D）数组元素不同，可以响应的事件 也不同 3 以下关于 VB文件的叙述中，错误的是 ( )。 （ A）标
2、准模块文件不属于任何一个窗体 （ B）工程文件的扩展名为 .frm （ C）一个工程只有一个工程文件 （ D）一个工程可以有多个窗体文件 4 设 x为一整型变量，且情况语句的开始为： Select Case x，则不符合语法规则的Case子句是 ( )。 （ A） Case Is20 （ B） Case 1 To 10 （ C） Case 050， Int(a3)， a Mod 2) 当 a 52时， x的值是 ( )。 （ A） 0 （ B） 1 （ C） 17 （ D） 18 6 以下叙述中错误的是 ( )。 （ A） Sub Main 是定义在标准模块中的特定过程 （ B）一个工程中只能
3、有一个 Sub Main过程 （ C） Sub Main 过程不能有返回值 （ D）当工程中含有 Sub Main过程时，工程执行时一定最先执行该过程 7 关于随机文件，以下叙述中错误的是 ( )。 （ A）使用随机文件能节约空间 （ B）随机文件记录中，每个字段 的长度是固定的 （ C）随机文件中，每个记录的长度相等 （ D）随机文件的每个记录都有一个记录号 8 在名称为 Frame1的框架中，有两个名称分别为 op1、 op2的单选按钮，标题分别为 “单程 “、 “往返 “，如图所示。 以下叙述中，正确的是 ( )。 （ A）若仅把 Frame1的 Enabled属性设为 False，则
4、op1、 op2仍可用 （ B）对于上图， op1.Value的值为 True （ C）对于上图，执行 Op1.Value False命令，则 “往返 “单选按钮被选中 （ D）对于上图，执行 Op1.Value 0命令，程序出错 9 以下能够设置控件焦点的方法是 ( )。 （ A） SetFocus （ B） GotFocus （ C） LostFocus （ D） TabStop 10 使用 Line控件在窗体上画一条从 (0,0)到 (600,700)的直线，则其相应属性的值应是 ( )。 （ A） X1 0， X2 600， Y1 0， Y2 700 （ B） Y1 0， Y2 600
5、， X1 0， X2 700 （ C） X1 0， X2 0， Y1 600， Y2 700 （ D） Y1 0， Y2 0， X1 600， X2 700 11 窗体上有一个名称为 CD1的通用对话框，一个名称为 Command1的命令按钮，相应的事件过程如下： Private Sub Command1_Click() CD1.Filter “All File|*.*|Text File|*.txt|PPT|*.ppt“ CD1.FilterIndex 2 CD1.InitDir “C： “ CD1.FileName “default“ CD1.ShowSave End Sub 关于上述过程
6、，以下叙述中正确的是 ( )。 （ A）默认过滤器为 “*.ppt“ （ B）指定的初始目录为 “C： “ （ C）打开的文件对话框的标题为 “default“ （ D）上面事件过程实现保存文件的操作 12 以下关于窗体的叙述中，错误的是 ( )。 （ A） Hide方法能隐藏窗体，但窗体仍在内存中 （ B）使用 Show方法显示窗体时，一定触发 Load事件 （ C）移动或放大窗体时，会触发 Paint事件 （ D）双击窗体时，会触发 DblClick事件 13 下列控件中，没有 Caption属性的是 ( )。 （ A）单选按钮 （ B）复选框 （ C）列表框 （ D）框架 14 将数据项
7、 “Student“添加到名称为 List1的列表框中，并使其成为列表框第一项的语句为 ( )。 （ A） List1.AddItem “Student“， 0 （ B） List1.AddItem “Student“， 1 （ C） List1.AddItem 0， “Student“ （ D） List1.AddItem 1， “Student“ 15 下列针对框架控件的叙述中，错误的是 ( )。 （ A）框架是一个容器控件 （ B）框架也有 Click和 DblClick事件 （ C）框架也可以接受用户的输入 （ D）使用框架的主要目的是为了对控件进行分组 16 若窗体上有一个名为 Co
8、mmand1的命令按钮，并有下面的程序： Private Sub Command1_Click() Dim arr(5)As Integer For k 1 To 5 arr(k) k Next k prog arr() For k 1 To 5 Print arr(k)； Next k End Sub Sub prog(a()As Integer) n UBound(a) For i n To 2 step 1 For j 1 To n 1 if a(j) 0 Then count(n) count(n) 1 End If Next k m count(0) For k 1 To 25 If
9、 m10 Then Exit For Next Text1.Text Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 ( )。 （ A） 2 （ B） 3 （ C） 4 （ D） 5 20 设有如下的程序段： n 0 For i 1 To 3 For j 1 To i For k j To 3 n n 1 Next k Next j Next i 执行上面的程序段后， n的值为 ( )。 （ A） 3 （ B） 21 （ C） 9 （ D） 14 21 在窗体上画一个名称为 Command1的命令按钮，一个名称为 Label1的标签，然后编写如下事件过程： Pri
10、vate Sub Command1_Click() s 0 For i 1 To 15 x 2 * i 1 If x Mod 3 0 Then s s 1 Next i Label1.Caption s End Sub 程序运 行后，单击命令按钮，则标签中显示的内容是 ( )。 （ A） 1 （ B） 5 （ C） 27 （ D） 45 22 阅读程序： Private Sub Form_Click() x 50 For i 1 To 4 y InputBox(“请输入一个整数 “) y Val(y) If y Mod 5 0 Then a a y x y Else a a x End If
11、Next i Print a End Sub 程序运行 后，单击窗体，在输入对话框中依次输入 15、 24、 35、 46，输出结果为( )。 （ A） 100 （ B） 50 （ C） 120 （ D） 70 23 在窗体上画一个名称为 Text1的文本框和一个名称为 Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim array1(10， 10)As Integer Dim i As Integer， j As Integer For i 1 To 3 For j 2 To 4 array1(i， j) i j Next j
12、 Next i Text1.Text array1(2， 3) array1(3， 4) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是 ( )。 （ A） 15 （ B） 14 （ C） 13 （ D） 12 24 在窗体上画一个名称为 Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() d 0 c 10 x Array(10， 12， 21， 32， 24) For i 1 To 5 If x(i)c Then d d x(i) c x(i) Else d d c End If Next i
13、Print d End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ( )。 （ A） 89 （ B） 99 （ C） 23 （ D） 77 25 设有如下通用过程： Public Function f(x As Integer) Dim y As Integer x 20 y 2 f x * y End Function 在窗体上画一个命令按钮，其名称为 Command1，然后编写如下事件过程： Private Sub Command1_Click() Static x As Integer x 10 y 5 y f(x) Print x； y End Sub 程序运行后，
14、如果单击命令按钮，则在窗体上显示的内容是 ( )。 （ A） 10 5 （ B） 20 40 （ C） 20 5 （ D） 10 40 26 下列叙述中正确的是 ( )。 （ A）循环队列是队列的一种链式存储结构 （ B）循环队列是队列的一种顺序存储结构 （ C）循环队列是非线性结构 （ D）循环队列是一种逻辑结构 27 下列关于线性链表的叙述中，正确的是 ( )。 （ A）各数据结点的存储空间可以不连续，但它们的存储顺序与逻辑顺序必须一致 （ B）各数据结点的存储顺序与逻辑顺序可以不一致，但它们的存储空间必须连续 （ C）进行插入与删除时，不需要移动表中的元素 （ D）以上说法均不正确 28
15、 一棵二叉树共有 25个结点，其中 5个是叶子结点，则度为 1的结点数为( )。 （ A） 16 （ B） 10 （ C） 6 （ D） 4 29 在下列模式中，能够给出数据库物理存储结构与物理存取方法的是 ( )。 （ A）外模式 （ B）内模式 （ C）概念模式 （ D）逻辑模式 30 在满足实体完整性约束的条件下 ( )。 （ A）一个关系中应该有一个或多个候选关键字 （ B）一个关系中只能有一个候选关键字 （ C）一个关系中必须有多个候选关键字 （ D）一个关系中可以没有候选关键字 31 有三个关系 R、 S和 T如下：则由关系 R和 S得到关系 T的操作是 ( )。（ A）自然连接
16、（ B）交 （ C）除 （ D）并 32 下面描述中，不属于软件危机表现的是 ( )。 （ A）软件过程不规范 （ B）软件开发生产率低 （ C）软件质量难以控制 （ D）软件成本不断提高 33 下面不属于需求分析阶段任务的是 ( )。 （ A）确定软件系统的功能需求 （ B）确定软件系统的性能需求 （ C）需求规格说明书评审 （ D）制定软件集成测试计划 34 在黑盒测试方法中，设计测试用例的主要根据是 ( )。 （ A）程序内部逻辑 （ B）程序外部功能 （ C）程序数据结构 （ D）程序流程图 35 在软件设计中不使用的工具是 ( )。 （ A）系统结构图 （ B） PAD图 （ C）数
17、据流图 (DFD图 ) （ D）程序流程图 36 以下变量名中合法的是 ( )。 （ A） x 2 （ B） 12abc （ C） sum_total （ D） print 37 已知 a 6， b 15， c 23，则语句 Print Sgn(a b Mod 6 ca)& a b 的输出结果为 ( )。 （ A） 6 （ B） 16 （ C） 31 （ D） 121 38 以下叙述中错误的是 ( )。 （ A）续行符与它前面的字符之间至少要有一个空格 （ B） Visual Basic中使用的续行符为下划线 (_) （ C）以撇号 ()开头的注释语句可以放在续行符的后面 （ D） Visua
18、l Basic可以自动对输入的内容进行语法检查 39 以下关于多重窗体程序的叙述中，错误的是 ( )。 （ A）对于多重窗体程序，需要单独保存每个窗体 （ B）在多重窗体程序中，可以根据需要指定启动窗体 （ C）在多重窗体程序中，各窗体的菜单是彼此独立的 （ D）用 Hide方法不仅可以隐藏窗体，而且还可以清除内存中的窗体 40 以下关于文件的叙述中，错误的是 ( )。 （ A）顺序文件中的记录是一个接一个地顺序存放 （ B）随机文件中记录的长度是随机的 （ C）文件被打开后，自动生成一个文件指针 （ D） EOF函数用来测试是否到达文件尾 二、基本操作题 41 (1)在名称为 Form1的窗
19、体上画一个名称为 Combol的组合框，其宽度为 1200，其类型如图所示 (简单组合框 )。 要求： 请按图中所示，通过属性窗口输入 “北京 ”、 “上海 ”、 “广州 ”、 “深圳 ”。 设置适当的属性，使得运行时，窗体的最大化按钮和最小化按钮消失。 注意： 存盘时必须存放在考生文件夹下，工程文件名为 sjt1 vbp，窗体文件名为 sjt1 frm。 (2)在名称为 Form1的窗体上画两个文本框，名称为分别为 Text1、 Text2，再画两个命令按钮，名称分别为Command1、 Command2，标题分别为 “左 ”、 “右 ”，见下图。 要求： 编写适当的事件过程，使得程序运行时
20、，单击 “左 ”按钮，则焦点位于 Text1上；单击 “右 ”按钮，则焦点位于 Text2上。 注意：程序中不得使用变量，事件过程中只能写一条语句。 存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 三、简单应用题 42 (1)在考生文件夹下有一个工程文件 sjt3 vbp(相应的窗体文件名为 sjt3 frm)，在窗体上添加两个命令按钮 (其名称分别为 Command1和 Command2，标题分别为“添加项目 ”和 “删除项目 ”)，再添加一个列表框 (名称为 List1)和一个文本框 (名称为Text1)，如图 1所示。编写适当的事件过程。程
21、序运行后，如果单击 “添加项目 ”命令按钮，则从键盘上输入要添加到列表框中的项目 (内容任意，不少于三个 )；如果单击 “删除项目 ”命令按钮， 则从键盘上输入要删除的项目内容，将其从列表框中删除。程序的运行情况如图 2所示。提供的窗体文件可以实现上述功能。但这个程序不完整，请把它补充完整。 注意：去掉程序中的注释符，把程序中的 ?改为适当的内容，使其正确运行，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件 sjt4 vbp(相应的窗体文件名为 sjt4 frm)，其功能是通过调用过程FindMax求数组的最大值。程序运行后，在 4个文本框中
22、各输入一个整数，然后单击 “求最大值 ”即可求出数组的最大值，并显示在 窗体上 (如图所示 )。这个程序不完整，请把它补充完整，并能正确运行。 要求：去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。 四、综合应用题 43 在考生文件夹下有一个工程文件 sjt5 vbp，其窗体中有一个名称为 Text1的文本框，两个标题分别是 “读数据 ”和 “统计 ”的命令按钮。请添加一个名称为 Label1、标题为 “同时含有字母 t、 h、 e的单词数为 ”的标签；再添加一个名称为 Text2，初始文本为空的文本框，如图所示
23、。程序功能 如下： 单击 “读数据 ”按钮，则将考生文件夹下 in5 dat文件的内容 (其中仅含有字母和空格 )显示在 Text1文本框中。 单击 “统计 ”按钮，则以不区分大小写字母的方式，自动统计 Text1文本内容中同时含有 t、 h、 e三个字母的单词的个数 (如 the、 there和 whatever都属于满足条件的单词 )，并将统计结果显示在 Text2文本框内。 “读数据 ”按钮的 Click事件过程已经给出，请将 “统计 ”按钮的 Click事件过程中的注释符去掉，把 “?”改为正确的内容，以实现上述程序功能。 注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运
24、行之前，必须进 行 “统计 ”，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。 国家二级（ VB）机试模拟试卷 37答案与解析 一、选择题 1 【正确答案】 C 【试题解析】 用 Dim可同时定义多个变量，但变量要分别声明其数据类型，如果不声明数据类型，默认是 Variant变体型变量。本题中，变量 X定义时没声明数据类型，所以为 Variant型变量，变量 Y是整型变量。故 C选项正确。 2 【正确答案】 A 【试题解析】 控件数组中各控件具有相同的名称，而且类型是相同的，但 Index属性值不同。数组中各控件响应的事件是相同，用 Index属性值来区分每个控件
25、。故 A选项正确， B、 C、 D选项错误。 3 【正确答案】 B 【试题解析】 工程文件的扩展名为 .vbp，故 B 选项错误。 4 【正确答案】 C 【试题解析】 Select Case 语句中表达式的形式可以是：常量或变量 ；若干符合条件的值用 “， “隔开；表达式 1 to 表达式 2 ； Is 关系表达式。 本题中选项 A、 B和 D都符合语法规则。 选项 C中 Is关系表达式语法错误，它可以是 Is0 或 Is50， 17， 0),5250结果为 True，所以 IIF函数返回 17，则 x值为17，故选 C。 6 【正确答案】 D 【试题解析】 VB 工程的启动对象有： Sub
26、Main 过程 (在标准模块中定义 )、窗体(在多个窗体可选一个窗体启动 )，我们可以通过在 “工程属性 “对话框中设置启动对象来实现，设置哪个就 用哪个启动。所以当工程中含有 Sub Main过程时，工程执行不一定最先执行该过程，也可以通过窗体启动。故选项 D错误。 7 【正确答案】 A 【试题解析】 随机文件中的每一行是一条记录，每条记录的长度是固定的、相等的，并且都有一个记录号。 Open 语句中的 Len 用于指定记录长度，当指定长度小于记录实际长度时将产生错误；大于实际长度时，可以写入，但浪费空间，所以随机文件占据磁盘空间较大，故选项 A错误。 8 【正确答案】 B 【试题解析】 当
27、 Frame1的 Enabled 属性设为 False后，框架 Frame1变为不可用，它里面放的两个单项按钮也就变为不可用，故 A选项错误； 当 Op1.Value为 False时， “单程 “和 “往返 “单项按钮都处于未选中状态，故 C选项错误； Op1.Value的值为 0，即为 False，语句正确，没有程序错误，故 D选项说法错误； 根据图可只， “单程 “单选按钮处于选中状态， Op1.Value的值为 True，故 B选项正确。 9 【正确答案】 A 【试题解析】 GotFocus 和 LostFocus 是控件获得焦点和失去焦点时触发的两个事件； TabStop 是控件的属性
28、； SetFocus 方法是控件设置、获得焦点的方法。故选 A。 10 【正确答案】 A 【试题解析】 X1、 Y1、 X2、 Y2属性是直线的起点、终点坐标。故选 A。 11 【正确答案】 B 【试题解析】 通用对话框的 FilterIndex 属性为 1时表示默认过滤器为第 1个文件类型，为 2时表示为第 2个文件类型。 InitDir属性值指定通用对话框的初始目录。 FileName属性表示对话框中默认的文件名。 ShowSave方法表示打开另存为对话框，执行保存文件的操作。 12 【正确答案】 B 【试题解析 】 窗体的 Load 事件是把窗体装入工作区的事件，即装入内存，然后窗体才显
29、示出来，使用 Hide方法可以使窗体隐藏，但窗体仍在内存中，使用Show方法能使窗体显示出来。当窗体被移动或放大时，或者窗口移动时覆盖了一个窗体时，触发 Paint事件。双击窗体时会触发窗体的 DblClick 事件。 13 【正确答案】 C 【试题解析】 列表框控件没有 Caption属性。 14 【正确答案】 A 【试题解析】 List 控件的 AddItem方法的语法是： AddItem(String， index)。其中 index 是列表框中列表项的索引值，第一项的索引值为 0。 15 【正确答案】 C 【试题解析】 框架是一个容器控件，用于将屏幕上的对象分组。框架常用的事件是 Cl
30、ick和 DblClick，它不接受用户输入，不能显示文本和图形，也不能与图形相连。 16 【正确答案】 B 【试题解析】 程序对数组元素赋初值为 1、 2、 3、 4、 5。 Ubound函数返回数组可用的最大下标，过程 prog的功能是遍历数组对数组中的元素进行排序，由条件a(j)第 5个？处填入： a(i)第 6个？处填入： arr1(i)第 7个？处填入： arr2步骤 3：调试并运行程序，关闭程序后按题目要求存盘。 四、综合应用题 43 【正确答案】 【操作步骤】 步骤 1：打开本题工程文件，添加 1个名称为 Label1、标题为 “同时含有字母 t、h、 e的单词数为 “的标签；再
31、添加 1个名称为 Text2，初始内容为空的文本框。 步骤 2：分析并编写程序代码。 程序提供代码 Option Base 1 Dim s As String Private Sub Command1_Click() Open App.Path & “in5.dat“ For Input As #1 s = Input(LOF(1), #1) Close #1 Text1.Text = s End Sub Private Sub Command2_Click() If Len(s) = ? Then MsgBox “请先使用 “读数据 “功能！ “ Else t = “ For i = 1 T
32、o Len(s) c = Mid(s, i, 1) If ? 0 And InStr(x, “h“) 0 Then m = ? End If t = “ End If Next i Text2.Text = m End If End Sub Private Sub Form_Unload(Cancel As Integer) Open App.Path & “out5.dat“ For Output As #1 Print #1, Text2.Text Close #1 End Sub 程序结束 参考答案 第 1个？处填入： 0 第 2个？处填入： c 第 3个？处填入： x 第 4个？处填入： m + 1 步骤 3：调试并运行程序，关闭程序后 按题目要求存盘。
