第三部分综合应用分ghb.docx

第三部分综合应用分ghb.docx

《第三部分综合应用分ghb.docx》由会员分享，可在线阅读，更多相关《第三部分综合应用分ghb.docx（73页珍藏版）》请在冰点文库上搜索。

第三部分综合应用分ghb

注意

一、本部分内容为综合应用，主要涉及的是：

报表、窗体的设计；查询的修改及设计；表结构的修改、有效性文本的设置、报表中的排序；VBA的编程；VBA的数据库编程的基本操作知识内容。

二、本部分虽然为综合应用题，但只有少数几道题较难外，其他都很容易，相对来说比第二部分的题要容易得分一些。

尽量不要丢分！

！

！

三、在完成这部分题目过程中，要认真理解和熟练操作，有很多知识内容在笔试中也经常出现，要利用上机操作的机会，理解和把握笔试的知识考核内容。

四、下面的内容以知识点为纲来练习真题，对照所列知识点看自己是否已掌握和能否熟练操作相关习题。

另要求所有同学必须要利用课堂及课后时间一定要把这些真题全部熟练完成！

！

主要考核知识点：

知识点1：

报表的设计

相关习题讲解及练习：

56、50、43、39、34、07、05、04

知识点2：

窗体的设计

相关习题讲解及练习：

55、54、53、37、29、26、25、24、22、

21、15、09、08、06、03、02、01

知识点3：

报表和窗体的设计

相关习题讲解及练习：

42、41、36、18、12、11、10

知识点4：

窗体的设计和查询的修改及设计

相关习题讲解及练习：

38、19

知识点5：

表结构的修改、有效性文本的设置、报表中的排序、窗体的设计

相关习题讲解及练习：

20、17、14、13

知识点6：

窗体和查询的设计以及VBA的编程。

相关习题讲解及练习：

28、23、16

知识点7：

窗体的设计、报表的设计、VBA的数据库编程

相关习题讲解及练习：

52、45、44、35、32、31

知识点8：

窗体的设计（主子窗体）、VBA的数据库编程

相关习题讲解及练习：

51、49、48、47、46、40、33、30、27

注意：

建议同学们：

每做完一大题，请关闭ACCESS,重新启动再做下一题；或者直接双击打开要操作的数据库文件！

每道大题中的题号表示相对应的文件夹名称（即题中提到的考生文件夹），文件夹中含有题目中的源文件。

国二真题小结训练（必须完成）：

56、三、综合应用：

（30分）

三、综合应用：

（30分）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计好表对象"tEmployee"和查询对象"qEmployee"，同时还设计出以"qEmployee"为数据源的报表对象"rEmployee"。

试在此基础上上按照以下要求补充报表设计：

（1）报表的报表页眉节区位置添加一个标签控件，其标题显示为"职员基本信息表"，并命名为"bTitle"；

（2）将报表主体节区中名为"tDate"的文本框显示内容设置为"聘用时间"字段值；

（3）在报表的页面页脚区添加一个计算控件，以输出页码。

计算控件放置在距上边0.25厘M、距左侧14厘M位置，并命名为"tPage"。

规定页码显示格式为"当前页/总页数"，如1/20、2/20、……、20/20等。

注意：

不允许修改数据库中的表对象"tEmployee"和查询对象"qEmployee"；不允许修改报表对象"rEmployee"中未涉及的控件和属性。

本题主要考的是报表的设计。

本题解题思路：

（1）选择一个标签，放到报表页眉中，选择工具栏上的"属性"按钮，在弹出的属性框中设置名称属性为"bTitle"和标题属性为"职员基本信息表"。

（2）选中主体中的名为"tDate"的文本框，设置其控件来源属性为"聘用时间"字段。

（3）选择一个文本框，放到报表的页面页脚中，设置它的名称为"tPage"、上边距属性为0.25厘M和左边距属性为14厘M，并在控件来源属性中输入"=[Page]&"/"&[Pages]"。

55、三、综合应用：

（30分）

三、综合应用：

（30分）

考生文件夹下存在一个数据文件"samp3.mdb"，里面已经设计好窗体对象"fTest"及宏对象"m1"。

试在此基础上按照以下要求补充窗体设计：

（1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为"bTitle"标题显示为"窗体测试样例"；

（2）在窗体主体节区内添加二个复选框控件，复选框选项按钮分别命名为"opt1"和"opt2"，对应的复选框标签显示内容分别为"类型a"和"类型b"，标签名称分别为"bopt1"和"bopt2"；

（3）分别设置复选框选项按钮opt1和opt2的"默认值"属性为假值；

（4）在窗体页脚节区位置添加一个命令按钮，命名为"bTest"，按钮标题为"测试"；

（5）设置命令按钮bTest的单击事件属性为给定的宏对象m1；

（6）将窗体标题设置为"测试窗体"。

注意：

不允许修改窗体对象fTest中未涉及的属性；不允许修改宏对象m1。

本题主要考的是窗体的设计。

本题解题思路如下：

（1）在工具箱中选择一个标签，放到窗体页眉中，并点击工具栏上的"属性"按钮，设置标签的名称为"bTitle"，标题属性为"窗体测试样例"。

（2）在工具箱中选择复选框控件，添加两个该控件到窗体的主体中，设置这两个控件的名称为"opt1"和"opt2"，并设置它们的默认值属性为"=False"；选择复选框对应的标签，设置它们的名称为"bopt1"和"bopt2"，标题为"类型a"和"类型b"。

（3）在工具箱中选择一个命令按钮控件，放到窗体页脚中，设置这个命令按钮的名称为"bTest"，标题属性为"测试"，单击属性为"m1"。

（4）选中窗体，并点击工具栏上的"属性"按钮，设置窗体的标题属性为"测试窗体"。

54、三、综合应用：

（30分）

三、综合应用：

（30分）

考生文件夹下存在一个数据库文件"Access3.mdb"，里面已经设计好窗体对象"教师"。

试在此基础上按照一下要求补充窗体设计：

（1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为"bTitle"，标题显示为"教师基本信息输出"；

（2）在主体节区中"年龄"标签右侧的文本框显示内容设置为"年龄"字段值，并将文本框名称更名为"tAge"；

（3）在主体节区添加一个标签控件，该控件放置在距左边0.1厘M、距上边5.0厘M，标签显示内容为"出生地"，名称为"bMem"；

（4）在窗体页脚节区位置添加两个命令按钮，分别命名为"bOk"和"bQuit"，按钮标题分别为"确定"和"退出"；

（5）将窗体标题设置为"教师基本信息"。

注意：

不允许修改窗体对象"教师"中未涉及的控件和属性。

本题主要考的是窗体的设计。

本题解题思路如下：

（1）在工具箱中选择一个标签，放到页眉中，并点击工具栏上的"属性"按钮，设置标签的名称和标题属性；

（2）选中"年龄"标签右边的文本框，并点击工具栏上的"属性"按钮，设置文本框的名称和控件属性；

（3）在工具箱中选择两个单选按钮控件，放到主体中的选项组中，并点击工具栏上的"属性"按钮，设置这两个单选按钮的名称和标题属性；

（4）在工具箱中选择两个命令按钮控件，放到页脚中，并点击工具栏上的"属性"按钮，设置这两个命令按钮的名称和标题属性；

（5）选中窗体，并点击工具栏上的"属性"按钮，设置窗体的标题属性。

53、三、综合应用：

（30分）

三、综合应用：

（30分）

考生文件夹下存在一个数据库文件"Access3.mdb"，里面已经设计好窗体对象"教师"。

试在此基础上按照以下要求补充窗体设计：

（1）在窗体的窗体页眉节区位置添加一个标签控件，其名称为"bTitle"，标题显示为"教师奖励信息"；

（2）在主体节区位置添加一个选项组控件，将其命名为"opt"，选项组标签显示内容为"奖励"，名称为"bopt"；

（3）在选项组内放置二个单选按钮控件，选项按钮分别命名为"opt1"和"opt2"，选项按钮标签显示内容分别为"有"和"无"，名称分别为"bopt1"和"bopt2"。

（4）在窗体页脚节区位置添加两个命令按钮，分别命名为"bOk"和"bQuit"，按钮标题分别为"确定"和"退出"；

（5）将窗体标题设置为"教师奖励信息"。

注意：

不允许修改窗体对象"教师"中已设置好的属性。

本题主要考的是窗体的设计。

本题解题思路如下：

（1）在工具箱中选择一个标签，放到页眉中，并点击工具栏上的"属性"按钮，设置标签的名称和标题属性；

（2）在工具箱中选择一个选项组控件，放到主体中，并点击工具栏上的"属性"按钮，设置选项组的名称和标题属性；

（3）在工具箱中选择两个单选按钮控件，放到主体中的选项组中，并点击工具栏上的"属性"按钮，设置这两个单选按钮的名称和标题属性；

（4）在工具箱中选择两个命令按钮控件，放到页脚中，并点击工具栏上的"属性"按钮，设置这两个命令按钮的名称和标题属性；

（5）选中窗体，并点击工具栏上的"属性"按钮，设置窗体的标题属性。

52★、三、综合应用：

（30分）

三、综合应用：

（30分★）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计了表对象"tEmp"、窗体对象"fEmp"、报表对象"rEmp"和宏对象"mEmp"。

同时，给出窗体对象"fEmp"的若干事件代码，试按以下功能要求补充设计。

功能：

（1）调整窗体对象"fEmp"上"报表输出"按钮（名为"bt1"）的位置，要求其左边对齐"退出"按钮，下边距离"退出"按钮1厘M（即"bt1"钮的下边距离"bt2"钮的上边1厘M）；调整上述两个命令按钮的Tab键移动顺序为：

先"报表输出"按钮，再"退出"按钮。

（2）调整报表对象"rEmp"，将报表记录数据先按年龄升序、再按姓名降序排列，并打开相关组页眉区域，添加一个文本框控件（命名为"ta"），设置属性，使其显示年龄段信息，如"18"、"19"、......等。

（3）窗体加载事件实现的功能是显示窗体标题，显示内容为"****年度报表输出"，其中四位****为系统当前年份，请补充加载事件代码，要求使用相关函数获取当前年份。

（4）窗体中"报表输出"和"退出"按钮的功能是单击"报表输出"按钮（名为"bt1"）后，首先将"退出"按钮标题变为红色（255），然后以预览方式打开报表"rEmp"；单击"退出"按钮（名为"bt2"）调用宏"mEmp"。

按照以上功能描述补充相关事件代码，要求考虑错误处理。

注意：

不允许修改数据库中的表对象"tEmp"和宏对象"mEmp"；不允许修改窗体对象"fEmp"和报表对象"rEmp"中未涉及的控件和属性；

已给事件过程，只允许在"*****Add*****"与"*****Add*****"之间的空行内补充语句、完成设计，不允许增删和修改其它位置已存在的语句。

本题主要考的是窗体的设计、报表的设计、VBA的数据库编程。

本题解题思路如下：

（1）打开窗体对象"fEmp"的设计视图，选中主体中的"报表输出"按钮，右击，选择"属性"，左边距设置为3cm，上边距设置为1cm，保存设置，选择"视图"菜单的"Tab键次序"打开对话框，设置顺序为先"报表输出"，再"退出"按钮，保存设置。

（2）打开报表对象"rEmp"的设计视图，选择"视图"菜单中的"排序与分组"选项，打开排序与分组对话框，添加年龄字段升序，在组页眉中选择是，再添加姓名字段降序，完成后保存报表设置。

在报表的年龄页眉区域添加一个文本框控件，名称为ta，控件来源为年龄，完成后保存设置。

（3）打开窗体对象"fStud"的设计视图，选择"视图"菜单中的属性，打开窗体属性对话框，在标题中输入"Year（Date（））&"年度报表输出"，保存设置。

（4）打开窗体"fEmp"的设计视图，选中"报表输出"按钮，右击选择"属性"，编辑命令按钮bt1的单击事件代码，第一处填写"Caption=Year（Date）&"年度报表输出""，第二处填写"bt2.ForeColor=255或bt2.ForeColor=RGB（255,0,0）"，第三处填写"DoCmd.OpenReport"rEmp",acViewPreview"，第四处填写"ErrHanle:

"，完成后保存窗体的设置。

选中"退出"按钮，右击选择"属性"，在"事件"的单击中填入"mEmp"，完成后保存窗体。

51★、三、综合应用：

（30分）

三、综合应用：

（30分★）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计好表对象"tStud"，同时还设计出窗体对象"fStud"和子窗体对象"fDetail"。

请在此基础上按照以下要求补充"fStud"窗体的设计：

（1）将窗体标题改为"学生查询"。

（2）将窗体的边框样式改为"细边框"，取消窗体中的水平和垂直滚动条、记录选择器、浏览按钮（导航按钮）和分隔线；将子窗体边框样式改为"细边框"，取消子窗体中的记录选择器、浏览按钮（导航按钮）和分隔线。

（3）在窗体中有两个标签控件，名称分别为"Label1"和"Label2"，将这两个标签上的文字颜色改为白色，背景颜色改为紫蓝色（紫蓝色代码为8388608）。

（4）将窗体主体节中控件的Tab键次序改为：

"CItem"→"TxtDetail"→"CmdRefer"→"CmdList"→"CmdClear"→"fDetail"→"简单查询"→"Frame18"。

（5）按照以下窗体功能，补充事件代码设计。

在窗体中有一个组合框控件和一个文本框控件，名称分别为"CItem"和"TxtDetail"；有两个标签控件，名称分别为"Label3"和"Ldetail"；还有三个命令按钮，名称分别为"CmdList"、"CmdRefer"和"CmdClear"。

在"CItem"组合框中选择某一工程后，"Ldetail"标签控件将显示出所选工程名加上"内容：

"。

在"TxtDetail"文本框中输入具体工程值后，单击"CmdRefer"命令按钮，如果"CItem"和"TxtDetail"两个控件中均有值，则在子窗体中显示找出的相应记录，如果两个控件中不全有值，显示消息框，消息框标题为"注意"，提示文字为"查询工程和查询内容不能为空！

！

！

"，消息框中只有一个"确定"按钮；单击"CmdList"命令按钮，在子窗体中显示tStud"表中的全部记录；单击"CmdClear"命令按钮，将"cItem"和"TxtDetail"两个控件中的值清空。

注意：

不允许修改窗体对象"fStud"和子窗体对象"fDetail"中未涉及的控件、属性和任何VBA代码；不允许修改表对象"tStud"。

代码设计只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一条语句、完成设计，不允许增删和修改其它位置已存在的语句。

本题主要考的是窗体的设计、VBA的数据库编程。

本题解题思路如下：

（1）打开窗体对象"fStud"的设计视图，选择"视图"菜单中的"属性"选项，打开窗体属性对话框，将标题改为"学生查询"，依次设置所要求的边框样式、窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线，完成后保存窗体。

（2）打开子窗体对象"fDetail"的设计视图，选择"视图"菜单中的"属性"选项，打开窗体属性对话框，按照要求设置窗体的属性，完成后保存子窗体。

（3）选择标签控件"Label1"，设置其前景色为16777215，背景色为8388608，用同样的方法设置标签控件"Label2"，完成后保存窗体。

（4）打开窗体对象"fStud"的设计视图，选择"视图"菜单中的"Tab键次序"选项，打开Tab键次序对话框，按照题目要求设置次序，完成后保存窗体。

（5）打开"fStud"窗体设计视图，找到"cItem"组合框，右键选择"事件生成器"，在弹出的对话框中选择"代码生成器"，点"确定"按钮打开代码设计对话框，在第一处填写：

Ldetail.Caption=cItem&"内容:

"，第二处填写：

fDetail.Form.RecordSource="tStud"，第三处填写：

MsgBox"查询工程和查询内容不能为空！

！

！

",vbOKOnly,"注意"

，保存所有设置。

50★、三、综合应用：

（30分）

三、综合应用：

（30分★）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计好表对象"tOrder"、"tDetail"和"tBook"，查询对象"qSell"，报表对象"rSell"。

请在此基础上按照以下要求补充"rSell"报表的设计：

（1）对报表进行适当设置，使报表显示"qSell"查询中的数据。

（2）对报表进行适当设置，使报表标题栏上显示的文字为"销售情况报表"；在报表页眉处添加一个标签，标签名为"lTitle"，显示文本为"图书销售情况表"，字体名称为"黑体"、颜色为棕色（棕色代码为128）、字号为20、字体粗细为"加粗"，文字不倾斜。

（3）对报表中名称为"txtMoney"的文本框控件进行适当设置，使其显示每本书的金额（金额=数量*单价）。

（4）在报表适当位置添加一个文本框控件（控件名称为"txtAvg"），计算每本图书的平均单价。

说明：

报表适当位置指报表页脚、页面页脚或组页脚

要求：

使用Round函数将计算出的平均单价保留两位小数

（5）在报表页脚处添加一个文本框控件（控件名称为"txtIf"），判断所售图书的金额合计，如果金额合计大于30000，"txtIf"控件显示"达标"，否则显示"未达标"。

注意：

不允许修改报表对象"rSell"中未涉及的控件、属性；不允许修改表对象"tOrder"、"tDetail"和"tBook"，不允许修改查询对象"qSell"。

本题主要考的是报表的设计。

本题解题思路：

（1）打开报表对象"rSell"的设计视图，再打开报表的属性窗口，将"记录源"属性设置为表"qSell"，点击"确定"按钮。

（2）选择报表"rSell"，点击"设计"，选择工具栏上的"属性"按钮，出现"报表"对话框，在"标题"属性中填入"销售情况报表"。

选择"视图"菜单下的"报表页眉/页脚"即打开了报表的"报表页眉/页脚"区域；在工具箱中选择一个标签，放到报表页眉中，设置标签的名称属性为"lTitle"，标题属性为"图书销售情况表"，字体名称属性为"黑体"，前景色为"128"，字号为20，字体粗细为"加粗"，倾斜字体为"否"。

（3）选中"金额"标签下面的文本框"txtMoney"，并点击工具栏上的"属性"按钮，设置文本框的控件来源属性为"=数量*单价"。

（4）选择"视图"菜单中的"排序与分组"，选择"字段/表达式"为"书籍名称"，"组页脚"为"是"，关闭"排序与分组"对话框。

选择一个文本框，放到报表的"书籍名称页脚"中，选择工具栏上的"属性"按钮，名称设置为"txtAvg，"在控件来源属性中填入"=round（Avg（单价）,2）"。

（5）选择一个文本框，放到报表页脚处，选择工具栏上的"属性"按钮，在弹出的属性框中设置名称为"txtIf"，控件来源为"=IIf（Sum（单价*数量）>30000,"达标","未达标"）"，保存报表。

49★、三、综合应用：

（30分）

三、综合应用：

（30分★）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计好表对象"tStud"和"tScore"，同时还设计出窗体对象"fStud"和子窗体对象"fScore子窗体"。

请在此基础上按照以下要求补充"fStud"窗体和"fScore子窗体"子窗体的设计：

（1）在"fStud"窗体的"窗体页眉"中距左边2.5厘M、距上边0.3厘M处添加一个宽6.5厘M、高0.95厘M的标签控件（名称：

bTitle），标签控件上的文字为"学生基本情况浏览"，颜色为"蓝色"（蓝色代码为16711680）、字体名称为"黑体"、字体大小为22。

（2）将"fStud"窗体边框改为"细边框"样式，取消窗体中的水平和垂直滚动条、最大化和最小化按钮；取消子窗体中的记录选择器、浏览按钮（导航按钮）和分隔线。

（3）在"fStud"窗体中有一个年龄文本框和一个退出命令按钮，名称分别为"tAge"和"CmdQuit"。

年龄文本框的功能是显示学生的年龄，对年龄文本框进行适当的设置，使之能够实现此功能；退出命令按钮的功能是关闭"fStud"窗体，请按照VBA代码中的指示将实现此功能的代码填入指定的位置中。

（4）假设"tStud"表中，"学号"字段的第5位和6位编码代表该生的专业信息，当这两位编码为"10"时表示"信息"专业，为其他值时表示"经济"专业。

对"fStud"窗体中名称为"tSub"的文本框控件进行适当设置，使其根据"学号"字段的第5位和第6位编码显示对应的专业名称。

（5）在"fStud"窗体和"fScore子窗体"子窗体中各有一个平均成绩文本框控件，名称分别为"txtMAvg"和"txtAvg"，对两个文本框进行适当设置，使"fStud"窗体中的"txtMAvg"文本框能够显示出每名学生所选课程的平均成绩。

注意：

不允许修改窗体对象"fStud"和子窗体对象"fScore子窗体"中未涉及的控件、属性和任何VBA代码；不允许修改表对象"tStud"和"tScore"。

只允许在"*****Add*****"与"*****Add*****"之间的空行内补充一条语句，不允许增删和修改其它位置已存在的语句。

本题主要考的是窗体的设计、VBA的数据库编程。

本题解题思路如下：

（1）打开窗体对象"fStud"的设计视图，选择一个标签控件，放到窗体页眉中，选择工具栏上的"属性"按钮，在弹出的属性框中设置"名称"为"bTitle"，"标题"为"学生基本情况浏览"，"左边距"为2.5厘M，"上边距"为0.3厘M，"宽度"为6.5厘M，"高度"为0.95厘M。

（2）选中"bTitle"的标签控件，右击鼠标选择"属性"，前景色"设置为16711680，"字体名称"设置为"黑体"，"字号"为22。

（3）选择"fStud"窗体，设置"边框样式"属性为"细边框"，"滚动条"属性为"两者均无"，"最大最小化按钮"属性为"无"；选择子窗体fScore设置其"记录选择器"、"导航按钮"和"分隔线"属性均为"否"。

（4）选择"tAge"文本框，设置"控件来源"属性为"=Year（Date（））-Year（出生日期）"；选择"CmdQuit"命令按钮，设置其事件代码，在'*****Add*****与'*****Add*****之间输入：

DoCmd.Close，保存窗体。

（5）选择"tSub"文本框，设置"控件来源"属性为"=IIf（Mid（[学号],5,2）="10","信息","经济"）"。

（6）选择"txtMAvg"文本框，设置"控件来源"属性为"=[fScore子窗体]!

txtavg"；选择"txtAvg"文本框，设置"控件来源"属性为"=Avg（成绩）"，保存窗体。

48★、三、综合应用：

（30分）

三、综合应用：

（30分★）

考生文件夹下存在一个数据库文件"samp3.mdb"，里面已经设计好表对象"tUser"，同时还设计出窗体对象"fEdit"和"fUser"。

请在此基础上按照以下要求补充"fEdit"窗体的设计：

（1）将窗体中名称为"lRemark"的标签控件上的文字颜色改为"棕色"（棕色代码为128）、字体粗细改为"加粗"。

（2）将窗体边框改为"对话框边框"样式，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线；将窗体标题设置为"修改用户口令"。

（3）将窗体中名称为"tPass"和"tEnter"文本框中的内容以密码方式显示。

（4）按如下控件顺序设置Tab键次序：

"CmdEdit"