第1套

Size: px

Start display at page:

Download "第1套"

玺折高
7 years ago
Views:

1 2010 年 9 月全国计算机等级考试二级笔试试卷 Visual Basic 语言程序设计 ( 考试时间 90 分钟, 满分 100 分 ) 一选择题 ( 每小题 2 分, 共 70 分 ) (1) 下列叙述中正确的是 ( ) A) 线性表的链式存储结构与顺序存储结构所需要的存储空间是相同的 B) 线性表的链式存储结构所需要的存储空间一般要多于顺序存储结构 C) 线性表的链式存储结构所需要的存储空间一般要少于顺序存储结构 D) 上述三种说法都不对 (2) 下列叙述中正确的是 ( ) A) 在栈中, 栈中元素随栈底指针与栈顶指针的变化而动态变化 B) 在栈中, 栈顶指针不变, 栈中元素随栈底指针的变化而动态变化 C) 在栈中, 栈底指针不变, 栈中元素随栈顶指针的变化而动态变化 D) 上述三种说法都不对 (3) 软件测试的目的是 ( ) A) 评估软件可靠性 B) 发现并改正程序中的错误 C) 改正程序中的错误 D) 发现程序中的错误 (4) 下面描述中, 不属于软件危机表现的是 ( ) A) 软件过程不规范 B) 软件开发生产率低 C) 软件质量难以控制 D) 软件成本不断提高 (5) 软件生命周期是指 ( ) A) 软件产品从提出实现使用维护到停止使用退役的过程 B) 软件从需求分析设计实现到测试完成的过程 C) 软件的开发过程 D) 软件的运行维护过程 (6) 面向对象方法中, 继承是指 ( ) A) 一组对象所具有的相似性质 B) 一个对象具有另一个对象的性质 C) 各对象之间的共同性质 D) 类之间共享属性和操作的机制 (7) 层次型网状型和关系型数据库划分原则是 ( ) A) 记录长度 B) 文件的大小 C) 联系的复杂程度 D) 数据之间的联系方式 (8) 一个工作人员可以使用多台计算机, 而一台计算机可被多个人使用, 则实体工作人员与实体计算机之间的联系是 ( ) A) 一对一 B) 一对多 C) 多对多 D) 多对一 (9) 数据库设计中反映用户对数据要求的模式是 ( ) A) 内模式 B) 概念模式 C) 外模式 D) 设计模式 (10) 有三个关系 R S 和 T 如下 : R S T A B C A D A B C D a 1 2 c 4 c b 2 1 c 3 1 则由关系 R 和 S 得到关系 T 的操作是 ( ) 2010 年 9 月笔试真卷及答案详解第 1 页 ( 共 12 页 )

2 A) 自然连接 B) 交 C) 投影 D) 并 (11) 在 Visual Basic 集成环境中, 要添加一个窗体, 可以单击工具栏上的一个按钮, 这个按钮是 ( ) A) B) C) D) (12) 在 VisualBasic 集成环境的设计模式下, 用鼠标双击窗体上的某个控件打开的窗口是 ( ) A) 工程资源管理器窗口 B) 属性窗口 C) 工具箱窗口 D) 代码窗口 (13) 下列叙述中错误的是 ( ) A) 列表框与组合框都有 List 属性 B) 列表框有 Selected 属性, 而组合框没有 C) 列表框和组合框都有 Style 属性 D) 组合框有 Text 属性, 而列表框没有 (14) 设窗体上有一个命令按钮数组, 能够区分数组中各个按钮的属性是 ( ) A)Name B)Index C)Caption D)Left (15) 滚动条可以响应的事件是 ( ) A)Load B)Scroll C)Click D)MouseDown (16) 设 a=5,b=6,c=7,d=8, 执行语句 x=iif((a>b) And (c>d),10,20) 后,x 的值是 ( ) A)10 B)20 C)30 D)200 (17) 语句 Print Sgn(-6^2)+Abs(-6^2)+Int(-6^2) 的输出结果是 ( ) A)-36 B)1 C)-1 D)-72 (18) 在窗体上画一个图片框, 再在图片框中画一个命令按钮, 位置如图则命令按钮的 Top 属性值是 ( ) A)200 B)300 C)500 D) (19) 在窗体上画一个名称为 Commandl 的命令按钮单击命令按钮时执行如下事件过程 : a$ = "software and hardware" b$ = Right(a$, 8) c$ = Mid(a$, 1, 8) MsgBox a$,, b$, c$, 1 则在弹出的信息框标题栏中显示的标题是 ( ) A)software and hardware B)hardware C)software D)1 (20) 在窗体上画一个文本框 ( 名称为 Textl) 和一个标签 ( 名称为 Label1), 程序运行后, 如果在文本框中输入文本, 则标签中立即显示相同的内容以下可以实现上述操作的事件过程是 ( ) A)Private Sub Text1_Change() B)Private Sub Label1_Change() Label1.Caption = Text1.Text Label1.Caption = Text1.Text C)Private Sub Text1_Click() D)Private Sub Label1_Click() Label1.Caption = Text1.Text Label1.Caption = Text1.Text (21) 以下说法中错误的是 ( ) A) 如果把一个命令按钮的 Default 属性设置为 True, 则按回车键与单击该命令按钮的作用相同 B) 可以用多个命令按钮组成命令按钮数组 C) 命令按钮只能识别单击 (Click) 事件 D) 通过设置命令按钮的 Enabled 属性, 可以使该命令按钮有效或禁用 (22) 以下关于局部变量的叙述中错误的是 ( ) 2010 年 9 月笔试真卷及答案详解第 2 页 ( 共 12 页 )

3 A) 在过程中用 Dim 语句或 Static 语句声明的变量是局部变量 B) 局部变量的作用域是它所在的过程 C) 在过程中用 Static 语句声明的变量是静态局部变量 D) 过程执行完毕, 该过程中用 Dim 或 Static 语句声明的变量即被释放 (23) 以下程序段的输出结果是 ( ) x=1 : y=4 Do Until y>4 x = x * y y = y + l Loop Print x A)l B)4 C)8 D)20 (24) 如果执行一个语句后弹出如图所示的窗口, 则这个语句是 ( ) A)InputBox(" 输入框 ", " 请输入 VB 数据 ") B)x=InputBox(" 输入框 ", " 请输入 VB 数据 ") C)InputBox(" 请输入 VB 数据 ", " 输入框 ") D)x=InputBox(" 请输入 VB 数据 ", " 输入框 ") (25) 有如下事件过程 : Private Sub Form_Click() Dim n As Integer x = 0 n = InputBox(" 请输入一个整数 ") For i = 1 To n For j = 1 To i x = x + 1 j i Print x 程序运行后, 单击窗体, 如果在输入对话框中输入 5, 则在窗体上显示的内容是 ( ) A)13 B)14 C)15 D)16, (26) 请阅读程序 : Sub subp(b() As Integer) For i = 1 To 4 b(i) = 2 * i Dim a(1 To 4) As Integer a(1) = 5: a(2) = 6: a(3) = 7: a(4) = 8 subp a() For i = 1 To 4 Print a(i) 运行上面的程序, 单击命令按钮, 则输出结果是 ( ) A)2 B)5 C)10 D) 出错 2010 年 9 月笔试真卷及答案详解第 3 页 ( 共 12 页 )

4 (27)Fibonacci 数列的规律是 : 前 2 个数为 l, 从第 3 个数开始, 每个数是它前 2 个数之和, 即 :1,l,2,3, 5,8,13,21,34,55,89, 某人编写了下面的函数, 判断大于 1 的整数 x 是否是 Fibonacci 数列中的某个数, 若是, 则返回 True, 否则返回 False Function Isfab(x As Integer) As Boolean Dim a As Integer, b As Integer, c As Integer, flag As Boolean flag = False a = 1 : b = 1 Do While x < b c = a + b : a = b : b = c If x = b Then flag = True Loop Isfab = flag End Function 测试时发现对于所有正整数 x, 函数都返回 False, 程序需要修改下面的修改方案中正确的是 ( ) A) 把 a=b 与 b=c 的位置互换 B) 把 c=a+b 移到 b=c 之后 C) 把 Do While x<b 改为 Do While x>b D) 把 If x=b Then flag=true 改为 If x=a Then flag=true (28) 在窗体上画一个命令按钮, 其名称为 Command1, 然后编写如下事件过程 : Dim a$, b$, c$, k% a = "ABCD" b = "123456" c = "" k = 1 Do While k <= Len(a) Or k <= Len(b) If k <= Len(a) Then c = c & Mid(a, k, 1) End If If k <= Len(b) Then c = c & Mid(b, k, 1) End If k = k + 1 Loop Print c 运行程序, 单击命令按钮, 输出结果是 ( ) A)123456ABCD B)ABCD C)D6C584A321 D)A1B2C3D456 (29) 请阅读程序 : Private Sub Form_Click() m = 1 For i = 4 To 1 Step -1 Print str(m); m = m + 1 For j = 1 To i Print "*"; j Print 2010 年 9 月笔试真卷及答案详解第 4 页 ( 共 12 页 )

5 i 程序运行后, 单击窗体, 则输出结果是 ( ) A)1**** B)4**** C)**** D)* 2*** 3*** *** ** 3** 2* **** *** 4* 1* * **** (30) 在窗体上画一个命令按钮 ( 其名称为 Commandl), 然后编写如下代码 : Dim a a = Array(1, 2, 3, 4) i = 3: j = 1 Do While i >= 0 s = s + a(i) * j i = i 1 : j = j * 10 Loop Print s 运行上面的程序, 单击命令按钮, 则输出结果是 ( ) A)432l B)123 C)234 D)1234 (31) 下列可以打开随机文件的语句是 ( ) A)Open "file1.dat" For Input As #l B)Open "file1.dat" For Append As #l C)Open "file1.dat" For Output As #1 D)Open "file1.dat" For Random As #1 Len=20 (32) 有弹出式菜单的结构如右表, 程序运行时, 单击窗体则弹出如下图所示的菜单下面的事件过程中能正确实现这一功能的是 ( ) 内缩标题名称无编辑 edit 剪切 cut 粘贴 paste A)Private Sub Form_Click() PopupMenu cut C)Private Sub Form_Click() PopupMenu edit (33) 请阅读程序 : Option Base 1 Private Sub Form_Click() Dim arr(4, 4) As Integer For i = 1 To 4 For j = 1 To 4 arr(i, j) = (i - 1) * 2 + j For i = 3 To 4 For j = 3 To 4 Print arr(j, i); B) PopupMenu edit D)Private Sub Form_Click() PopupMenu cut PopupMenu paste 2010 年 9 月笔试真卷及答案详解第 5 页 ( 共 12 页 )

6 j Print 程序运行后, 单击窗体, 则输出结果是 ( ) A)5 7 B)6 8 C)7 9 D) (34) 下面函数的功能应该是 : 删除字符串 str 中所有与变量 ch 相同的字符, 并返回删除后的结果例如 : 若 str= ABCDABCD,ch= B, 则函数的返回值为 : ACDACD' Function delchar(str As String, ch As String) As String Dim k As Integer, temp As String, ret As String ret = "" For k = 1 To Len(str) temp = Mid(str, k, 1) If temp = ch Then ret = ret & temp End If k delchar = ret End Function 但实际上函数有错误, 需要修改下面的修改方案中正确的是 ( ) A) 把 ret = ret & temp 改为 ret = temp B) 把 If temp = ch Then 改为 If temp<> ch Then C) 把 delchar = ret 改为 delchar = temp D) 把 ret="" 改为 temp="" (35) 在窗体上画一个命令按钮和两个文本框, 其名称分别为 Commandl Textl 和 Text2, 在属性窗口中把窗体的 KeyPreview 属性设置为 True, 然后编写如下程序 : Dim S1 As String, S2 As String Private Sub Form_Load() Text1.Text = "" Text2.Text = "" Text1.Enabled = False Text2.Enabled = False Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) S2 = S2 & Chr(KeyCode) Print S2 Private Sub Form_KeyPress(KeyAscii As Integer) S1 = S1 & Chr(KeyAscii) Print S1 Text1.Text = S1 Text2.Text = S2 S1 = "" S2 = "" 程序运行后, 先后按 a b c 键, 然后单击命令按钮, 在文本框 Textl 和 Text2 中显示的内容分别为 ( ) A)abe 和 ABC B) 空白 C)ABC 和 abc D) 出错 2010 年 9 月笔试真卷及答案详解第 6 页 ( 共 12 页 )

7 二填空题 ( 每空 2 分, 共 30 分 ) (1) 一个栈的初始状态为空首先将元素 5,4,3,2,1 依次入栈, 然后退栈一次, 再将元素 A,B,C,D 依次入栈, 之后将所有元素全部退栈, 则所有元素退栈 ( 包括中间退栈的元素 ) 的顺序为 1 (2) 在长度为 n 的线性表中, 寻找最大项至少需要比较 2 次 (3) 一棵二叉树有 10 个度为 1 的结点,7 个度为 2 的结点, 则该二叉树共有 3 个结点 (4) 仅由顺序选择 ( 分支 ) 和重复 ( 循环 ) 结构构成的程序是 4 程序 (5) 数据库设计的四个阶段是 : 需求分析, 概念设计, 逻辑设计和 5 (6) 窗体上有一个名称为 Combol 的组合框, 其初始内容为空, 有一名称为 Commandl 标题为添加项目的命令按钮程序运行, 若单击命令按钮, 会将给定数组中的项目添加到组合框中, 如图请填空 Option Base 1 Dim city As Variant city = 6 (" 北京 ", " 天津 ", " 上海 ", " 武汉 ", " 重庆 ", " 西宁 ") For i = 7 To UBound(city) Combo1.AddItem 8 (7) 窗体上有一个名称为 Textl 的文本框和一个名称为 Commandl 标题为计算的命令按钮, 如图所示函数 fun 及命令按钮的单击事件过程如下, 请填空 Dim x As Integer x = Val(InputBox(" 输入数据 ")) Text1 = Str(fun(x) + fun(x) + fun(x)) Private Function fun(byref n As Integer) If n Mod 3 = 0 Then n = n + n Else n = n * n End If 9 = n End Function 当单击命令按钮, 在输入对话框中输入 2 时, 文本框中显示的是 10 (8) 窗体上有一个名称为 Listl 的列表框, 一个名称为 Picturel 的图片框 Form_Load 事件过程的作用是, 把 Datal.txt 文件中的物品名称添加到列表框中运行程序, 当双击列表框中的物品名称时, 可以把该物品对应的图片显示在图片框中, 如图所示以下是类型定义及程序, 请填空 Private Type Pic gname As String * 10 ' 物品名称 picfile As String * 20 ' 物品图片的图片文件名 End Type Dim p(4) As Pic, prec As Pic 2010 年 9 月笔试真卷及答案详解第 7 页 ( 共 12 页 )

8 Private Sub Form_Load() Open "Data1.txt" For Random As #1 11 = Len(pRec) For i = 0 To 4 Get #1, i + 1, p(i) List1.AddItem p(i). gname i Close #1 Private Sub List1_DblClick() For i = 0 To 4 If RTrim(List1.List(i)) = RTrim( 12 ) Then Picture1.Picture = LoadPicture(p(i). 13 ) Exit For End If (9) 窗体上有一个名称为 CDl 的通用对话框通过菜单编辑器建立如图 l 所示的菜单程序运行时, 如果单击打开菜单项, 则执行打开文件的操作, 当选定了文件 ( 例如 :G:\VB\2010-9\in.txt) 并打开后, 该文件的文件名会被添加到菜单中, 如图 2 所示各菜单项的名称和标题等定义如下表图 1 图 2 标题名称内缩索引可见文件 File 无无 True 打开 mnuopen 无 True 关闭 mnuclose 无 True - mnu 无 True ( 空 ) FName 0 False 以下是单击打开菜单项的事件过程, 请填空 Dim mnucounter As Integer Private Sub mnuopen_click() CD1.ShowOpen If CD1.FileName <> "" Then Open 14 For Input As #1 mnucounter = mnucounter + 1 Load fname(mnucounter) fname(mnucounter).caption = CD1.FileName fname(mnucounter). 15 = True Close #1 End If 2010 年 9 月笔试真卷及答案详解第 8 页 ( 共 12 页 )

9 2010 年 9 月全国计算机等级考试二级笔试试卷 Visual Basic 参考答案及详解一选择题 ( 每小题 2 分, 共 70 分 ) (1)B) 解析线性表的存储分为顺序存储和链式存储在顺序存储中, 所有元素所占的存储空间是连续的, 各数据元素在存储空间中是按逻辑顺序依次存放的所以每个元素只存储其值就可以了, 而在链式存储的方式中, 将存储空间的每一个存储结点分为两部分, 一部分用于存储数据元素的值, 称为数据域 ; 另一部分用于存储下一个元素的存储序号, 称为指针域所以线性表的链式存储方式比顺序存储方式的存储空间要大一些 (2)C) 解析在栈中, 允许插入与删除的一端称为栈顶, 而不允许插入与删除的另一端称为栈底栈跟队列不同, 元素只能在栈顶压入或弹出, 栈底指针不变, 栈中元素随栈顶指针的变化而动态变化, 遵循后进先出的规则 (3)D) 解析软件测试的目的是为了发现程序中的错误, 而软件调试是为了更正程序中的错误 (4)A) 解析软件危机主要表现在以下 6 个方面 : 1 软件需求的增长得不到满足 2 软件开发成本和进度无法控制 3 软件质量难以保证 4 软件不可维护或维护程序非常低 5 软件的成本不断提高 6 软件开发生产率的提高赶不上硬件的发展和应用需求的增长 (5)A) 解析软件生命周期是指软件产品从提出实现使用维护到停止使用退役的过程 (6)D) 解析面向对象方法中, 继承是使用已有的类定义作为基础建立新类的定义技术广义地说, 继承是指能够直接获得已有的性质和特征, 而不必重复定义它们 (7)D) 解析根据数据之间的联系方式, 可以把数据库分为层次型网状型和关系型数据库, 它们是根据数据之间的联系方式来划分的 (8)C) 解析如果一个工作人员只能使用一台计算机且一台计算机只能被一个工作人员使用, 则关系为一对一 ; 如果一个工作人员可以使用多台计算机, 但是一台计算机只能被一个工作人员使用, 则关系为一对多 ; 如果一个工作人员可以使用多台计算机, 一台计算机也可以被多个工作人员使用, 则关系为多对多 (9)C) 解析概念模式, 是由数据库设计者综合所有用户的数据, 按照统一的观点构造的全局逻辑结构, 是对数据库中全部数据的逻辑结构和特征的总体描述, 是所有用户的公共数据视图 ( 全局视图 ) 它是由数据库管理系统提供的数据模式描述语言 (Data Description Language,DDL) 来描述定义的, 体现反映了数据库系统的整体观外模式对应于用户级, 它是某个或某几个用户所看到的数据库的数据视图, 是与某一应用有关的数据的逻辑表示外模式是从模式导出的一个子集, 也称为子模式或用户模式, 它是用户的数据视图, 也就是用户所见到的数据模式, 它反映了用户对数据的要求包含模式中允许特定用户使用的那部分数据, 用户可以通过外模式描述语言来描述定义对应于用户的数据记录 ( 外模式 ), 也可以利用数据操纵语言 (Data Manipulation Language,DML) 对这些数据记录进行描述内模式, 对应于物理级, 它是数据库中全体数据的内部表示或底层描述, 是数据库最低一级的逻辑描述, 它描述了数据在存储介质上的存储方式和物理结构, 对应着实际存储在外存储介质上的数据库内模式由内模式描述语言来描述定义, 它是数据库的存储观 (10)A) 解析选择是单目运算, 其运算对象是一个表该运算按给定的条件, 从表中选出满足条件的行形成一个新表作为运算结果投影也是单目运算, 该运算从表中选出指定的属性值组成一个新表自然连接是一种特殊的等价连接, 它将表中有相同名称的列自动进行记录匹配自然连接不必指定任何同等连接条件 (11)A) 解析在 VB 集成环境中, 工具栏上的按钮可以完成需要的功能, 其中图标代表添加窗体, 图标代表新建工程, 图标代表打开菜单编辑器窗口, 图标代表打开属性窗口 2010 年 9 月笔试真卷及答案详解第 9 页 ( 共 12 页 )

10 (12)D) 解析 VB 中双击任何控件均会打开代码窗口 (13)B) 解析列表框和组合框都是一系列列表项的集合, 二者均具备 List 属性, 该属性是列表项组成的数组 ; 二者均具有 Style 属性, 列表框的 Style 属性用于设置是普通列表框还是复选式列表框, 组合框的 Style 属性用于设置风格 ; 组合框具有 Text 属性而列表框没有 ; 列表框的 MultiSelect 属性用于设置其是否可以多选, 而无论是列表框还是组合框均不具备 Selected 属性 (14)B) 解析控件数组是一组具有共同名称和类型的控件, 它们拥有共同的事件, 数组中的每个控件都有惟一的索引号 (Index), 即下标, 默认索引号从 0 开始每个数组元素的名称大小事件均使用同一个, 区别只在于 Index 属性不一样 (15)B) 解析滚动条可以响应的事件主要为 Scroll 事件和 Change 事件, 其中 Scroll 事件在拖动滚动块时被触发,Change 事件在滚动条的 Value 值改变时被触发 (16)B) 解析 IIf 函数可用于执行简单的条件判断操作, 它是 If Then Else 结构的简写版本格式 result=iif(< 条件 >,<True 部分 >,<False 部分 >) 说明 result 是函数的返回值, 条件是一个逻辑表达式当条件为真时, 返回 True 部分的值 ; 当条件为假时, 返回 False 部分的值本题中由于条件的判断值为 False, 故此函数返回值为 20 (17)C) 解析算术表达式的运算次序为 : 幂 (^) 取负 (-) 乘浮点除 (* /) 整除 (\) 取模 (Mod) 加减 (+ -) 连接 (&),Sgn 函数会返回参数的符号所以在本题中表达式等于 (-1)+ (36)+(-36), 最后结果为 -1 (18)A) 解析控件的 Top 属性指的是控件的上边距离该控件的容器上沿的长度, 由于命令按钮在图片框这个容器中, 所以其 Top 属性为 200 (19)B) 解析 MsgBox() 函数用于显示提示信息, 并可返回一个代表用户单击了哪个按钮的 Integer 类型值, 注意 : 这个返回值是 MsgBox() 函数的而不是 MsgBox 语句的其常用语法为 : MsgBox(prompt[,buttons][,title]) 其中 :prompt 参数为消息框的提示信息并不能省略 ;buttons 参数是一个整数用于控制消息框中按钮的数目类型及消息框图标的样式 ;title 参数为消息框标题栏上显示的内容, 若省略则为默认值 ( 也就是工程的名字 ) 本题中标题栏上的内容为变量 b, 即 hardware (20)A) 解析如果要在文本框中输入文本就改变标签的标题, 则应编写的是文本框的 Change 事件 (21)C) 解析命令按钮除响应 Click 事件外, 还能响应 GotFocus LostFocus MouseDown 等事件 (22)D) 解析局部变量是在过程 ( 事件过程或通用过程 ) 内定义的变量, 作用域为该变量所在的过程, 定义时使用 Dim Static 关键字使用 Dim 关键字定义的是动态局部变量, 过程执行结束后即被释放 ; 使用 Static 关键字定义的是静态局部变量, 过程执行结束后仍然保留 (23)B) 解析 Do 型循环结构, 首先看条件判断在循环体的前面还是后面, 如果是先判断条件, 则有可能一次也不执行循环体 ; 如果是后判断条件, 则无论条件是什么, 至少执行一次循环体在 Until 循环中条件为 False 时执行循环体, 条件为 True 时退出循环 ; 在 While 循环中条件为 True 时执行循环体, 条件为 False 时退出循环本题中第一次循环时由于不满足 y>4, 因此执行一次循环体, 随后就由于满足 y>4 而退出循环, 故此 x 的值为 4 (24)D) 解析 InputBox 函数可产生一个对话框, 这个对话框作为输入数据的界面, 等待用户输入数据, 并返回输入的内容 InputBox 函数其格式为 : InputBox(Prompt,[title][,default][,xpos,ypos][,helpfile,context]) 该函数有 7 个参数, 其中 Prompt 是必需的, 作为对话框消息出现的字符串表达式 Prompt 的最大长度大约是 1024 个字符, 由所用字符的宽度决定如果 Prompt 包含多个行, 则可在各行之间用回车符 (Chr(13)) 换行符 (Chr(10)) 或回车和换行符的组合 (Chr(13) & Chr(10)) 来分隔 ;Title 是可选的, 显示对话框标题栏中的字符串表达式如果省略 Title, 则把应用程序名放入标题栏中由于 InputBox 是一个函数而不是语句, 因此需要将其返回值保存至某个变量中 (25)C) 解析本题是一个简单的二重循环, 外循环执行第一次的时候在累加和 x 中加上 1, 外循环第二次的时候在累加和 x 中加上 2, 以此类推, 外循环循环 5 次, 累加和中的值为 =15 (26)A) 解析数组作为过程参数时只能通过传地址的方式来调用, 即实参的变化会影响到形参本题中在命令按钮的 Click 事件中首先为数组 a 依次赋值, 然后以数组 a 为参数调用过程 Subp, 在 Subp 过程中将形参数组 b 重新赋值, 这个操作也同时影响了形参 a, 因此, 逐行输出年 9 月笔试真卷及答案详解第 10 页 ( 共 12 页 )

11 (27)C) 解析在本题中通过分析题干中的程序可以看出, 函数的返回值就是变量 flag 的值错误现象是无论输入哪个正整数均会返回 False, 这就代表着没有执行循环, 直接输出的就是变量 flag 的初值 False 进一步分析可以看出, 由于 b 的初值为 1, 而任何正整数均不会小于 1, 所以永远无法满足循环条件从而进入循环, 因此需要将条件 x<b 改为 x>b (28)D) 解析在本题的每一次循环中, 首先取出字符串 a 中的第 k 位连接到 c 中, 然后取出字符串 b 中的第 k 位连接到 c 中, 若有一个字符串全部取完, 则将另一个字符串中的剩余内容连接到 c 中, 因此结果应该是 A1B2C3D456 (29)A) 解析本题是一个二重循环输出二维图形的程序, 其中外循环控制行, 内循环控制列在每一行中, 首先输出 m 的值, 然后输出 i 个星号, 即第一行是先输出 1 然后跟 4 个星号 ; 第二行先输出 2 然后跟 3 个星号 ; 第三行先输出 3 然后跟 2 个星号 ; 第四行先输出 4 然后跟 1 个星号 (30)D) 解析本题中第一次循环中累加的值是 a(3)*1 即 4, 第二次循环中累加的值是 a(2)*10 即 30, 第三次循环中累加的值是 a(1)*100 即 200, 第四次循环中累加的值是 a(0)*1000 即 1000, 因此最后结果为 1234 (31)D) 解析根据数据的存取方式和结构不同, 文件可分为顺序文件和随机文件顺序文件中的记录是一个接一个地顺序存放, 各个记录的长度可以不相同随机文件又称直接存取文件, 文件中的记录长度是固定的打开文件的基本格式为 :Open FileName For Mode As #FileNumber 打开方式(Mode) 主要有 Output Append Input Random 等几种其中, 打开随机文件要以 Random 方式打开, 并且指定记录长度 Len (32)C) 解析弹出式菜单是一种小型的菜单, 它可以在窗体的某一个地方显示出来, 对程序事件做出响应一般用于设计右键快捷菜单 ( 弹出式菜单 ) 建立弹出式菜单通常分为两步: 首先用菜单编辑器建立菜单 ; 然后用 PopupMenu 方法弹出显示弹出式菜单的 PopupMenu 方法应该针对主菜单项 (33)C) 解析本题是有关二维数组的处理, 在第一个二重循环中为二维数组 arr 赋初值, 复制后的 arr 数组中的数据为 : 在第二个循环中输出数组的部分值, 注意到在输出的值为 arr(j,i), 因此为 C 选项 (34)B) 解析题干中给出的函数作用为删除参数字符串中与 ch 相同的字符, 而在给出的程序段中, 每次遍历 str 参数中的每一个字符, 若其与 ch 相等, 则将其连接到结果字符串中, 这样显然是不合要求的, 应该是若取出的字符和 ch 不等则将其连接到结果中, 否则舍弃因此, 应将 If temp=ch Then 改为 If temp<>ch Then (35)A) 解析常见的键盘事件有:KeyDown KeyUp 和 KeyPress 当用户按下并释放一个可打印的键盘字符时,KeyDown KeyPress KeyUp 事件将依次发生,KeyPress 事件过程中不能识别键盘的按下与释放 KeyDown(KeyCode As Integer,Shift as Integer) 和 KeyUp(KeyCode As Integer,Shift as Integer) 有两个参数, 其中,KeyCode 参数是表示所按键的位置信息的代码 ( 将 A 和 a 作为同一个键返回, 而从大键盘上输出的 1 和右侧小键盘上输入的 1 将被视作不同的字符 );Shift 参数代表按键时 <Shift> <Ctrl> <Alt> 键的状态 KeyPress(KeyAscii As Integer) 事件中 KeyAscii 参数是所按键的 ASCII 的代码, 该参数不显示键盘的物理状态, 而只是传递一个字符 KeyPress 将每个字符的大小写形式作为不同的键代码解释, 即作为两种不同的字符本题 Form_KeyDown 事件过程的作用是 : 在按下键盘上的键后, 将该键对应位置的字符 ( 大写 ) 连入字符串变量 S2 中 Form_KeyPress 事件过程的作用是 : 在按下键盘上的键后, 将该键键码对应的字符 ( 区分大小写 ) 连入字符串变量 S1 中程序运行后, 输入 abc 后单击命令按钮,S2="ABC",S1="abc" 二填空题 ( 每空 2 分, 共 30 分 ) (1) 1 1DCBA2345 解析栈的特点是先进后出, 所以先入栈的元素是 5,4,3,2,1, 然后退栈一次, 此时元素 1 出栈, 接着元素 A,B,C,D, 依次入栈, 此时栈中的元素从栈低到栈端的顺序是 :5432ABCD, 之后将所有元素全部退栈, 此时出来的元素顺序就是上面元素顺序的逆序, 即 DCBA2345, 再加上第一次出栈的元素 1, 退栈顺序就是 1DCBA2345 (2) 2 n 年 9 月笔试真卷及答案详解第 11 页 ( 共 12 页 )

12 解析顺序查找线性表中的最大数, 从第一个元素开始两两比较, 先比较第 1 个和 2 个, 记录下较大的一个元素的下标, 再按顺序用线性表中下一个元素与这个较大的元素比较, 如果比这个较大的元素大, 就把这个大的元素的下标记录下来, 依次类推, 就可以找到最大的元素了, 所以比较的次数至少是 n-1 次 ( 注意 : 对于类似递增或递减的有序线性表, 通过 1 次比较得到排序方式即可得到最大数, 本题不考虑这种情况 ) (3) 3 25 解析二叉树有一条很重要的性质 : 度为 0 的结点的个数 = 度为 2 的结点的个数 +1 所以总个数为 : 度为 0 的结点的个数 + 度为 1 的结点的个数 + 度为 2 的结点的个数 =8+10+7=25 (4) 4 结构化解析结构化程序设计由顺序选择 ( 分支 ) 和重复 ( 循环 ) 结构构成 (5) 5 物理设计解析数据库设计的四个阶段是 : 需求分析概念设计, 逻辑设计和物理设计 (6) 6 Array city(i) 解析根据题意, 6 空处用于产生一个数组, 故此应该使用 Array 函数 ; 7 空处用于设定遍历数组的循环下界, 由于规定了数组下标从 1 开始, 故此应填 1; 8 空处用于将数组元素添加进列表框中, 故应为 : city(i) (7) 9 fun 解析在一个函数中最后的函数返回值以函数名返回, 因此 9 空处应填 fun; 本题中的函数使用的是地址传递, 即对实参的改变会影响到形参, 在第一次调用 fun(x) 时,x 的初值为 2, 调用结束后 x 的值变为 4, 同时返回函数值 4; 第二次调用函数时,x 的初值就为 4, 调用结束后 x 的值为 16, 同时返回函数值 16; 第三次调用时 x 的初值为 16, 调用结束后 x 的值为 256, 返回的函数值也为 256, 所以 9 空处输出的值应该为 =276 (8) 11 Len 12 p(i).gname 13 picfile 解析根据数据的存取方式和结构不同, 文件可分为顺序文件和随机文件顺序文件中的记录是一个接一个地顺序存放, 各个记录的长度可以不相同随机文件又称直接存取文件, 文件中的记录长度是固定的打开文件的基本格式为 :Open FileName For Mode As #FileNumber 打开方式 (Mode) 主要有 Output Append Input Random 等几种其中, 打开随机文件要以 Random 方式打开, 并且指定记录长度 Len, 因此, 按照格式 11 空处应填 Len 在列表框的双击事件中, 首先遍历所有的列表框, 依次判断列表项的值是否等于 p(i) 中的 gname 域的值, 若相等的话, 则取出图片路径 (p(i) 中 picfile 域的值 ), 使用 LoadPicture 函数为图片框加载图片 (9) 14 CD1.FileName 15 Visible 解析通用对话框的 FileName 属性返回的是对话框中选中的文件路径, 由于本题中需要打开在对话框中选中的文件, 因此在打开文件的语句 14 空处应该填写文件路径 ( 即 CD1.FileName) 一般可通过菜单设计器对已有的菜单进行增减 ; 也可通过菜单控件数组来实现菜单项的增减菜单控件数组可以在设计阶段建立, 也可以在运行时建立利用这一特点, 可在设计时建立菜单控件数组的第一个元素, 该元素的下标为 0 Visible 属性为 False 在程序运行时, 通过 Load 语句来建立该菜单控件数组的新元素, 并将其 Visible 属性置为 True, 从而实现增加菜单项的功能, 因此 15 空处应填 Visible 2010 年 9 月笔试真卷及答案详解第 12 页 ( 共 12 页 )

2010年3月计算机等级考试四级网络工程师笔试

2010年3月计算机等级考试四级网络工程师笔试计算机二级 VB 经典预测题下列各题 A) B) C) D) 四个选项中, 只有一个选项是正确的请将正确选项填涂在答题卡相应位置上, 答在试卷上不得分 (1) 下列叙述中正确的是 ( ) A) 循环队列是队列的一种链式存储结构 B) 循环队列是队