2023年全国计算机二级考试笔试试题.doc

2023年3月计算机等级考试二级Access试试题(文字版)
一、选择题(每小题2分，共70分)
下列各题A)、B)、C)、D)四个选项中，只有一个选项是对的的。请将对的选项填涂在答题卡相应位置上，答在试卷上不得分。　
(1)下列叙述中对的的是　
A)对长度为n的有序链表进行查找，最坏情况下需要的比较次数为n　
B)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n/2)
C)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(log2n)
D)对长度为n的有序链表进行对分查找，最坏情况下需要的比较次数为(n log2n)
(2)算法的时间复杂度是指
A)算法的执行时间
B)算法所解决的数据量
C)算法程序中的语句或指令条数
D)算法在执行过程中所需要的基本运算次数
(3)软件按功能可以分为：应用软件、系统软件和支撑软件(或工具软件)。下面属于系统软件的是
A)编辑软件
B)操作系统
C)教务管理系统
D)浏览器
(4)软件(程序)调试的任务是
A)诊断和改正程序中的错误
B)尽也许多地发现程序中的错误
C)发现并改正程序中的所有错误
D)拟定程序中错误的性质
(5)数据流程图(DFD图)是
A)软件概要设计的工具
B)软件具体设计的工具
C)结构化方法的需求分析工具
D)面向对象方法的需求分析工具
(6)软件生命周期可分为定义阶段，开发阶段和维护阶段。具体设计属于
A)定义阶段
B)开发阶段
C)维护阶段
D)上述三个阶段
(7)数据库管理系统中负责数据模式定义的语言是
A)数据定义语言
B)数据管理语言
C)数据操纵语言
D)数据控制语言
(8)在学生管理的关系数据库中，存取一个学生信息的数据单位是
A)文献
B)数据库
C)字段
D)记录
(9)数据库设计中，用E-R图来描述信息结构但不涉及信息在计算机中的表达，它属于数据库设计的
A)需求分析阶段
B)逻辑设计阶段
C)概念设计阶段
D)物理设计阶段
10)有两个关系R和T如下：　则由关系R得到关系T的操作是　
A)选择
B)投影
C)交
D)并(11)下列关于关系数据库中数据表的描述，对的的是
A)数据表互相之间存在联系，但用独立的文献名保存
B)数据表互相之间存在联系，是用表名表达互相间的联系
C)数据表互相之间不存在联系，完全独立
D)数据表既相对独立，又互相联系
(12)下列对数据输入无法起到约束作用的是
A)输入掩码
B)有效性规则
C)字段名称
D)数据类型
(13)Access中，设立为主键的字段
A)不能设立索引
B)可设立为“有(有反复)”索引
C)系统自动设立索引
D)可设立为“无”索引
(14)输入掩码字符“&”的含义是
A)必须输入字母或数字
B)可以选择输入字母或数字
C)必须输入一个任意的字符或一个空格
D)可以选择输入任意的字符或一个空格
(15)在Access中，假如不想显示数据表中的某些字段，可以使用的命令是
A)隐藏
B)删除　
C)冻结
D)筛选
(16)通配符“#”的含义是
A)通配任意个数的字符
B)通配任何单个字符
C)通配任意个数的数字字符
D)通配任何单个数字字符
(17)若规定在文本框中输入文本时达成密码“*”的显示效果，则应当设立的属性是
A)默认值
B)有效性文本
C)输入掩码
D)密码
(18)假设“公司”表中有编号、名称、法人等字段，查找公司名称中有“网络”二字的公司信息，对的的命令是
A)SELECT * FROM公司FOR名称 = " *网络* "
B)SELECT * FROM公司FOR名称LIKE "*网络*"
C)SELECT * FROM公司WHERE名称="*网络*"
D)SELECT * FROM公司WHERE名称LIKE"*网络*"
(19)运用对话框提醒用户输入查询条件，这样的查询属于
A)选择查询
B)参数查询
C)操作查询
D)SQL查询
(20)在SQL查询中“GROUP BY”的含义是
A)选择行条件
B)对查询进行排序
C)选择列字段
D)对查询进行分组
(21)在调试VBA程序时，能自动被检查出来的错误是
A)语法错误
B)逻辑错误
C)运营错误
D)语法错误和逻辑错误
(22)为窗体或报表的控件设立属性值的对的宏操作命令是
A)Set
B)SetData
C)SetValue
D)SetWarnings
(23)在已建窗体中有一命令按钮(名为Commandl)，该按钮的单击事件相应的VBA代码为：
　　Private Sub Commandl_Click()
　　subT.Form.RecordSource = "select * from雇员"
　　End Sub
单击该按钮实现的功能是
A)使用select命令查找“雇员”表中的所有记录
B)使用select命令查找并显示“雇员”表中的所有记录
　　C)将subT窗体的数据来源设立为一个字符串
　　D)将subT窗体的数据来源设立为“雇员”表
　　(24)在报表设计过程中，不适合添加的控件是
　　A)标签控件
　　B)图形控件
　　C)文本框控件
　　D)选项组控件
　　(25)下列关于对象“更新前”事件的叙述中，对的的是
　　A)在控件或记录的数据变化后发生的事件
　　B)在控件或记录的数据变化前发生的事件
　　C)当窗体或控件接受到焦点时发生的事件
　　D)当窗体或控件失去了焦点时发生的事件
　　(26)下列属于告知或警告用户的命令是
　　A)PrintOut
　　B)OutputTo
　　C)MsgBox
　　D)RunWarnings
　　(27)可以实现从指定记录集里检索特定字段值的函数是
　　A)Nz
　　B)Find
　　C)Lookup
　　D)DLookup
　　(28)假如X是一个正的实数，保存两位小数、将千分位四舍五入的表达式是
　　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)，则该数组的元素个数为
　　A)20
　　B)24
　　C)25
　　D)36
　　(30)由“For i=1 To 9 Step -3”决定的循环结构，其循环体将被执行
　　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
　　打开窗体运营后，单击命令按钮，文本框中显示的结果是
　　A)1
　　B)7
　　C)17
　　D)400
　　(32)在窗体上有一个命令按钮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，立即窗口上输出的结果是
　　A)37 55 64 28 19 19
　　B)10 50 20
　　C)10 50 20 0
　　D)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
　　打开窗体运营后，单击命令按钮，立即窗口上输出的结果是
　　A)2 32
　　B)12 3
　　C)2 2
　　D)12 32
　　34)在窗体上有一个命令按钮Commandl，编写事件代码如下：
　　Private Sub Commandl_Click()
　　Dim d1 As Date
　　Dim d2 As Date
　　dl = #12/25/2023#
　　d2 = #1/5/2023#
　　MsgBox DateDiff(” ww”, d1, d2)
　　End Sub
　　打开窗体运营后，单击命令按钮，消息框中输出的结果是
　　A)1
　　B)2
　　C)10
　　D)11
　　(35)下列程序段的功能是实现“学生”表中“年龄”字段值加1
　　Dim Str As String
　　Str=" "
　　Docmd.RunSQL Str
　　空白处应填入的程序代码是
　　A)年龄=年龄+1
　　B)Update学生 Set 年龄=年龄+1
　　C)Set 年龄=年龄+1
　　D)Edit 学生 年龄=年龄+l
二、填空题(每空2分，共30分)
　　请将每一个空的对的答案写在答题卡【l】~【15】序号的横线上，答在试卷上不得分。
　　(1)一个队列的初始状态为空。现将元素A,B,C,D,E,F,5,4,3,2,1依次入队，然后再依次退队，则元素退队的顺序为 【1】 。
　　(2)设某循环队列的容量为50，假如头指针front=45(指向队头元素的前一位置)，尾指针rear=10(指向队尾元素)，则该循环队列中共有 【2】 个元素。
(3)设二叉树如下：

　　对该二叉树进行后序遍历的结果为 【3】 。
(4)软件是 【4】 、数据和文档的集合。
　　(5)有一个学生选课的关系，其中学生的关系模式为：学生(学号，姓名，班级，年龄)，课程的关系模式为：课程(课号，课程名，学时)，其中两个关系模式的键分别是学号和课号，则关系模式选课可定义为：选课(学号， 【5】 ，成绩)。
(6)下图所示的窗体上有一个命令按钮(名称为Command1)和一个选项组(名称为Framel)，选项组上显示“Framel”文本的标签控件名称为Labell，若将选项组上显示文本“Frame1”改为汉字“性别”，应使用的语句是【6】。

　　(7)在当前窗体上，若要实现将焦点移动到指定控件，应使用的宏操作命令是【7】。
(8)使用向导创建数据访问页时，在拟定分组级别环节中最多可设立【8】个分组字段。
　　(9)在窗体文本框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(KeyAscii);
　　Case Else
　　KeyAscii = 0
　　End Select
　　End Sub
　　(10)在窗体上有一个命令按钮Commandl，编写事件代码如下：
　　Private Sub Command1_Click()
　　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 Sub
打开窗体运营后，单击命令按钮，消息框中输出的结果是【10】。
(11)下列程序的功能是找出被5、7除，余数为1的最小的5个正整数。请在程序空白处填入适当的语句，使程序可以完毕指定的功能。
　　Private Sub Form_Click()
　　Dim Ncount %, n%
　　n = n + 1
　　If 【11】 Then
　　Debug.Print n
　　Ncount =Ncount + 1
　　End If
　　Loop Until Ncont = 5
　　End Sub
　　(12)以下程序的功能是在立即窗口中输出100到200之间所有的素数，并记录输出素数的个数。请在程序空白处填入适当的语句，使程序可以完毕指定的功能。
　　Private Sub Command2_Click()
　　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 Then
　　t = t + 1
　　Debug.Print i
　　End If
　　Next i
　　Debug.Print "t="; t
　　End Sub
　　(13)数据库中有工资表，涉及“姓名”、“工资”和“职称”等字段，现要对不同职称的职工增长工资，规定专家职称增长15%，副专家职称增长10%，其别人员增长5%。下列程序的功能是按照上述规定调整每位职工的工资，并显示所涨工资之总和。请在空白处填入适当的语句，使程序可以完毕指定的功能。
　　Private Sub Command5_Click()
　　Dim ws 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 = CurrentDb()
　　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