1、全国计算机等级考试二级 Access 真题 2010 年 3 月及答案解析(总分：100.00，做题时间：90 分钟)一、选择题（每小题 2 分，共 70 分）(总题数：35，分数：70.00)1.下列叙述中，正确的是 （分数：2.00）A.对长度为 n 的有序链表进行查找，最坏情况下需要的比较次数为 nB.对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为（n/2）C.对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为（log2n）D.对长度为 n 的有序链表进行对分查找，最坏情况下需要的比较次数为（n log2n）2.算法的时间复杂度是指 （分数：2.00）A.
2、算法的执行时间B.算法所处理的数据量C.算法程序中的语句或指令条数D.算法在执行过程中所需要的基本运算次数3.软件按功能可以分为：应用软件、系统软件和支撑软件（或工具软件）。下面属于系统 软件的是 （分数：2.00）A.编辑软件B.操作系统C.教务管理系统D.浏览器4.软件（程序）调试的任务是 （分数：2.00）A.诊断和改正程序中的错误B.尽可能多地发现程序中的错误C.发现并改正程序中的所有错误D.确定程序中错误的性质5.数据流程图（DFD 图）是 （分数：2.00）A.软件概要设计的工具B.软件详细设计的工具C.结构化方法的需求分析工具D.面向对象方法的需求分析工具6.软件生命周期可分为定
3、义阶段，开发阶段和维护阶段。详细设计属于 （分数：2.00）A.定义阶段B.开发阶段C.维护阶段D.上述三个阶段7.数据库管理系统中负责数据模式定义的语言是 （分数：2.00）A.数据定义语言B.数据管理语言C.数据操纵语言D.数据控制语言8.在学生管理的关系数据库中，存取一个学生信息的数据单位是 （分数：2.00）A.文件B.数据库C.字段D.记录9.数据库设计中，用 E-R 图来描述信息结构但不涉及信息在计算机中的表示，它属于数据库设计的 （分数：2.00）A.需求分析阶段B.逻辑设计阶段C.概念设计阶段D.物理设计阶段10.有两个关系 R 和 T 如下： （分数：2.00）A.选择B.投
4、影C.交D.并11.下列关于关系数据库中数据表的描述，正确的是 （分数：2.00）A.数据表相互之间存在联系，但用独立的文件名保存B.数据表相互之间存在联系，是用表名表示相互间的联系C.数据表相互之间不存在联系，完全独立D.数据表既相对独立，又相互联系12.下列对数据输入无法起到约束作用的是 （分数：2.00）A.输入掩码B.有效性规则C.字段名称D.数据类型13.Access 中，设置为主键的字段 （分数：2.00）A.不能设置索引B.可设置为“有（有重复）”索引C.系统自动设置索引D.可设置为“无”索引14.输入掩码字符“”的含义是 （分数：2.00）A.必须输入字母或数字B.可以选择输入
5、字母或数字C.必须输入一个任意的字符或一个空格D.可以选择输入任意的字符或一个空格15.在 Access 中，如果不想显示数据表中的某些字段，可以使用的命令是 （分数：2.00）A.隐藏B.删除C.冻结D.筛选16.通配符“#”的含义是 （分数：2.00）A.通配任意个数的字符B.通配任何单个字符C.通配任意个数的数字字符D.通配任何单个数字字符17.若要求在文本框中输入文本时达到密码“*”的显示效果，则应该设置的属性是 （分数：2.00）A.默认值B.有效性文本C.输入掩码D.密码18.假设“公司”表中有编号、名称、法人等字段，查找公司名称中有“网络”二字的公司信息，正确的命令是 （分数：2
6、.00）A.SELECT * FROM 公司 FOR 名称 = “ *网络* “B.SELECT * FROM 公司 FOR 名称 LIKE “*网络*“C.SELECT * FROM 公司 WHERE 名称=“*网络*“D.SELECT * FROM 公司 WHERE 名称 LIKE“*网络*“19.利用对话框提示用户输入查询条件，这样的查询属于 （分数：2.00）A.选择查询B.参数查询C.操作查询D.SQL 查询20.在 SQL 查询中“GROUP BY”的含义是 （分数：2.00）A.选择行条件B.对查询进行排序C.选择列字段D.对查询进行分组21.在调试 VBA 程序时，能自动被检查
7、出来的错误是 （分数：2.00）A.语法错误B.逻辑错误C.运行错误D.语法错误和逻辑错误22.为窗体或报表的控件设置属性值的正确宏操作命令是 （分数：2.00）A.SetB.SetDataC.SetValueD.SetWarnings23.在已建窗体中有一命令按钮（名为 Commandl），该按钮的单击事件对应的 VBA 代码为： Private Sub Commandl_Click() subT.Form.RecordSource = “select * from 雇员“ End Sub 单击该按钮实现的功能是 （分数：2.00）A.使用 select 命令查找“雇员”表中的所有记录B.使
8、用 select 命令查找并显示“雇员”表中的所有记录C.将 subT 窗体的数据来源设置为一个字符串D.将 subT 窗体的数据来源设置为“雇员”表24.在报表设计过程中，不适合添加的控件是 （分数：2.00）A.标签控件B.图形控件C.文本框控件D.选项组控件25.下列关于对象“更新前”事件的叙述中，正确的是 （分数：2.00）A.在控件或记录的数据变化后发生的事件B.在控件或记录的数据变化前发生的事件C.当窗体或控件接收到焦点时发生的事件D.当窗体或控件失去了焦点时发生的事件26.下列属于通知或警告用户的命令是 （分数：2.00）A.PrintOutB.OutputToC.MsgBoxD
9、.RunWarnings27.能够实现从指定记录集里检索特定字段值的函数是 （分数：2.00）A.NzB.FindC.LookupD.DLookup28.如果 X 是一个正的实数，保留两位小数、将千分位四舍五入的表达式是 （分数：2.00）A.0.01*Int(x+0.05)B.0.01*Int(100*(X+0.005)C.0.01*Int(x+0.005)D.0.01*Int(100*(X+0.05)29.在模块的声明部分使用“Option Base 1”语句，然后定义二维数组 A(2 to 5,5)，则该数组的元素个数为 （分数：2.00）A.20B.24C.25D.3630.由“For
10、 i=1 To 9 Step -3”决定的循环结构，其循环体将被执行 （分数：2.00）A.0 次B.1 次C.4 次D.5 次31.在窗体上有一个命令按钮 Commandl 和一个文本框 Textl，编写事件代码如下： Private Sub Command1_Click() Dim i,j,x For i = 1 To 20 step 2 x = 0 For j = To 20 step 3 x = x + 1 Next j Next i Textl.Value=Str(x) End Sub 打开窗体运行后，单击命令按钮，文本框中显示的结果是 （分数：2.00）A.1B.7C.17D.40
11、032.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Commandl_Click() Dim y As Integer y = 0 Do y = InputBox(“y=“) If (y Mod 10) + Int(y / 10) = 10 Then Debug.Print y; Loop Until y = 0 End Sub 打开窗体运行后，单击命令按钮，依次输入 10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是 （分数：2.00）A.37 55 64 28 19 19B.10 50 20C.10 50 20 0D
12、.37 55 64 28 1933.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Debug.Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是 （分数：2.00）A.2 32B.12 3C.2
13、 2D.12 3234.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Commandl_Click() Dim d1 As Date Dim d2 As Date dl = #12/25/2009# d2 = #1/5/2010# MsgBox DateDiff(” ww”, d1, d2) End Sub 打开窗体运行后，单击命令按钮，消息框中输出的结果是 （分数：2.00）A.1B.2C.10D.1135.下列程序段的功能是实现“学生”表中“年龄”字段值加 1 Dim Str As String Str=“ “ Docmd.RunSQL Str 空白
14、处应填入的程序代码是 （分数：2.00）A.年龄=年龄+1B.Update 学生 Set 年龄=年龄+1C.Set 年龄=年龄+1D.Edit 学生 年龄=年龄+l二、填空题（每空 2 分，共 30 分）(总题数：13，分数：30.00)36.一个队列的初始状态为空。现将元素 A,B,C,D,E,F,5,4,3,2,1 依次入队，然后再依次退队，则元素退队的顺序为 【l】 。（分数：2.00）填空项 1:_37.设某循环队列的容量为 50，如果头指针 front=45（指向队头元素的前一位置），尾指针 rear=10（指向队尾元素），则该循环队列中共有【2】个元素。 （分数：2.00）填空项
15、1:_38.设二叉树如下： （分数：2.00）填空项 1:_39.软件是【4】、数据和文档的集合。 （分数：2.00）填空项 1:_40.有一个学生选课的关系，其中学生的关系模式为：学生（学号，姓名，班级，年龄），课程的关系模式为：课程（课号，课程名，学时），其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课（学号，【5】，成绩）。 （分数：2.00）填空项 1:_41.下图所示的窗体上有一个命令按钮（名称为 Command1）和一个选项组（名称为 Framel），选项组上显示“Framel”文本的标签控件名称为 Labell，若将选项组上显示文本“Frame1”改为汉字“性别
16、”，应使用的语句是【6】。 （分数：2.00）填空项 1:_42.在当前窗体上，若要实现将焦点移动到指定控件，应使用的宏操作命令是【7】。 （分数：2.00）填空项 1:_43.使用向导创建数据访问页时，在确定分组级别步骤中最多可设置【8】个分组字段。（分数：2.00）填空项 1:_44.在窗体文本框 Text l 中输入“456AbC”后，立即窗口上输出的结果是【9】。 Private Sub Textl_KeyPress(KeyAscii As Integer) Select Case DeyAscii Case 97 To 122 Debug.Print Ucase(Chr(KeyAsc
17、ii); Case 65 To 90 Debug.Print Lcase(Chr(KeyAscii); Case 48 To 57 Debug.Print Chr(KeyAscii); Case Else KeyAscii = 0 End Select End Sub （分数：2.00）填空项 1:_45.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Command1_Click1 Dim a(10), p(3) As Integer k = 5 For i = 1 To 10 a(i) = i * i Next i For i = 1 To 3 p(i
18、) = a(i * i) Next i For i = 1 To 3 k = k + p(i) *2 Next i MsgBox k End Sub 打开窗体运行后，单击命令按钮，消息框中输出的结果是【10】。 （分数：2.00）填空项 1:_46.下列程序的功能是找出被 5、7 除，余数为 1 的最小的 5 个正整数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Form_Click1 Dim Ncount %, n% n = n + 1 If 【11】 Then Debug.Print n Ncount =Ncount + 1 End If Loop U
19、ntil Ncont = 5 End Sub （分数：2.00）填空项 1:_以下程序的功能是在立即窗口中输出 100 到 200 之间所有的素数，并统计输出素数的个数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Command2_Click1 Dim i%, j%, k%, t % t 为统计素数的个数 Dim b As Boolean For i = 100 To 200 b = True k = 2 j = Int(Sqr(i) Do While k = j And b If I Mod k = 0 Then b = 【12】 End If k =
20、【13】 Loop If b = True Then t = t + 1 Debug.Print i End If Next i Debug.Print “t=“; t End Sub （分数：4.00）填空项 1:_填空项 1:_数据库中有工资表，包括“姓名”、“工资”和“职称”等字段，现要对不同职称的职工增加工资，规定教授职称增加 15%，副教授职称增加 10%，其他人员增加 5%。下列程序的功能是按照上述规定调整每位职工的工资，并显示所涨工资之总和。请在空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Command5_Click1 Dim ws As DAO.W
21、orkspace Dim db As DAO.Database Dim rs As DAO.Recordset Dim gz As DAO.Field Dim zc As DAO.Field Dim sum As Currency Dim rate As Single Set db = CurrentDb2 Set rs = db.OpenRecordset(“工资表“） Set gz = rs.Fields(“工资“) Set zc = rs.Fields(“职称“) sum = 0 Do While Not 【14】 rs.Edit Select Case zc Case Is = “教授
22、“ rate = 0.15 Case Is = “副教授“ rate = 0.1 Case Else rate = 0.05 End Select sum = sum + gz * rate gz = gz + gz * rate 【15】 rs.MoveNext Loop rs.Close db.Close Set rs = Nothing Set db = Nothing MsgBox “涨工资总计:“ Loop Until y = 0 End Sub 打开窗体运行后，单击命令按钮，依次输入 10、37、50、55、64、20、28、19、-19、0，立即窗口上输出的结果是 （分数：2.0
23、0）A.37 55 64 28 19 19B.10 50 20C.10 50 20 0D.37 55 64 28 19 解析：33.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Command1_Click() Dim x As Integer, y As Integer x = 12: y = 32 Call Proc(x, y) Debug.Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer) n = n Mod 10 m = m Mod 10 End Sub 打开窗
24、体运行后，单击命令按钮，立即窗口上输出的结果是 （分数：2.00）A.2 32 B.12 3C.2 2D.12 32解析：34.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Commandl_Click() Dim d1 As Date Dim d2 As Date dl = #12/25/2009# d2 = #1/5/2010# MsgBox DateDiff(” ww”, d1, d2) End Sub 打开窗体运行后，单击命令按钮，消息框中输出的结果是 （分数：2.00）A.1B.2 C.10D.11解析：35.下列程序段的功能是实现“学生”表中
25、“年龄”字段值加 1 Dim Str As String Str=“ “ Docmd.RunSQL Str 空白处应填入的程序代码是 （分数：2.00）A.年龄=年龄+1B.Update 学生 Set 年龄=年龄+1 C.Set 年龄=年龄+1D.Edit 学生 年龄=年龄+l解析：二、填空题（每空 2 分，共 30 分）(总题数：13，分数：30.00)36.一个队列的初始状态为空。现将元素 A,B,C,D,E,F,5,4,3,2,1 依次入队，然后再依次退队，则元素退队的顺序为 【l】 。（分数：2.00）填空项 1:_ （正确答案：A,B,C,D,E,F,5,4,3,2,1）解析：37.
26、设某循环队列的容量为 50，如果头指针 front=45（指向队头元素的前一位置），尾指针 rear=10（指向队尾元素），则该循环队列中共有【2】个元素。 （分数：2.00）填空项 1:_ （正确答案：15）解析：38.设二叉树如下： （分数：2.00）填空项 1:_ （正确答案：EDBGHFCA）解析：39.软件是【4】、数据和文档的集合。 （分数：2.00）填空项 1:_ （正确答案：程序）解析：40.有一个学生选课的关系，其中学生的关系模式为：学生（学号，姓名，班级，年龄），课程的关系模式为：课程（课号，课程名，学时），其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课
27、（学号，【5】，成绩）。 （分数：2.00）填空项 1:_ （正确答案：课程）解析：41.下图所示的窗体上有一个命令按钮（名称为 Command1）和一个选项组（名称为 Framel），选项组上显示“Framel”文本的标签控件名称为 Labell，若将选项组上显示文本“Frame1”改为汉字“性别”，应使用的语句是【6】。 （分数：2.00）填空项 1:_ （正确答案：Labell.Caption=“性别“）解析：42.在当前窗体上，若要实现将焦点移动到指定控件，应使用的宏操作命令是【7】。 （分数：2.00）填空项 1:_ （正确答案：SetFocus）解析：43.使用向导创建数据访问页时
28、，在确定分组级别步骤中最多可设置【8】个分组字段。（分数：2.00）填空项 1:_ （正确答案：4）解析：44.在窗体文本框 Text l 中输入“456AbC”后，立即窗口上输出的结果是【9】。 Private Sub Textl_KeyPress(KeyAscii As Integer) Select Case DeyAscii Case 97 To 122 Debug.Print Ucase(Chr(KeyAscii); Case 65 To 90 Debug.Print Lcase(Chr(KeyAscii); Case 48 To 57 Debug.Print Chr(KeyAsci
29、i); Case Else KeyAscii = 0 End Select End Sub （分数：2.00）填空项 1:_ （正确答案：456aBc）解析：45.在窗体上有一个命令按钮 Commandl，编写事件代码如下： Private Sub Command1_Click1 Dim a(10), p(3) As Integer k = 5 For i = 1 To 10 a(i) = i * i Next i For i = 1 To 3 p(i) = a(i * i) Next i For i = 1 To 3 k = k + p(i) *2 Next i MsgBox k End S
30、ub 打开窗体运行后，单击命令按钮，消息框中输出的结果是【10】。 （分数：2.00）填空项 1:_ （正确答案：201）解析：46.下列程序的功能是找出被 5、7 除，余数为 1 的最小的 5 个正整数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Form_Click1 Dim Ncount %, n% n = n + 1 If 【11】 Then Debug.Print n Ncount =Ncount + 1 End If Loop Until Ncont = 5 End Sub （分数：2.00）填空项 1:_ （正确答案：n Mod 5=1 An
31、d n Mod 7=1）解析：以下程序的功能是在立即窗口中输出 100 到 200 之间所有的素数，并统计输出素数的个数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Command2_Click1 Dim i%, j%, k%, t % t 为统计素数的个数 Dim b As Boolean For i = 100 To 200 b = True k = 2 j = Int(Sqr(i) Do While k = j And b If I Mod k = 0 Then b = 【12】 End If k = 【13】 Loop If b = True Th
32、en t = t + 1 Debug.Print i End If Next i Debug.Print “t=“; t End Sub （分数：4.00）填空项 1:_ （正确答案：false）解析：填空项 1:_ （正确答案：false）解析：数据库中有工资表，包括“姓名”、“工资”和“职称”等字段，现要对不同职称的职工增加工资，规定教授职称增加 15%，副教授职称增加 10%，其他人员增加 5%。下列程序的功能是按照上述规定调整每位职工的工资，并显示所涨工资之总和。请在空白处填入适当的语句，使程序可以完成指定的功能。 Private Sub Command5_Click1 Dim ws
33、As DAO.Workspace Dim db As DAO.Database Dim rs As DAO.Recordset Dim gz As DAO.Field Dim zc As DAO.Field Dim sum As Currency Dim rate As Single Set db = CurrentDb2 Set rs = db.OpenRecordset(“工资表“） Set gz = rs.Fields(“工资“) Set zc = rs.Fields(“职称“) sum = 0 Do While Not 【14】 rs.Edit Select Case zc Case Is = “教授“ rate = 0.15 Case Is = “副教授“ rate = 0.1 Case Else rate = 0.05 End Select sum = sum + gz * rate gz = gz + gz * rate 【15】 rs.MoveNext Loop rs.Close db.Close Set rs = Nothing Set db = Nothing MsgBox “涨工资总计:“ & sum End Sub （分数：4.00）填空项 1:_ （正确答案：rs.EOF）填空项 1:_ （正确答案：rs.update）解析：_解析：_解析：
