ACCESS培训上课资料 任课教师：高海波
中显示tStud\表中的全部记录；单击\命令按钮，将\和\两个控件中的值清空。 注意：不允许修改窗体对象\和子窗体对象\中未涉及的控件、属性和任何VBA代码；不允许修改表对象\。
代码设计只允许在\与\之间的空行内补充一条语句、完成设计，不允许增删和修改其它位置已存在的语句。
本题主要考的是窗体的设计、VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选择\视图\菜单中的\属性\选项，打开窗体属性对话框，将标题改为\学生查询\，依次设置所要求的边框样式、窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线，完成后保存窗体。
（2）打开子窗体对象\的设计视图，选择\视图\菜单中的\属性\选项，打开窗体属性对话框，按照要求设置窗体的属性，完成后保存子窗体。
（3）选择标签控件\，设置其前景色为16777215，背景色为8388608，用同样的方法设置标签控件\，完成后保存窗体。
（4）打开窗体对象\的设计视图，选择\视图\菜单中的\键次序\选项，打开Tab键次序对话框，按照题目要求设置次序，完成后保存窗体。
（5）打开\窗体设计视图，找到\组合框，右键选择\事件生成器\，在弹出的对话框中选择\代码生成器\，点\确定\按钮打开代码设计对话框，在第一处填写：Ldetail.Caption = cItem & \内容:\，第二处填写：fDetail.Form.RecordSource = \，第三处填写：MsgBox \查询项目和查询内容不能为空！！！\\注意\
，保存所有设置。
50★、三、综合应用：（30分）
三、综合应用：（30分★）
考生文件夹下存在一个数据库文件\，里面已经设计好表对象\、\和\，查询对象\，报表对象\。请在此基础上按照以下要求补充\报表的设计： （1）对报表进行适当设置，使报表显示\查询中的数据。
（2）对报表进行适当设置，使报表标题栏上显示的文字为\销售情况报表\；在报表页眉处添加一个标签，标签名为\，显示文本为\图书销售情况表\，字体名称为\黑体\、颜色为棕色（棕色代码为128）、字号为20、字体粗细为\加粗\，文字不倾斜。
（3）对报表中名称为\的文本框控件进行适当设置，使其显示每本书的金额（金额=数量*单价）。 （4）在报表适当位置添加一个文本框控件（控件名称为\），计算每本图书的平均单价。 说明：报表适当位置指报表页脚、页面页脚或组页脚 要求：使用Round函数将计算出的平均单价保留两位小数
（5）在报表页脚处添加一个文本框控件（控件名称为\），判断所售图书的金额合计，如果金额合计大于30000，\控件显示\达标\，否则显示\未达标\。
注意：不允许修改报表对象\中未涉及的控件、属性；不允许修改表对象\、\和\，不允许修改查询对象\。 本题主要考的是报表的设计。 本题解题思路：
（1）打开报表对象\的设计视图，再打开报表的属性窗口，将\记录源\属性设置为表\，点击\确定\按钮。
（2）选择报表\，点击\设计\，选择工具栏上的\属性\按钮，出现\报表\对话框，在\标题\属性中填入\销售情况报表\。选择\视图\菜单下的\报表页眉/页脚\即打开了报表的\报表页眉/页脚\区域；在工具箱中选择一个标签，放到报表页眉中，设置标签的名称属性为\，标题属性为\图书销售情况表\，字体名称属性为\黑体\，前景色为\，字号为20，字体粗细为\加粗\，倾斜字体为\否\。
6
ACCESS培训上课资料 任课教师：高海波
（3）选中\金额\标签下面的文本框\，并点击工具栏上的\属性\按钮，设置文本框的控件来源属性为\=数量*单价\。
（4）选择\视图\菜单中的\排序与分组\，选择\字段/表达式\为\书籍名称\，\组页脚\为\是\，关闭\排序与分组\对话框。选择一个文本框，放到报表的\书籍名称页脚\中，选择工具栏上的\属性\按钮，名称设置为\，\在控件来源属性中填入\=round(Avg(单价),2)\。
（5）选择一个文本框，放到报表页脚处，选择工具栏上的\属性\按钮，在弹出的属性框中设置名称为\，控件来源为\=IIf(Sum(单价*数量)>30000,\达标\未达标\\，保存报表。
49★、三、综合应用：（30分）
三、综合应用：（30分★）
考生文件夹下存在一个数据库文件\，里面已经设计好表对象\和\，同时还设计出窗体对象\和子窗体对象\子窗体\。请在此基础上按照以下要求补充\窗体和\子窗体\子窗体的设计：
（1）在\窗体的\窗体页眉\中距左边2.5厘米、距上边0.3厘米处添加一个宽6.5厘米、高0.95厘米的标签控件（名称：bTitle），标签控件上的文字为\学生基本情况浏览\， 颜色为\蓝色\（ 蓝色代码为16711680）、字体名称为\黑体\、字体大小为22。
（2）将\窗体边框改为\细边框\样式，取消窗体中的水平和垂直滚动条、最大化和最小化按钮；取消子窗体中的记录选择器、浏览按钮（导航按钮）和分隔线。
（3）在\窗体中有一个年龄文本框和一个退出命令按钮，名称分别为\和\。年龄文本框的功能是显示学生的年龄，对年龄文本框进行适当的设置，使之能够实现此功能；退出命令按钮的功能是关闭\窗体，请按照VBA代码中的指示将实现此功能的代码填入指定的位置中。
（4）假设\表中，\学号\字段的第5位和6位编码代表该生的专业信息，当这两位编码为\时表示\信息\专业，为其他值时表示\经济\专业。对\窗体中名称为\的文本框控件进行适当设置，使其根据\学号\字段的第5位和第6位编码显示对应的专业名称。
（5）在\窗体和\子窗体\子窗体中各有一个平均成绩文本框控件，名称分别为\和\，对两个文本框进行适当设置，使\窗体中的\文本框能够显示出每名学生所选课程的平均成绩。 注意：不允许修改窗体对象\和子窗体对象\子窗体\中未涉及的控件、属性和任何VBA代码；不允许修改表对象\和\。
只允许在\与\之间的空行内补充一条语句，不允许增删和修改其它位置已存在的语句。
本题主要考的是窗体的设计、VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选择一个标签控件，放到窗体页眉中，选择工具栏上的\属性\按钮，在弹出的属性框中设置\名称\为\，\标题\为\学生基本情况浏览\，\左边距\为2.5厘米，\上边距\为0.3厘米，\宽度\为6.5厘米，\高度\为0.95厘米。
（2）选中\的标签控件，右击鼠标选择\属性\，前景色\设置为16711680，\字体名称\设置为\黑体\，\字号\为22。
（3）选择\窗体，设置\边框样式\属性为\细边框\，\滚动条\属性为\两者均无\，\最大最小化按钮\属性为\无\；选择子窗体fScore设置其\记录选择器\、\导航按钮\和\分隔线\属性均为\否\。
（4）选择\文本框，设置\控件来源\属性为\=Year(Date())-Year(出生日期)\；选择\CmdQuit\命令按钮，设置其事件代码，在'*****Add*****与'*****Add*****之间输入：DoCmd.Close，保存窗体。
（5）选择\文本框，设置\控件来源\属性为\=IIf(Mid([学号],5,2)=\信息\经济\\。
（6）选择\文本框，设置\控件来源\属性为\=[fScore 子窗体]!txtavg\；选择\文本框，设置\控件来源\属性为\=Avg(成绩)\，保存窗体。
7
ACCESS培训上课资料 任课教师：高海波
48★、三、综合应用：（30分）
三、综合应用：（30分★）
考生文件夹下存在一个数据库文件\，里面已经设计好表对象\，同时还设计出窗体对象\和\。请在此基础上按照以下要求补充\窗体的设计：
（1）将窗体中名称为\的标签控件上的文字颜色改为\棕色\（棕色代码为128）、字体粗细改为\加粗\。 （2）将窗体边框改为\对话框边框\样式，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线；将窗体标题设置为\修改用户口令\。
（3）将窗体中名称为\和\文本框中的内容以密码方式显示。 （4）按如下控件顺序设置Tab键次序：
\→\→\→\→\→\→\→窗体右侧列表（标题是修改系统用户）。 （5）按照以下窗体功能，补充事件代码设计。
窗体运行后，在窗体右侧显示可以修改的用户名、密码等内容的列表，同时在窗体左侧显示列表中所指用户的信息。另外，在窗体中还有\修改\、\保存\和\退出\三个命令按钮，名称分别为\、\和\。当单击\修改\按钮后，在窗体左侧显示出该窗体右侧光标所指用户的口令信息，同时\保存\按钮变为可用；在\口令\和\确认口令\文本框中输入口令信息后，单击\保存\按钮，若在两个文本框中输入的信息相同，则保存修改后的信息，并先将\保存\命令按钮变为不可用，再将除用户名外的其他文本框控件和标签控件全部隐藏，最后将用户名以只读方式显示；若在两个文本框中输入的信息不同，则显示提示框，显示内容为\请重新输入口令！\，提示框中只有一个\确定\按钮。单击窗体上的\退出\按钮，关闭当前窗体。
注意：不允许修改窗体对象\和\中未涉及的控件、属性和任何VBA代码；不允许修改表对象\。只允许在\与\之间的空行内补充一条语句，不允许增删和修改其它位置已存在的语句。
本题主要考的是窗体的设计、VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选中\的标签控件，右击鼠标选择\属性\，\前景色\设置为128，\字体粗细\设置为\加粗\。
（2）选择\窗体，设置\边框样式\属性为\对话框边框\，\滚动条\属性为\两者均无\，\记录选择器\、\导航按钮\和\分隔线\属性均为\否\，\标题\属性为\修改用户口令\。
（3）选中\文本框，点击\输入掩码\属性右边的\…\按钮，弹出\输入掩码向导\，选择系统设置好的输入掩码\密码\，点击\下一步\，再点击\完成\，再用同样的方法设置\文本框的\输入掩码\属性。 （4）选中\命令按钮，并点击\视图\菜单下的\属性\子菜单，将\键索引\属性设置为0；选中\文本框，将\键索引\属性设置为1。用同样的方法设置\、\、\、\、\和\修改系统用户\的\键索引\属性分别为2、3、4、5、6、7，保存窗体。
（5）选择\窗体，并点击工具栏上的\属性\按钮，点击\加载\属性右边的\…\打开代码生成器，在第1处输入：CmdSave.Enabled=False；在第2处输入：tUser_1.Enabled=False；在第3处输入：MsgBox \请重新输入口令！\；在第4处输入：DoCmd.Close。然后保存该窗体。
47、三、综合应用：（30分）
三、综合应用：（30分）
考生文件夹下存在一个数据库文件\，里面已经设计好窗体对象\。请在此基础上按照以下要求补充\窗体的设计：
（1）将窗体的边框样式设置为\对话框边框\，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮、分隔线、控制框、关闭按钮、最大化按钮和最小化按钮。 （2）将窗体标题栏显示文本设置为\系统登录\。
（3）将窗体中\用户名称\（名称为\）和\用户密码\（名称为\）两个标签上的文字颜色改为浅综色（浅
8
ACCESS培训上课资料 综色代码为128)、字体粗细改为\加粗\。
任课教师：高海波
（4）将窗体中名称为\的文本框控件的内容以密码形式显示。 （5）按照以下窗体功能，补充事件代码设计。
在窗体中有\用户名称\和\用户密码\两个文本框，名称分别为\和\，还有\确定\和\退出\两个命令按钮，名称分别为\和\。在\和\两个文本框中输入用户名称和用户密码后，单击\确定\按钮，程序将判断输入的值是否正确，如果输入的用户名称为\，用户密码为\，则显示提示框，提示框标题为\欢迎\，显示内容为\密码输入正确，欢迎进入系统！\，提示框中只有一个\确定\按钮，当单击\确定\按钮后，关闭该窗体；如果输入不正确，则提示框显示内容为\密码错误！\，同时清除\和\两个文本框中的内容，并将光标置于\文本框中。当单击窗体上的\退出\按钮后，关闭当前窗体。
注意：不允许修改窗体对象\中未涉及的控件、属性和任何VBA代码。只允许在\与\之间的空行内补充一条语句，不允许增删和修改其它位置已存在的语句。 本题主要考的是窗体的设计、VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选择\窗体，设置\边框样式\属性为\对话框边框\，\滚动条\属性为\两者均无\，\记录选择器\、\导航按钮\、\分隔线\、\控制框\和\关闭按钮\属性均为\否\、\最大最小化按钮\属性为\无\。
（2）\标题\属性为\系统登录\。
（3）选中\的标签控件，右击鼠标选择\属性\，\前景色\设置为128，\字体粗细\设置为\加粗\，再用同样的方法设置\文本框的\前景色\和\字体粗细\属性。
（4）选中\文本框，点击\输入掩码\属性右边的\…\按钮，弹出\输入掩码向导\，选择系统设置好的输入掩码\密码\，点击\下一步\，再点击\完成\。
（5）选择\窗体，并点击工具栏上的\属性\按钮，点击\加载\属性右边的\…\打开代码生成器，在第1处输入：If pass=\；在第2处输入：tUser.SetFocus；在第3处输入：DoCmd.Close。然后保存该窗体。
46、三、综合应用：（30分）
三、综合应用：（30分）
考生文件夹下存在一个数据库文件\，里面已经设计好表对象\，同时还设计出窗体对象\。请在此基础上按照以下要求补充\窗体的设计：
（1）在窗体的\窗体页眉\中距左边0.4厘米、距上边1.2厘米处添加一个直线控件，控件宽度为10.5厘米，控件命名为\。
（2）将窗体中名称为\的标签控件上的文字颜色改为\蓝色\（蓝色代码为16711680）、字体名称改为\华文行楷\、字号改为22。
（3）将窗体边框改为\细边框\样式，取消窗体中的水平和垂直滚动条、记录选择器、导航按钮和分隔线；并且只保留窗体的关闭按钮。
（4）假设\表中，\学号\字段的第5位和6位编码代表该生的专业信息，当这两位编码为\时表示\信息\专业，为其他值时表示\管理\专业。设置窗体中名称为\的文本框控件的相应属性，使其根据\学号\字段的第5位和第6位编码显示对应的专业名称。
（5）在窗体中有一个\退出\命令按钮，名称为\，其功能为关闭\窗体。请按照VBA代码中的指示将实现此功能的代码填入指定的位置中。
注意：不允许修改窗体对象\中未涉及的控件、属性和任何VBA代码；不允许修改表对象\；程序代码只允许在\与\之间的空行内补充一行语句、完成设计，不允许增删和修改其它位置已存在的语句。
本题主要考的是窗体的设计、VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选择一个直线控件，放到窗体页眉中，选择工具栏上的\属性\按钮，
9
ACCESS培训上课资料 任课教师：高海波
在弹出的属性框中设置\名称\为\，\左边距\为0.4厘米，\上边距\为1.2厘米，\宽度\为10.5厘米。 （2）选中\的标签控件，右击鼠标选择\属性\，前景色\设置为16711680，\字体名称\设置为\华文行楷\，\字号\为22。
（3）选择\窗体，设置\边框样式\属性为\细边框\，\滚动条\属性为\两者均无\，\记录选择器\、\导航按钮\和\分隔线\属性均为\否\，\最大最小化按钮\属性为\无\，\关闭按钮\属性为\是\。
（4）选择\文本框，设置\控件来源\属性为\学号],5,2)=\信息\管理\。
（5）选择\窗体，点击\加载\属性右边的\…\打开代码生成器，在'*****Add*****与'*****Add*****之间输入：DoCmd.Close，保存窗体。
45、三、综合应用：（30分）
三、综合应用：（30分）
考生文件夹下存在一个数据库文件\，里面已经设计了表对象\、窗体对象\、报表对象\和宏对象\。同时，给出窗体对象\上一个按钮的单击事件代码，试按以下功能要求补充设计： （1）设置窗体对象\上两个命令按钮的Tab键索引顺序（即Tab键焦点移动顺序）为从\报表输出\按钮（名为\）到\退出\按钮（名为\）。
（2）调整窗体对象\上\退出\按钮（名为\）的大小和位置，要求大小与\报表输出\按钮（名为\）一致，且上边对齐\报表输出\按钮，左边距离\报表输出\按钮1厘米（即\钮的左边距离\钮的右边1厘米）。 （3）将报表记录数据按照先姓名升序再年龄降序排列显示；设置相关属性，将页面页脚区域内名为\的文本框控件实现以下格式的页码输出：\。
（4）单击\报表输出\按钮（名为\），事件代码会弹出以下图例显示的消息框提示，选择是否进行预览报表\；单击\退出\按钮（名为\），调用设计好的宏\来关闭窗体。
注意：不允许修改数据库中的表对象\和宏对象\；不允许修改窗体对象\和报表对象\中未涉及的控件和属性。程序代码只允许在\与\之间的空行内补充一行语句、完成设计，不允许增删和修改其它位置已存在的语句。
本题主要考的是窗体、报表的设计和VBA的数据库编程。 本题解题思路如下：
（1）打开窗体对象\的设计视图，选中\命令按钮，并点击\视图\菜单下的\属性\子菜单，将\键索引\属性设置为0；选中\命令按钮，将\键索引\属性设置为1。选中\按钮，并点击工具栏上的\属性\按钮，将命令按钮bt2的\宽度\设置为2厘米，\高度\设置为1厘米，\上边距\设置为2厘米，\左边距\设置为4.501厘米，保存窗体。
（2）打开报表对象\的设计视图，选择\视图\菜单中的\排序与分组\，在\字段/表达式\中选择\姓名\，排序次序为\升序\；再选择\年龄\，排序次序为\降序\。选择文本框\，在控件来源属性中输入：=[Page] & \& [Pages]，保存报表。
（3）打开窗体\的设计视图，并点击工具栏上的\属性\按钮，点击\加载\属性右边的\…\打开代码生成器，在'*****Add*****与'*****Add*****之间输入：If MsgBox(\报表预览\确认\，选中\按钮，并点击工具栏上的\属性\按钮，点击\单击\属性并选择宏\，保存窗体。
10