2025年计算机二级Access数据库程序设计秋季培训试题及答案

2025年计算机二级Access数据库程序设计秋季培训试题及答案考试时间：______分钟总分：______分姓名：______一、选择题（每小题2分，共30分）1.在关系模型中，用来唯一标识实体元组的属性或属性组称为（）。A.关键字B.外部关键字C.主属性D.候选关键字2.以下哪个不是数据库三级模式结构中的层次？（）A.概念模式B.内模式C.外模式D.物理模式3.在Access数据库中，用于存储大量文本或二进制数据字段的数据类型是（）。A.文本B.日期/时间C.附件D.是/否4.以下哪个操作不属于数据完整性约束？（）A.实体完整性B.参照完整性C.用户定义完整性D.逻辑完整性5.在Access中，用于创建选择查询的视图是（）。A.设计视图B.数据表视图C.SQL视图D.数据透视表视图6.以下SQL语句中，用于创建表的语句是（）。A.CREATEVIEWB.CREATEINDEXC.CREATETABLED.CREATEFORM7.在Access中，若要使子表中的记录自动地根据相关联的主表中的记录而更新，应设置主表和子表之间的关系属性中的（）。A.查询参照完整性B.更新参照完整性C.删除参照完整性D.忽略参照完整性8.以下哪个控件通常用于在用户之间提供反馈信息？（）A.文本框B.标签C.框架D.提示框9.在VBA中，用于声明变量的关键字是（）。A.DimB.VariableC.ConstD.Public10.在VBA中，若要在代码块中结束当前过程并返回调用它的过程，应使用（）语句。A.ExitB.EndC.ReturnD.ExitSub/ExitFunction（根据上下文，通常写具体形式）11.以下哪个VBA运算符的优先级最高？（）A.*B./C.+D.=12.在Access中，用于存储精确小数的字段数据类型是（）。A.数字（单精度）B.数字（双精度）C.数字（小数）D.日期/时间13.以下SQL语句中，用于删除表记录的语句是（）。A.DELETEB.REMOVEC.DROPD.ERASE14.在VBA中，要访问当前记录的“姓名”字段（假设字段名为Name），可以使用（）表达式。A.Forms!FormName!NameB.Forms!FormName!Recordset!NameC.Forms!FormName!Recordset.NameD.Me.Name15.在Access中，报表的数据源可以是（）。A.表B.查询C.表或查询D.SQL语句二、填空题（每空2分，共20分）1.关系模型中，实体之间的联系通常有种，分别是一对一、______和______。2.Access数据库中，用于存储货币值的数据类型是______。3.SQL语句中，用于连接多个表的子句是______。4.在VBA中，要声明一个长整型变量，可以使用______关键字。5.在Access中，为了防止用户输入不符合要求的数据，可以使用______控件或数据有效性规则。6.若要在一个查询中同时包含来自两个不同表的数据，通常需要使用______查询。7.在VBA编程中，用于暂时中断代码执行，并允许用户查看当前变量值的语句是______。8.Access中的窗体通常有三种基本类型：______窗体、______窗体和______窗体。9.语句`Ifx>10Theny=1Elsey=0`是VBA中的______结构。10.在Access中，要创建一个包含所有员工姓名和部门名称的查询，通常需要使用______操作。三、操作题（共50分）1.表设计（15分）某学校需要建立一个数据库来管理教师信息。请设计一个名为“教师表”（Teacher）的结构，要求包含以下字段：*教师编号（TeacherID）：文本类型，长度为8，设置为主键。*姓名（Name）：文本类型，长度为20。*性别（Gender）：是/否类型。*职称（Title）：文本类型，长度为10。*出生日期（BirthDate）：日期/时间类型。*联系电话（Phone）：文本类型，长度为15。*确定哪些字段可以作为外部关键字与其他表建立关系（说明理由），并为教师表设置适当的字段属性（如设置出生日期不能为空，联系电话可以为空等）。2.SQL查询（15分）假设有两个表：“学生表”（Student，包含字段：StudentID,StudentName,ClassID）和“课程表”（Course，包含字段：CourseID,CourseName,TeacherID）。请编写SQL语句完成以下查询：*查询选修了“数据库原理”课程（假设CourseName为'数据库原理'）的所有学生的姓名和课程名称。（要求使用内连接JOIN）*查询每个班级的学生人数。（要求使用GROUPBY子句）*查询没有联系电话的教师的信息。（要求使用ISNULL）3.VBA编程（20分）假设有一个Access窗体名为“学生信息录入”，其中包含以下控件：*文本框：txtStudentID（学生编号），txtStudentName（学生姓名），txtClassID（班级编号），txtPhone（联系电话）*命令按钮：btnSave（保存数据）*窗体级变量：DimdbAsDAO.Database*请编写btnSave按钮的单击事件（Click）代码，实现以下功能：*在“学生表”（Student）中查找是否存在该学生编号（txtStudentID）。*如果存在，更新该学生的姓名、班级编号和联系电话。*如果不存在，向“学生表”中插入一条新记录，包含学生编号、姓名、班级编号和联系电话。*代码中需要包含错误处理机制，以防止数据库操作失败。*操作完成后，提示用户“数据已保存”。---试卷答案一、选择题1.D解析：候选关键字是能够唯一标识实体元组的属性或属性组，关键字是主属性或候选关键字。2.D解析：数据库三级模式结构包括概念模式、外模式、内模式。3.C解析：附件类型用于存储大量文本或二进制数据。4.D解析：数据完整性约束包括实体完整性、参照完整性和用户定义完整性。5.A解析：设计视图是创建和编辑选择查询的常用视图。6.C解析：CREATETABLE语句用于创建表。7.B解析：更新参照完整性确保子表中引用的值在主表中更新时也会相应更新。8.D解析：提示框（MsgBox）通常用于在用户之间提供反馈信息。9.A解析：Dim是VBA中用于声明变量的关键字。10.D解析：ExitSub和ExitFunction是用于退出子程序和函数过程的语句。11.D解析：赋值运算符（=）的优先级最低，其他运算符优先级更高。12.C解析：数字（小数）类型用于存储精确小数。13.A解析：DELETE语句用于删除表记录。14.D解析：Me表示当前窗体，可以直接访问其控件和记录集。15.C解析：报表的数据源可以是表或查询。二、填空题1.一对多解析：关系模型中，实体之间的联系有三种：一对一、一对多、多对多。2.货币解析：货币是Access中用于存储货币值的数据类型。3.JOIN解析：JOIN子句用于在SQL查询中连接多个表。4.Long解析：Long关键字用于声明长整型变量。5.数据有效性解析：数据有效性控件或规则用于防止用户输入不符合要求的数据。6.连接解析：连接查询用于同时包含来自两个或多个不同表的数据。7.Debug.Print解析：Debug.Print语句用于在立即窗口中输出信息，常用于调试。8.数据表式、窗体式、数据透视表式解析：Access窗体有三种基本类型：数据表式、窗体式和数据透视表式。9.If...Else解析：Ifx>10Theny=1Elsey=0是VBA中的If...Else条件结构。10.联接解析：要创建包含所有员工姓名和部门名称的查询，通常需要使用联接操作。三、操作题1.表设计*字段名称：TeacherID数据类型：文本长度：8属性：主键*字段名称：Name数据类型：文本长度：20*字段名称：Gender数据类型：是/否*字段名称：Title数据类型：文本长度：10*字段名称：BirthDate数据类型：日期/时间属性：不能为空*字段名称：Phone数据类型：文本长度：15属性：可以为空*外部关键字：TeacherID理由：教师编号可以作为外部关键字与其他表（如课程表、授课表）建立关系，唯一标识每位教师。*其他属性：*Name：不能为空*Title：可以为空（可能存在未定职位的教师）*Gender：不能为空*BirthDate：不能为空2.SQL查询*```sqlSELECTStudent.StudentName,Course.CourseNameFROMStudentINNERJOINCourseONStudent.CourseID=Course.CourseIDWHERECourse.CourseName='数据库原理';```解析：使用INNERJOIN连接Student表和Course表，根据学生选修课程ID关联，WHERE子句筛选出课程名称为“数据库原理”的记录。*```sqlSELECTStudent.ClassID,COUNT(*)AS学生人数FROMStudentGROUPBYStudent.ClassID;```解析：使用GROUPBY子句按班级编号对学生进行分组，COUNT(*)统计每组的学生数量。*```sqlSELECT*FROM教师表WHERE联系电话ISNULL;```解析：使用ISNULL判断联系电话字段是否为空，查询出没有联系电话的教师记录。（假设表名为“教师表”）3.VBA编程```vbaPrivateSubbtnSave_Click()OnErrorGoToErrHandlerDimrsAsDAO.RecordsetSetdb=CurrentDbSetrs=db.OpenRecordset("SELECT*FROM学生表WHEREStudentID='"&txtStudentID&"'",dbOpenDynaset)IfNotrs.EOFThen'更新现有记录rs.Editrs!StudentName=txtStudentNamers!ClassID=txtClassIDrs!Phone=txtPhoners.UpdateElse'插入新记录Setrs=db.OpenRecordset("学生表",dbOpenDynaset,dbAppendOnly)rs.AddNewrs!StudentID=txtStudentIDrs!StudentName=txtStudentNamers!ClassID=txtClassIDrs!Phone=txtPhoners.UpdateEndIfMsgBox"数据已保存",vbInformationExitSubErrHandler:MsgBox"操作失败: