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

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

　　则由关系R和S得到关系T的操作是
　　A)自然连接
　　B)交
　　C)投影
　　D)并
（11）在Access中要显示“教师表”中姓名和职称的信息，应采用的关系运算是 B
　　A）选择
　　B）投影
　　C）连接
　　D）关联
（12）学校图书馆规定，一名旁听生同时只能借一本书，一名在校生同时可以借5本书，一名教师同时可以借10本书，在这种情况一F,读者与图书之间形成了借阅关系，这种借阅关系是 D
　　A）一对一联系
　　B）一对五联系
　　C）一对十联系
　　D）一对多联系
13） Access数据库最基础的对象是 A
　　A）表
　　B）宏
　　C）报表
　　D）查询
（14）下列关于货币数据类型的叙述中，错误的是 C
　　A）货币型字段在数据表中占8个字节的存储空间
　　B）货币型字段可以与数字型数据混合计算，结果为货币型
　　C）向货币型字段输入数据时，系统自动将其设立为4位小数
　　D）向货币型字段输入数据时，不必输入人民币符号和千位分隔符
（15）若将文本型字段的输入掩码设立为“####-######”,则对的的输入数据是 B
　　A）0755-abcdet
　　B） 077-12345
　　C）a cd-123456
　　D）####-######
（16）假如在查询条件中使用通配符“[]”,其含义是 D
　　A）错误的使用方法
　　B）通配不在括号内的任意字符 [! ]
　　C）通配任意长度的字符
　　D）通配方括号内任一单个字符
（17）在SQL语言的SELECT语句中，用于实现选择运算的子句是 D
　　A）FOR
　　B）IF
　　C）WHILE
　　D）WHERE
（18）在数据表视图中，不能进行的操作是 B
　　A）删除一条记录
　　B）修改字段的类型
　　C）删除一个字段
　　D）修改字段的名称
（19）下列表达式计算结果为数值类型的是 A
　　A）#5/5/2023#-#5/1/2023#
　　B）“102”>“11”
　　C）102=98+4
　　D）#5/1/2023#+5
（20）假如在文本框内输入数据后，按enter键或按tab键，输入焦点可立即移至下一指定文本框，应设立 B
　　A）“制表位”属性
　　B）“Tab键索引”属性
　　C）“自动Tab键”属性
　　D）“Enter键行为”属性
（21）在成绩中要查找成绩≥80且成绩≤90的学生，对的的条件表达式是 A
　　A）成绩Between 80 And 90
　　B）成绩Between 80 To 90
　　C）成绩Between 79 And 91
　　D成绩Between 79 To 91
（22）“学生表”中有“学号”、“姓名”、“性别”和“入学成绩”等字段。执行如下SQL命令后的结果是
　　Select avg（入学成绩）From学生表Group by性别 D
　　A）计算并显示所有学生的平均入学成绩
　　B）计算并显示所有学生的性别和平均入学成绩
　　C）按性别顺序计算并显示所有学生的平均入学成绩
D）按性别分组计算并显示不同性别学生的平均入学成绩
（23）若在“销售总数”窗体中有“订货总数”文本框控件，可以对的引用控件值的是 D
　　A）Forms.[销售总数].[订货总数]
　　B）Forms![销售总数l.[订货总数]
　　C）Forms.[销售总数]![订货总数]
　　D）Forms![销售总数]![订货总数]
（24）因修改文本框中的数据而触发的事件是 A
　　A）Change
　　B）Edit
　　C）Getfocus
　　D）LostFocus
（25）在报表中，要计算“数学”字段的最低分，应将控件的“控件来源”属性设立为 A
　　A）=Min（[数学]）
　　B）=Min（数学）
　　C）=Min[数学]
　　D）Min（数学）
（26）要将一个数字字符串转换成相应的数值，应使用的函数是 A
　　A）Val
　　B）Single
　　C）Asc
　　D）Space
（27）下列变量名中，合法的是 C
　　A）4A
　　B）A-1
　　C）ABC_1
　　D）private
（28）若变量i的初值为8,则下列循环语句中循环体的执行次数为
　　Do While i<=17 8,10,12,14,16
　　 i=i+2
　　Loop C
　　A）3次
　　B）4次
　　C）5次
　　D）6次
（29）InputBox函数的返回值类型是 B
　　A）数值
　　B）字符串
　　C）变体
　　D）视输入的数据而定
（30）下列可以互换变量X和Y值的程序段是 C
　　A）Y=X:X=Y
　　B）Z=X:Y=Z:X=Y
　　C）Z=X:X=Y:Y=Z
　　D）Z=X:W=Y:Y=Z:X=Y
（31）窗体中有命令按钮Commandl,事件过程如下：
　　Public Function f（x As Integer） As Integer
　　 Dim y As Integer
　　 x=20
　　 y=2
　　 f=x*y
　　End Function
　　Private Sub Commandl_Click（）
　　 Dim y As Integer
　　 Static x As Integer
　　 x=10
　　 y=5
　　 y=f（x）
　　 Debug.Print x;y
　　End Sub
　　运营程序，单击命令按钮，则立即窗口中显示的内容是 D
　　A）10 5
　　B）10 40
　　C）20 5
　　D）20 40
（32）窗体中有命令按钮Commandl和文本框Text1,事件过程如下：
　　Function result（ByVal x As Integer）As Boolean
　　 If x Mod 2=0 Then
　　 result=True
　　 Else
　　 result=False
　　 End If
　　End Function
　　Private Sub Commandl_Click（）
　　 x=Val（InputBox（“请输入一个整数”））
　　 If ______ Then
　　 Text1=Str（x）&“是偶数.”
　　 Else
　　 Text1=Str（x）&“是奇数.”
　　 End  If
　　End Sub
　　运营程序，单击命令按钮，输入19,在Text1中会显示“19是奇数”.那么在程序的空白处应填写 B
　　A）result（x）=“偶数”
　　B）resultx）
　　C）resuIt（x）=“奇数”
　　D）NOT result（x）
（33）窗体有命令按钮Commandl和文本框Textl,相应的事件代码如下：
　　Private Sub Commandl_Click（  ）
　　 For  i=1  To  4
　　 x=3
　　 For j=1 To 3
　　 For k=1 To 2
　　 x=x+3
　　 Next k
　　 Next j
　　 Next i
　　 Text1 Value=Str（x）
　　End Sub
　　运营以上事件过程，文本框中的输出是 D
　　A）6
　　B）12
　　C）18
　　D）21
（34）窗体中有命令按钮run34,相应的事件代码如下：
　　Private Sub run34_Enter（）
　　 Dim num As Integer,a As Integer,b As Integer,i As Integer
　　 For i=1 To 10
　　 num=InputBox（“请输入数据：”,“输入”）
　　 If Int（num/2）=num/2 Then
　　 a=a+1
　　 Else
　　 b=b+1
　　 End If
　　 Next i
　　 MsgBox（“运营结果：a=”&Str（a）&“,b=”&Str（b））
　　End Sub
　　运营以上事件过程，所完毕的功能是 C
　　A）对输入的10个数据求累加和
　　B）对输入的10个数据求各自的余数，然后再进行累加
　　C）对输入的10个数据分别记录奇数和偶数的个数
　　D）对输入的10个数据分别记录整数和非整数的个数
（35）运营下列程序，输入数据8, 9, 3, 0后，窗体中显示结果是 C
　　Private Sub Form _click（）
　　 Dim sum AsInteger,m As Integer
　　 sum=0
　　 Do
　　 m=InputBox（“输入m”）
　　 sum=sum+m
　　 Loop Until m=0
　　 MsgBox sum
　　End Sub
　　A）0
　　B）17
　　C）20
　　D）21
二、填空题（每空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）假如规定在执行查询时通过输入的学号查询学生信息，可以采用【6】。
（7）Access中产生的数据访问页会保存在独立文献中，其文献格式是【7】。
（8）可以通过多种方法执行宏：在其他宏中调用该宏；在VBA程序中调用该宏；【8】发生时触发该宏。
（9）在VBA中要判断一个字段的值是否为Null,应当使用的函数是【9】。
（10）下列程序的功能是求方程：x2十y2=1000的所有整数解。请在空白处填入适当的语句，使程序完毕指定的功能。
　　Private Sub Commandl_Click（）
　　 Dim x as integer,y as integer
　　 For x= -34 To 34
　　 For y= -34 To 34
　　 If【10】Then
　　 Debug .Print xy
　　 End If
　　 Next y
　　 Next x
　　End Sub
（11）下列程序的功能是求算式：1+1/2 ! +1/3!+1/4!+……前10项的和（其中n!的含义是n的阶乘）。请在空白处填入适当的语句，使程序完毕指定的功能。
　　Private Sub Commandl_Click（）
　　 Dim i as integer,s as single,a as single
　　 a=1:s=0
　　 For i=1 To 10
　　 a=【11】
　　 s=sa
　　 Next i
　　 Debug .Print “1+1/2!十1/3!+. …=”;s
　　End Sub
（12）在窗体中有一个名为Command12的命令按钮，Click事件功能是：接受从键盘输入的10个大于0的不同整数，找出其中的最大值和相应的输入位置。请在空白处填入适当语句，使程序可以完毕指定的功能。
　　Private Sub Command12_Click（）
　　 max=0
　　 maxn=0
　　 for i=1 To 10
　　 num=Val（InputBox（”请输入第“&i&”个大于0的整数：“
　　 If【12】Then
　　 max=num
　　 maxn=【13】
　　 End If
　　 Next i
　　 MsgBox（”最大值为第“&maxn&”个输入的“&max）
　　End Sub
（13）数据库的”职工基本情况表“有”姓名“和”职称“等字段，要分别记录专家、副专家和其别人员的数量。请在空白处填入适当语句，使程序可以完毕指定的功能。
　　Private Sub Commands_Click（）
　　 Dim db As DAO .Database
　　 Dim rs As DAO .Recordset
　　 Dim zc As DAO .Field
　　 Dim Countl As Integer,Count2 As Integer,Count3 As Integer
　　 Set db=CurrentDb（）
　　 Set rs=db .OpenRecordset（”职工基本情况表“）
　　 Set zc=rs .Fields（”职称“）
　　 Countl=0 : Count2=0 : Count3=0
　　 Do While Not【14】rs.eof
　　 Select Case zc
　　 Case Is=”专家“
　　 Countl=Countl+1
　　 CaseIs=”副专家“
　　 Count2=Count2+1
　　 Case Else
　　 Courit3=Count3+1
　　 End Select
　　 【15】rs.movenext
　　 Loop
　　 rs .Close
　　 Set rs=Nothing
　　 Set db=Nothing
　　 MsgBox”专家：“&Count1&”,副专家：“&Count2 &”,其他：“&count3
　　End Sub

答案
选择题：
1-5.BCDAA
1-6.DDCAA
11-15.BDACB
16-20.DDBAB
21-25.ADDAA
26-30.ACCBC
31-35.BBDCC

填空题：
1.1DCBA2345
2.㏒2（n）
3.25
4.结构化程序设计
5.物理设计
6.参数
7.html
8.控件事件 或 事件
9.isnull
10.x*x+y*y=1000 或 X^2+Y^2=1000
11.a*(1/i)
12.num>=max 或 num>max
13.i
14.rs.eof
15.rs.movenext