2011年3月全国计算机等级考试二级VB笔试试卷及答案(wor.pdf

1 2011 年 3 月全国计算机等级考试二级笔试试卷 Visual Basic 语言程序设计 考试时间 90 分钟 满分 100 分 一 选择题 每小题 2 分 共 70 分 下列各题 A B C D 四个选项中 只有一个选项是正确的 请将正确选项填涂在答题卡 相应位置上 答在试卷上不得分 1 下列关于栈叙述正确的是 A 栈顶元素最先能被删除B 栈顶元素最后才能被删除 C 栈底元素永远不能被删除D 以上三种说法都不对 2 下列叙述中正确的是 A 有一个以上根结点的数据结构不一定是非线性结构 B 只有一个根结点的数据结构不一定是线性结构 C 循环链表是非线性结构 D 双向链表是非线性结构 3 某二叉树共有 7 个结点 其中叶子结点只有 1 个 则该二叉树的深度为 假设根结点在第 1 层 A 3B 4C 6D 7 4 在软件开发中 需求分析阶段产生的主要文档是 A 软件集成测试计划B 软件详细设计说明书 C 用户手册D 软件需求规格说明书 5 结构化程序所要求的基本结构不包括 A 顺序结构B GOTO 跳转 C 选择 分支 结构D 重复 循环 结构 6 下面描述中错误的是 A 系统总体结构图支持软件系统的详细设计 B 软件设计是将软件需求转换为软件表示的过程 C 数据结构与数据库设计是软件设计的任务之一 D PAD 图是软件详细设计的表示工具 7 负责数据库中查询操作的数据库语言是 A 数据定义语言B 数据管理语言C 数据操纵语言D 数据控制语言 8 一个教师可讲授多门课程 一门课程可由多个教师讲授 则实体教师和课程间的联系是 A 1 1 联系B 1 m 联系C m 1 联系D m n 联系 9 有三个关系 R S 和 T 如下 RST ABC A12 B21 C31 则由关系 R 和 S 得到关系 T 的操作是 A 自然连接B 交C 除D 并 10 定义无符号整数类为 UInt 下面可以作为类 UInt 实例化值的是 A 369B 369C 0 369D 整数集合 1 2 3 4 5 11 在 Visual Basic 集成环境中 可以列出工程中所有模块名称的窗口是 A 工程资源管理器窗口B 窗体设计窗口 C 属性窗口D 代码窗口 C 1 AB c3 2 12 假定编写了如下 4 个窗体事件的事件过程 则运行应用程序并显示窗体后 已经执行的事件 过程是 A LoadB ClickC LostFocusD KeyPress 13 为了使标签具有 透明 的显示效果 需要设置的属性是 A CaptionB AlignmentC BackStyleD AutoSize 14 下面可以产生 20 30 含 20 和 30 的随机整数的表达式是 A Int Rnd 10 20 B Int Rnd 11 20 C Int Rnd 20 30 D Int Rnd 30 20 15 设窗体上有一个名称为 HS1 的水平滚动条 如果执行了语句 HS1 Value HS1 Max HS1 Min 2 HS1 Min则 A 滚动块处于最左端 B 滚动块处于最右端 C 滚动块处于中间位置 D 滚动块可能处于任何位置 具体位置取决于 Max Min 属性的值 16 窗体上有一个名称为 Cb1 的组合框 程序运行后 为了输出选中的列表项 应使用的语句是 A Print Cb1 Selected B Print Cb1 List Cb1 ListIndex C Print Cb1 Selected Text D Print Cb1 List ListIndex 17 为了在窗体上建立 2 组单选按钮 并且当程序运行时 每组都可以有一个单选按钮被选中 则 以下做法中正确的是 A 把这 2 组单选按钮设置为名称不同的 2 个控件数组 B 使 2 组单选按钮的 Index 属性分别相同 C 使 2 组单选按钮的名称分别相同 D 使 2 组单选按钮分别画到 2 个不同的框架中 18 如果一个直线控件在窗体上呈现为一条垂直线 则可以确定的是 A 它的 Y1 Y2 属性的值相等 B 它的 X1 X2 属性的值相等 C 它的 X1 Y1 属性的值分别与 X2 Y2 属性的值相等 D 它的 X1 X2 属性的值分别与 Y1 Y2 属性的值相等 19 设 a 2 b 3 c 4 d 5 则下面语句的输出是 Print 3 2 b Or a c And bc Or c d A False B 1 C True D 1 20 窗体 Form1 上有一个名称为 Command1 的命令按钮 以下对应窗体单击事件的事件过程是 A Private Sub Form1 Click End Sub B Private Sub Form Click End Sub C Private Sub Command1 Click End Sub D Private Sub Command Click 3 End Sub 21 默认情况下 下面声明的数组的元素个数是 Dima 5 2 to 2 A 20 B 24 C 25 D 30 22 设有如下程序段 Dim a 10 For Each x In a Print x Next x 在上面的程序段中 变量 x 必须是 A 整型变量B 变体型变量C 动态数组D 静态数组 23 设有以下函数过程 Private Function Fun a As Integer As String As Integer End Function 若已有变量声明 Dim x 5 As Integer n As Integer ch As String 则下面正确的过程调用语句是 A x 0 Fun x ch B n Fun n ch C Call Fun x ch D n Fun x 5 ch 24 假定用下面的语句打开文件 Open Filel txt ForInputAS 1 则不能正确读文件的语句是 A Input 1 ch B Line Input 1 ch C ch Input 5 1 D Read 1 ch 25 下面程序执行结果是 Private Sub Command 1 Click a 10 For k 1 To 5 Step 1 A a k Nest k Print a k End Sub A 5 6B 5 5C 100D 101 26 设窗体上有一个名为 Text1 的文体框和一个名为 Command1 的命令按钮 并有以下事件过程 Private Sub Command 1 Click X Val Text1 Text Select Casex Case Is 20 Print 输入错误 Case Is 0 Print 20 x Case Is 10 Print 20 4 Case Is5 Or x 1 Next End Sub 运行程序 其中 Do 循环执行的次数是 A 15B 10C 7D 3 28 阅读程序 Private Sub Command1 Click Dim arr Dim i As Integer Arr Array 0 1 2 3 4 5 6 7 8 9 10 For i 0 To 2 Printarr 7 i Next End Sub 程序运行后 窗体上显示的是 A 876B 765 C 654D 543 29 在窗体上画一个名为 Command 1 的命令按钮 然后编写以下程序 Private Sub Command 1 Click Dim a 10 As Integer For k 10 TO 1 Step 1 a k 20 2 k Next k K k 7 Print a k a k EndSub 运行程序 单击命令按钮 输出结果是 A 18B 12C 8D 6 30 窗体上有一个名为 Command 1 的命令按钮 并有如下程序 Private Sub Command 1 Click Dim a 10 x For k 1To10 a k Int Rnd 90 10 x x a k Mod 2 Next k 5 Printx EndSub 程序运行后 单击命令按钮 输出结果是 A 10 个数中奇数的个数B 10 个数中偶数的个数 C 10 个数中奇数的累加和D 10 个数中偶数的累加和 31 窗体上有一个名为 Command 1 的命令按钮和一个名为 Timer 1 的计时器 并有下面的事件 过程 Private SubCommand 1 Click Timer 1 Enabled True EndSub PrivateSubForm Load Timer 1 Interval 10 Timer 1 Enabled False EndSub PrivateSubTimer 1 Timer Command 1 Left Command 1 Left 10 EndSub 程序运行时 单击命令按钮 则产生的结果是 A 命令按钮每 10 秒向左移动一次 B 命令按钮每 10 秒向右移动一次 C 命令按钮每 10 毫秒向左移动一次 D 命令按钮每 10 毫秒向右移动一次 32 设窗体上有一个名为 List1 的列表框 并编写下面的事件过程 Private Sub List 1 Click Dim ch AS String ch List 1 List List1 ListIndex List 1 RemoveItem List1 ListIndex List 1 AddItem ch End Sub 程序运行时 单击一个列表项 则产生的结果是 A 该列表项被移到列表的最前面B 该列表项被删除 C 该列表项被移到列表的最后面D 该列表项被删除后又在原位置插入 33 窗体上有一个名为 Command1 的命令按钮 并有如下程序 Private Sub Command1 Click Dim a As Integer b As Integer a 8 b 12 Print Fun a b a b End Sub Private Function Fun ByVal a As Integer b As Integer As Integer a a Mod 5 b b 5 Fun a End Function 程序运行时 单击命令按钮 则输出结果是 A 332 B 382 C 8812 6 D 3812 34 为了从当前文件夹中读入文件 File1 txt 某人编写了下面的程序 Private Sub Command1 Click Open File1 txt For Output As 20 Do While Not EOF 20 Line Input 20 ch Print ch Loop End Sub 程序调试时 发现有错误 下面的修改方案中正确的是 A 在 Open 语句中的文件名前添加路径 B 把程序中各处的 20 改为 1 C 把 Print ch 语句改为 Print 20 ch D 把 Open 语句中的 Output 改为 Input 35 以下程序运行后的窗体如图所示 其中组合框的名称是 Combo1 已有列表项如图所示 命 令按钮的名称是 Command1 Private Sub Command1 Click If Not check Combo1 Text Then MsgBox 输入错误 Exit Sub End If For k 0 To Combo1 ListCount 1 If Combo1 Text Combo1 List k Then MsgBox 添加项目失败 Exit Sub End If Next k Combo1 AddItem Combo1 Text MsgBox 添加项目成功 End Sub Private Function Check ch As String As Boolean n Len ch For k 1 To n c UCase Mid ch k 1 If c Z Then Check False Exit Function End If Next k Check True End Function 程序运行时 如果在组合框的编辑区中输入 Java 则单击命令按钮后产生的结果是 A 显示 输入错误 B 显示 添加项目失败 C 显示 添加项目成功 D 没有任何显示 二 填空题 每空 2 分 共 30 分 请将每空的正确答案写在答题卡 1 至 15 序号的横线上 答在试卷上不得分 7 1 有序线性表能进行二分查找的前提是该线性表必须是 1 存储的 2 一棵二叉树的中序遍历结果为 DBEAFC 前序遍历结果为 ABDECF 则后序遍历结果为 2 3 对软件设计的最小单位 模块或程序单元 进行的测试通常称为 3 测试 4 实体完整性约束要求关系数据库中元组的 4 属性值不能为空 5 在关系 A S SN D 和关系 B D CN NM 中 A 的主关键字是 S B 的主关键字是 D 则称 5 是关系 A 的外码 6 在窗体上有 1 个名称为 Command1 的命令按钮 并有如下事件过程和函数过程 Private Sub Command1 Click Dim p As Integer p m 1 m 2 m 3 Print p End Sub Private Function m n As Integer As Integer Static s As Integer For k 1 To n s s 1 Next m s End Function 运行程序 单击命令按钮 Command1 后的输出结果为 6 7 在窗体上画 1 个名称为 Command1 的命令按钮 然后编写如下程序 Private Sub Command1 Click Dim m As Integer x As Integer Dim flag As Boolean flag False n Val Intputbox 请输入任意 1 个正整数 Do While Not flag a 2 flag 7 Do While flag And a i Then i i 1 a i 10 End If Loop While i a j then temp a i a i a j 12 Next j Next i For i 1 To 10 Print a i Next i End Sub 9 窗体上已有名称分别为 Drive1 Dir1 File1 的驱动器列表框 目录列表框和文件列表框 且有 1 个名称为 Text1 的文本框 以下程序的功能是 将指定位置中扩展名为 txt 的文件显示 在 File1