2022年计算机等级考试二级笔试试卷Access数据库程序设计.doc

计算机级别考试二级笔试试卷Access数据库程序设计

（考试时间90分钟，满分100分）

一、选用题（（1）~（35）每题2分，共70分）
下列各题A）、B）、C）、D）四个选项中，只有一种选项是对旳，请将对旳选项涂写在答题卡相应位置上，答在试卷上不得分。
（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）DYBEAFCZX B）YDEBFZXCA
C）ABDYECFXZ D）ABCDEFXYZ
（7）某二叉树中有n个度为2结点，则该二叉树中叶子结点数为______。
A）n+1 B）n-1 C）2n D）n/2
（8）在下列关系运算中，不变化关系表中属性个数但能减少元组个数是______。
A）并 B）交 C）投影 D）笛卡尔乘积
（9）在E-R图中，用来体现实体之间联系图形是______。
A）矩形 B）椭圆形 C）菱形 D）平行四边形
（10）下列论述中错误是______。
A）在数据库系统中，数据物理构造必须和逻辑构造一致
B）数据库技术主线目旳是要解决数据共享问题
C）数据库设计是指在已有数据库管理系统基本上建立数据库
D）数据库系统需要操作系统支持
（11）在关系数据库中，可以惟一地标记一种记录属性或属性组合，称为______。
A）核心字 B）属性 C）关系 D）域
（12）在现实世界中，每个人所有有自己出生地，实体“人”和实体“出生地”之间联系是______。
A）一对一联系 B）一对多联系
C）多对多联系 D）无联系
（13）Access数据库具有诸多特点，下列论述中，不是Access特点是______。
A）Access数据库可以保存多种数据类型，涉及多媒体数据
B）Access可以通过编写应用程序来操作数据库中数据
C）Access可以支持Internet/Intranet应用
D）Access作为网状数据库模型支持顾客机/服务器应用系统
（14）在关系运算中，选用运算含义是______。
A）在基本表中，选用满足条件元组构成一种新关系
B）在基本表中，选用需要属性构成一种新关系
C）在基本表中，选用满足条件元组和属性构成一种新关系
D）以上三种说法均是对旳
（15）邮政编码是由6位数字构成字符串，为邮政编码设立输入掩码，对旳是______。
A）000000 B）999999 C）CCCCCC D）LLLLLL
（16）如果字段内容为声音文献，则该字段数据类型应定义为______。
A）文本 B）备注 C）超级链接 D）OLE对象
（17）规定主表中没有有关记录时就不能将记录添加到有关表中，则应当在表关系中设立______。
A）参照完整性 B）有效性规则 C）输入掩码 D）级联更新有关字段
（18）在Access中已建立了“工资”表，表中涉及“职工号”、“所在单位”、“基本工资”和“应发工资”等字段，如果要按单位记录应发工资总数，那么在查询设计视图“所在单位”“总计”行和“应发工资”“总计”行中分别选用是______。
A）sum，group by B）count，group by
C）group by，sum D）group by，count
（19）在创立交叉表查询时，列标题字段值显示在交叉表位置是______。
A）第一行 B）第一列 C）上面若干行 D）左面若干列
（20）在Access中已建立了“学生”表，表中有“学号”、“姓名”、“性别”和“入学成绩”等字段。实行如下SQL命令：
Select 性别,avg (入学成绩) From 学生 Group by 性别
其成果是______。
A）计算并显示所有学生性别和入学成绩平均值
B）按性别分组计算并显示性别和入学成绩平均值
C）计算并显示所有学生入学成绩平均值
D）按性别分组计算并显示所有学生入学成绩平均值
（21）窗口事件是指操作窗口时所引起事件。下列事件中，不属于窗口事件是______。
A）打开 B）关闭 C）加载 D）取消
（22）Access数据库中，若规定在窗体上设立输入数据是取自某一种表或查询中记录数据，或取自某固定内容数据，可以使用控件是______。
A）选项组控件 B）列表框或组合框控件
C）文本框控件 D）复选框、切换按钮、选项按钮控件
（23）要在查找体现式中使用通配符通配一种数字字符，应选用通配符是______。
A）* B）？ C）！ D）#
（24）在Access中已建立了“雇员”表，其中有可以存储照片字段。在使用向导为该表创立窗体时，“照片”字段所使用默认控件是______。
A）图像框 B）绑定对象框
C）非绑定对象框 D）列表框
（25）在报表设计时，如果只在报表最后一页主体内容后来输出规定内容，则需要设立是______。
A）报表页眉 B）报表页脚 C）页面页眉 D）页面页脚
（26）数据访问页是一种独立于Access数据库文献，该文献类型是______。
A）TXT文献 B）HTML文献 C）MDB文献 D）DOC文献
（27）在一种数据库中已经设立了自动宏AutoExec，如果在打开数据库时候不想实行这个自动宏，对旳操作是______。
A）用Enter键打开数据库 B）打开数据库时按住Alt键
C）打开数据库时按住Ctrl键 D）打开数据库时按住Shift键
（28）有如下语句：
s=Int(100*Rnd)
实行完毕后，s值是______。
A）[0,99]随机整数 B）[0,100]随机整数
C）[1,99]随机整数 D）[1,100]随机整数
（29）InputBox函数返回值类型是______。
A）数值 B）字符串
C）变体 D）数值或字符串（视输入数据而定）
（30）假设某数据库已建有宏对象“宏1”，“宏1”中只有一种宏操作SetValue，其中第一种参数项目为“[Label0].[Caption]”，第二个参数体现式为“[Text0]”。窗体“fmTest”中有一种标签Label0和一种文本框Text0，现设立控件Text0“更新后”事件为运营“宏1”，则成果是______。
A）将文本框清空
B）将标签清空
C）将文本框中内容复制给标签标题，使两者显示相似内容
D）将标签标题复制到文本框，使两者显示相似内容

（31）在窗体中添加一种名称为Command1命令按钮，然后编写如下事件代码：
Private Sub Command1_Click( )
a = 75
If a>60 Then
k = 1
ElseIf a>70 Then
k = 2
ElseIf a>80 Then
k = 3
ElseIf a>90 Then
k = 4
EndIf
MsgBox k
End Sub
窗体打开运营后，单击命令按钮，则消息框输出成果是______。
A）1 B）2 C）3 D）4
（32）设有如下窗体单击事件过程：
Private Sub Form_Click( )
a = 1
For i= 1 To 3
Select Case i
Case 1,3
a= a+1
Case 2,4
a = a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运营后，单击窗体，则消息框输出成果是______。
A）3 B）4 C）5 D）6
（33）设有如下程序
Private Sub Command1_Click( )
Dim sum As Double， x As Double
sum = 0
n = 0
For i=1 To 5
x = n / i
n = n + 1
sum = sum + x
Next i
End Sub
该程序通过For循环来计算一种体现式值，这个体现式是______。
A）1+1/2+2/3+3/4+4/5 B）1+1/2+1/3+1/4+1/5
C）1/2+2/3+3/4+4/5 D）1/2+1/3+1/4+1/5
（34）下列Case语句中错误是______。
A）Case 0 To 10 B）Case Is>10
C）Case Is>10 And Is<50 D）Case 3,5,Is>10
（35）如下程序段定义了学生成绩记录类型，由学号、姓名和三门课程成绩（百分制）构成。
Type Stud
no As Integer
name As String
score (1 to 3) As Single
End Type
若对某个学生各个数据项进行赋值，下列程序段中对旳是______。
A）Dim S As Stud B）Dim S As Stud
Stud.no = 1001 S.no = 1001
Stud.name = "舒宜" S.name = "舒宜"
Stud.score = 78,88,96 S.score = 78,88,96
C）Dim S As Stud D）Dim S As Stud
Stud.no = 1001 S.no = 1001
Stud.name = "舒宜" S.name = "舒宜"
Stud.score(1) = 78 S.score(1) = 78
Stud.score(2) = 88 S.score(2) = 88
Stud.score(3) = 96 S.score(3) = 96

二、填空题（每空2分，共30分）
请将每空对旳答案写在【1】～【15】序号横线上，答在试卷上不得分。
（1）在深度为7满二叉树中，度为2结点个数为 【1】 。
（2）软件测试分为白箱（盒）测试和黑箱（盒）测试。等价类划分法属于 【2】 测试。
（3）在数据库系统中，实现多种数据管理功能核心软件称为 【3】 。
（4）软件生命周期可分为多种阶段，一般分为定义阶段、开发阶段和维护阶段。编码和测试属于 【4】阶段。
（5）在构造化分析使用数据流图（DFD）中，运用 【5】 对其中图形元素进行确切解释。
（6）如果表中一种字段不是本表主核心字，而是此外一种表主核心字或候选核心字，这个字段称为_ 【6】 。
（7）在SQLSelect命令中用 【7】 短语对查询成果进行排序。
（8）报表记录分组操作时，一方面要选定分组字段，在这些字段上值 【8】 记录数据归为同一组。
（9）如果盼望按满足指定条件实行宏中一种或多种操作，此类宏称为 【9】 。
（10）退出Access应用程序VBA代码是 【10】 。
（11）在VBA编程中检测字符串长度函数名是 【11】 。
（12）若窗体中已有一种名为Command1命令按钮、一种名为Label1标签和一种名为Text1文本框，且文本框内容为空，然后编写如下事件代码：
Private Function f(x As Long ) As Boolean
If x Mod 2 = 0 Then
f = True
Else
f = False
End If
End Function
Private Sub Command1_Click( )
Dim n As Long
n = Val(Me!text1)
p = IIf(f(n)，"Even number"，"Odd number")
Me!Label1.Caption = n & " is "& p
End Sub
窗体打开运营后，在文本框中输入21，单击命令按钮，则标签显示内容为 【12】 。
（13）有如下顾客定义类型及操作语句：
Type Student
SNo As String
SName As String
IAge As Integer
End Type
Dim Stu As Student
With Stu
.SNo = " 09001"
.SName = "陈果果"
.IAge = 19
End With
实行MsgBox Stu.IAge后，消息框输出成果是 【13】 。
（14）已知一种名为“学生”Access数据库，库中表“Stud”存储学生基本信息，涉及学号、姓名、性别和籍贯。下面程序功能是：通过下图所示窗体向“Stud”表中添加学生记录，相应“学号”、“姓名”、“性别”和“籍贯”四个文本框名称分别为tNo、tName、tSex和tRes。当单击窗体中“增长”命令按钮（名称为Command1）时，一方面鉴定学号与否反复，如果不反复则向“stud”表中添加学生记录；如果学号反复，则给出提示信息。

请根据所规定功能，将如下程序补充完整。
Dim ADOcn As New ADODB.Connection
Private Sub Form_Load( )
' 打开窗口时，连接Access数据库
Set ADOcn = CurrentProject.Connection
End Sub

Private Sub Command1_Click( )
' 增长学生记录
Dim strSQL As String
Dim ADOrs As New ADODB.Recordset
Set ADOrs.ActiveConnection = ADOcn
ADOrs.Open "Select 学号 From Stud Where 学号= '" + tNo + "'"
If Not ADOrs. 【14】 Then
' 如果该学号学生记录已经存在，则显示提示信息
MsgBox "你输入学号已存在，不能增长！"
Else
' 增长新学生记录
strSQL = "Insert Into stud (学号,姓名,性别,籍贯) "
strSQL = strSQL + "Values('"+tNo+"'，'"+tName+"'，'"+tSex+"' ,' "+tRes+"') "
ADOcn.Execute 【15】
MsgBox "添加成功，请继续！"
End If
ADOrs.Close
Set ADOrs = Nothing
End Sub