2023年全国计算机等级考试二级笔试试题及参考答案.doc

2023年3月全国计算机等级考试二级Access笔试试题及参考答案
2023年3月全国计算机等级考试二级Access笔试试题
一、选择题
(1)下列关于栈叙述对的的是
A)栈顶元素最先能被删除
B)栈顶元素最后才干被删除
C)栈底元素永远不能被删除
D)以上三种说法都不对
(2)下列叙述中对的的是
A)有一个以上根结点的数据结构不一定是非线性结构
B)只有一个根结点的数据结构不一定是线性结构
C)循环链表是非线性结构
D)双向链表是非线性结构
(3)某二叉树共有7个结点，其中叶子结点只有1个，则该二叉树的深度为(假设根结点在第1层)
A)3
B)4
C)6
D)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如下：

则由关系R和S得到关系T的操作是
A)自然连接
B)交
C)除
D)并
(10)定义无符号整数类为UInt,下面可以作为类UInt实例化值的是
A)-369
B)369
C)0.369
D)整数集合{1,2,3,4,5}
(11)在学生表中要查找所有年龄大于30岁姓王的男同学，应当采用的关系运算是
A)选择
B)投影
C)联接
D)自然联接
(12)下列可以建立索引的数据类型是
A)文本
B)超级链接
C)备注
D)OLE对象
(13)下列关于字段属性的叙述中，对的的是
A)可对任意类型的字段设立“默认值”属性
B)定义字段默认值的含义是该字段值不允许为空
C)只有“文本”型数据可以使用“输入掩码向导”
D)“有效性规则”属性只允许定义一个条件表达式
(14)查询“书名”字段中包含“等级考试”字样的记录，应当使用的条件是
A)Like "等级考试"
B)Like "*等级考试。
C)Like "等级考试*"
D)Like "*等级考试*"
(15)在Access中对表进行“筛选”操作的结果是
A)从数据中挑选出满足条件的记录
B)从数据中挑选出满足条件的记录并生成一个新表
C)从数据中挑选出满足条件的记录并输出到一个报表中
D)从数据中挑选出满足条件的记录并显示在一个窗体中
(16)在学生表中使用“照片”字段存放相片，当使用向导为该表创建窗体时，照片字段使用的默认控件是
A)图形
B)图像
C)绑定对象框
D)未绑定对象框
(17)下列表达式计算结果为日期类型的是
A)#2023-1-23# - #2023-2-3#
B)year(#2023-2-3#)
C)DateValue("2023-2-3")
D)Len("2023-2-3")
(18)若要将“产品”表中所有供货商是“ABC”的产品单价下调50，则对的的SQL语句是 update 表白 set 字段名=表达式 where 条件
A)UPDATE 产品 SET 单价=50 WHERE 供货商="ABC"
B)UPDATE 产品 SET 单价=单价-50 WHERE 供货商="ABC"
C)UPDATE FROM 产品 SET单价=50 WHERE 供货商="ABC"
D)UPDATE FROM 产品 SET单价=单价-50 WHERE 供货商="ABC"
(19)若查询的设计如下，则查询的功能是

A)设计尚未完毕，无法进行记录
B)记录班级信息仅含Null(空)值的记录个数
C)记录班级信息不涉及Null(空)值的记录个数
D)记录班级信息涉及Null(空)值所有记录个数
(20)在教师信息输入窗体中,为职称字段提供“专家”、“副专家”、“讲师”等选项供用户直接选择，应使用的控件是
A)标签
B)复选框
C)文本框
D)组合框
(21)在报表中要显示格式为“共N页，第N页”的页码,对的的页码格式设立是
A)="共"+Pages+"页，第"+Page+"页"
B)="共"+[Pages]+"页，第"++"页"
C)="共"&Pages&"页，第"&Page&"页"
D)="共" & [Pages] & "页，第" & [Page] & "页"
(22)某窗体上有一个命令按钮,规定单击该按钮后调用宏打开应用程序Word，则设计该宏时应选择的宏命令是
A)RunApp
B)RunCode
C)RunMacro
D)RunCommand
(23)下列表达式中,能对的表达条件“x和y都是奇数”的是
A)x Mod 2=0 And y Mod 2=0
B)x Mod 2=0 Or y Mod 2=0
C)x Mod 2=1 And y Mod 2=1
D)x Mod 2=1 Or y Mod 2=1
(24)若在窗体设计过程中，命令按钮Command0的事件属性设立如下图所示，则含义是

A)只能为"进入"事件和"单击"事件编写事件过程
B)不能为"进入"事件和"单击"事件编写事件过程
C)“进入”事件和“单击”事件执行的是同一事件过程
D)已经为“进入”事件和“单击”事件编写了事件过程
(25)若窗体Frm1中有一个命令按钮Cmd1，则窗体和命令按钮的Click事件过程名分别为
A)Form_Click() Command1_Click()
B)Frm1_Click() Command1_Click()
C)Form_Click() Cmd1_Click()
D) Frm1_Click() Cmd1_Click()
(26)在VBA中，能自动检查出来的错误是
A)语法错误
B)逻辑错误
C)运营错误
D)注释错误
(27)下列给出的选项中，非法的变量名是
A)Sum
B)Integer_2
C)Rem
D)Form1
(28)假如在被调用的过程中改变了形参变量的值;但又不影响实参变量自身，这种参数传递方式称为
A)按值传递 Byval
B)按地址传递
C)ByRef传递
D)按形参传递
(29)表达式“B=INT(A+0.5)”的功能是
A)将变量A保存小数点后1位
B)将变量A四舍五入取整
C)将变量A保存小数点后5位
D)舍去变量A的小数部分
(30)VBA语句“ Dim NewArray(10) as Integer ” 的含义是
NewArray(0)、NewArray(1)、NewArray(2)、……NewArray(10)
A)定义10个整型数构成的数组NewArray
B)定义11个整型数构成的数组NewArray
C)定义1个值为整型数的变量NewArray(10)
D)定义1个值为10的变量NewArray
(31)运营下列程序段，结果是
For m=10 to 1 step 0
k=k+3
Next m
A)形成死循环
B)循环体不执行即结束循环
C)出现语法错误
D)循环体执行一次后结束循环
(32)运营下列程序，结果是
Private Sub Command32_Click()
f0=1:f1=1:k=1
Do While k<=5
f=f0+f1
f0=f1
f1=f
k=k+1
Loop
MsgBox "f="&f
End Sub
A)f=5
B)f=7
C)f=8
D)f=13
(33)有如下事件程序，运营该程序后输出结果是
Private Sub Command33_Click()
Dim x As Integer,y As Integer
x=1:y=0
Do Until y<=25
y=y+x*x
x=x+1
Loop
MsgBox "x="& x &", y=" & y
End Sub、

A)x=1,y=0
B) x=4,y=25
C)x=5,y=30
D)输出其他结果
(34)下列程序的功能是计算sum=1+(1+3)+(1+3+5)+……+(1+3+5+……+39)
Private Sub Command34_Click()
t=0
m=1
sum=0
Do
t=t+m
sum=sum+t
m=______
Loop While m<=39
MsgBox "Sum="&sum
End Sub
为保证程序对的完毕上述功能，空白处应填入的语句是
A)m+1
B)m+2
C)t+1
D)t+2
(35)下列程序的功能是返回当前窗体的记录集
Sub GetRecNum()
Dim rs As Object
Set rs=______
MsgBox rs.RecordCount
End Sub
为保证程序输出记录集(窗体记录源)的记录数，空白处应填入的语句是
A)Recordset
B)Me.Recordset
C)RecordSource
D)Me.RecordSource
二、填空题
(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)在Access查询的条件表达式中要表达任意单个字符，应使用通配符 【6】 。
(7)在SELECT语句中，HAVING子句必须与 【7】 子句一起使用。
(8)若要在宏中打开某个数据表，应使用的宏命令是 【8】 。
(9)在VBA中要将数值表达式的值转换为字符串，应使用函数 【9】 。
(10)运营下列程序，输入如下两行：
Hi,
I am here.
弹出的窗体中的显示结果是 【10】 。
Private Sub Command11_Click()
Dim abc As String, sum As string
sum=""
Do
abc=InputBox("输入abc")
If Right(abc,1)="." Then Exit Do
sum=sum+abc
Loop
MsgBox sum
End Sub
(11)运营下列程序，窗体中的显示结果是：x= 【11】 。
Option Compare Database
Dim x As Integer
Private Sub Form_Load()
x=3
End Sub
Private Sub Command11_Click()
Static a As Integer
Dim b As Integer
b=x^2
fun1 x,b
fun1 x,b
MsgBox "x="&x
End Sub
Sub fun1(ByRef y As Integer,ByVal z As Integer)
y=y+z
z=y-z
End Sub
(12)“秒表”窗体中有两个按钮(“开始/停止”按钮bOK,“暂停/继续”按钮bPus);一个显示计时的标签1Num;窗体的“计时器间隔”设为100计时精度为0.1秒。
规定：打开窗体如图1所示;第一次单击“开始婷止”按钮，从0开始滚动显示计时(见图2);10秒时单击“暂停/继续”按钮，显示暂停(见图3)，但计时还在继续;若20秒后再次单击“暂停/继续”按钮，计时会从30秒开始继续滚动显示;第二次单击“开始/停止”按钮，计时停止，显示最终时间(见图4)。若再次单击“开始/停止”按钮可重新从0开始计时。

相关的事件程序如下。请在空白处填入适当的语句，使程序可以完毕指定的功能。
Option Compare Database
Dim flag,pause As Boolean
Private Sub bOK Click()
flag= 【12】
Me!bOK.Enabled=True
Me!bPus.Enabled=flag
End Sub
Private Sub bPus_Click()
pause=Not pause
Me!bOK.Enabled=Not Me!bOK.Enabled
End Sub
Private Sub Form Open(Cancel As Integer)
flag=False
pause=False
Me!bOK.Enabled=True
Me!bPus.Enabled=False
End Sub
Private Sub Form Timer()
Static count As Single
If flag=True Then
If pause=False Then
Me!1Num.Caption=Round(count,1)
End If
count= 【13】
Else
count=0
End If
End Sub
(13)数据库中有“学生成绩表”，涉及“姓名”、“平时成绩”、“考试成绩”和“期末总评”等字段。现要根据“平时成绩”和“考试成绩”对学生进行“期末总评”。规定：“平时成绩”加“考试成绩”大于等于85分，则期末总评为“优”，“平时成绩”加“考试成绩”小于60分，则期末总评为“不及格”，其他情况期末总评为“合格”。
下面的程序按照上述规定计算每名学生的期末总评。请在空白处填入适当的语句，使程序可以完毕指定的功能。
Private Sub Command0_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim pscj,kscj,qmzp As DAO.Field
Dim count As Integer
Set db=CurrentDb()
Set rs=db.OpenRecordset("学生成绩表")
Set pscj=rs.Fields("平时成绩")
Set kscj=rs.Fields("考试成绩")
Set qmzp=rs.Fields("期末总评")
count=0
Do While Not rs.EOF
【14】
If pscj+kscj>=85 Then
qmzp="优"
ElseIf pscj+kscj<60 Then
qmzp="不及格"
Else
qmzp="合格"
End If
rs.Update
count=count+1
【15】
Loop
rs.Close
db.Close
Set rs=Nothing
Set db=Nothing
MsgBox "学生人数："&count
End Sub

参考答案
一、选择题
1-5 ABDDB
6-10 ACDCB
11-15 AADDA
16-20 CCBCD
21-25 DACDD
26-30 ACABB
31-35 BDABB
二、填空题
（1）顺序
（2）DEBFCA
（3）单元
（4）关键字 或 主键
（5）D
（6）?
（7）Group By
（8）OpenTable
（9）Str
（10）Hi,
（11）21
（12）not flag
（13）count+0.1
（14）rs.Edit
（15）rs.MoveNext