《Access2007循序渐进》第9章

第9章创建实用Access数据库进销存管理系统2021/12/21《Access2007循序渐进》第9章9.1公司客户管理系统9.1.1创建“公司客户管理系统”数据表作为一个销售型的公司，或者对于某个工厂的销售部门来说，公司客户管理系统的建立可以有效的避免因业务员个人工作变动而造成公司客户的流失，也可以方便我们统计每个业务员的销售业绩，以及各个地区间的销售差异。根据公司情况，建立公司客户管理系统共需5个表，如下页图所示。1、创建基础表2021/12/22《Access2007循序渐进》第9章2021/12/23《Access2007循序渐进》第9章创建一个空白的“公司客户信息管理系统”数据库后，切换至“创建”标签页，单击“表设计”按钮，打开“表设计器”窗口12021/12/24《Access2007循序渐进》第9章2在表设计器窗口中，按照书中表9-1的要求输入相应的字段名称，并在数据类型一列按规定设置相应的“数据类型”，然后设置“客户编号”为“主键”

这些“常规”属性，先不要设置，下边将分别进行设置2021/12/25《Access2007循序渐进》第9章在表设计器窗口中，选中“公司名称”字段，在下边的常规选项卡中设置格式为：！“公司名称：”&[蓝色]，将索引设置为：有（无重复）3以相同的操作，按照书中表9-1的规定设置“联系人性别”、“邮政编码”、“公司规模”和“加入时间”的“常规”属性。设置完毕后将此窗口关闭，并选择保存为“客户信息表”后，即可完成此表的创建4创建了“客户信息表”后，按照相同的操作步骤，创建其它表52021/12/26《Access2007循序渐进》第9章2、创建“客户信息表”的下拉列表打开“客户信息表”表设计窗口，选中“地区”字段，在其“数据类型”的下拉列表中选择“查阅向导”命令，打开“查阅向导”对话框12021/12/27《Access2007循序渐进》第9章选择“地区信息表”，单击“下一步”按钮继续3保持系统默认，单击“下一步”按钮22021/12/28《Access2007循序渐进》第9章保持系统默认连续单击两次“下一步”按钮，打开“查阅向导”的最后一个对话框，接着保持系统默认，单击“完成”按钮5在“可用字段”列表中选择“地区名称”字段，单击选择按钮后单击“下一步”按钮继续46单击“是”按钮保存表，完成查阅向导的操作2021/12/29《Access2007循序渐进》第9章9.1.2创建“公司客户管理系统”的供货查询1、创建“各客户的年度供货单”查询打开“公司客户管理系统”数据库，单击“创建”标签

2单击“查询向导”按钮12021/12/210《Access2007循序渐进》第9章4选择“表：进出帐表”项，单击”下一步”按钮3选择“交叉表查询向导”，单击“确定”按钮2021/12/211《Access2007循序渐进》第9章6选择“供货时间”项，单击“下一步”按钮5双击“公司名称”将其添加到“选定字段”列表框，重复同样的操作将“货品名称”添加到“选定字段”列表框，单击“下一步”按钮继续2021/12/212《Access2007循序渐进》第9章8在字段列表中选择“供货金额”项，在函数列表中选择“汇总”项，将“是，包括各行小计”复选框中的勾去掉，单击“下一步”按钮7选择“年”项，单击“下一步”按钮继续2021/12/213《Access2007循序渐进》第9章为查询输入名称“各客户的年度供货单”，单击“完成”按钮完成查询的创建9行标题是“公司名称”和“货品名称”

列标题是“供货时间”的年份行、列交叉处的值是“供货金额”总和双击“各客户的年度供货单”查询，执行效果如图所示2021/12/214《Access2007循序渐进》第9章2、创建“供货金额最高的五个供货单位”的查询单击“查询向导”按钮，打开查询“设计视图”，单击“关闭”按钮关闭“显示表”对话框2打开“公司客户管理系统”数据库，切换至“创建”标签页12021/12/215《Access2007循序渐进》第9章在设计视图上半区域单击右键，选择“SQL视图”命令，打开SQL视图32021/12/216《Access2007循序渐进》第9章单击关闭按钮，弹出“是否保存”对话框，单击“是”按钮，弹出“另存为”对话框，输入“供货金额最高的五个供货单”，单击“确定”按钮完成查询的创建5输入SQL语句4这是执行结果，按照“供货金额”从高到低排列，取前五条记录2021/12/217《Access2007循序渐进》第9章9.1.3创建窗体打开“客户管理系统”数据库，切换至“创建”标签页2单击“窗体设计”

12021/12/218《Access2007循序渐进》第9章重复相同的操作，添加另外三个标签（“添加新客户功能：”、“查询功能：”和“修改与删除功能：”），并将它们的字体修改为12号粗体红色4创建一个标签，输入标题“客户管理”，并将其字体改为18号粗体3单击直线按钮，在下边画一条直线52021/12/219《Access2007循序渐进》第9章为“查询功能”区域添加一个“请输入要查询的公司名称：”文本框7创建文本框，将其标签的标题修改为“公司名称：”。重复相同的操作为“添加新客户功能”区域添加其他文本框（包括“公司主营业务”和“联系人”等）6为“修改与删除功能”区域添加一组文本框82021/12/220《Access2007循序渐进》第9章重复相同的操作添加“业务员名称：”等其它组合框10单击组合框按钮，使用向导创建表为“表：地区信息表”，字段选“地区名称”的“地区名称：”组合框92021/12/221《Access2007循序渐进》第9章在“添加新客户功能:”区域添加“添加”按钮;在“查询功能”区域添加“查询”按钮；在“修改与删除功能”区域添加“！清空所有客户信息（慎用）”、“保存修改”和“删除该记录”命令按钮112021/12/222《Access2007循序渐进》第9章通过以上操作步骤我们就完成了“客户信息管理”窗体的创建，双击打开，效果如图所示“添加新客户功能：”区域“查询功能：”区域“修改与删除功能：”区域2021/12/223《Access2007循序渐进》第9章9.1.4创建客户报表单击鼠标右键，选择“报表页眉/页脚”命令2打开“客户管理系统”数据库，进入报表设计视图工作区12021/12/224《Access2007循序渐进》第9章在“页面页脚”节中创建另一个文本框，将其对应的标签删除，在文本框中输入“="第"&[Page]&"页"”

4在“报表页眉”节中添加一个文本框。在标签框中输入“各地区客户”，字体设为12号粗斜体，在文本框中输入“=Now()”

3双击报表属性按钮，弹出“报表”属性窗口52021/12/225《Access2007循序渐进》第9章切换至“数据”标签页。单击“记录源”组合框的下拉按钮，选择“客户信息表”项62021/12/226《Access2007循序渐进》第9章切换至“设计”标签页，单击“分组和排序”按钮，打开“排序和分组”窗口72021/12/227《Access2007循序渐进》第9章单击“添加排序”按钮，在打开的字段列表中选择“地区”字段，默认排序次序为升序，分组形式设置为“有页眉节”和“有页脚节”82021/12/228《Access2007循序渐进》第9章单击“添加现有字段”按钮11单击“字段列表”中的“地区”项，将其拖动至“地区页眉”节第一行的方格内，并将其标签和文本框的字体均设为12号粗体。9在两条直线之间添加一个标签，将其标题更改为“公司名称”，重复同样的操作在同一行添加另外两个标签：“联系人”和“联系人电话”

12绘制两条直线，颜色设置为“深灰1”色，边框宽度为3磅102021/12/229《Access2007循序渐进》第9章在“地区页脚”节中绘制文本框，将其标签更名为“客户数量”，在文本框内输入“=Count([公司名称])”

14将字段列表中的“公司名称”拖动至“主体”节的第一行中并将其对应的标签删除，重复同样操作将“联系人”和“联系人电话”项添加到“主体”节中13单击关闭按钮，弹出“提示”保存对话框，单击“是”按钮。弹出“另存为”对话框，输入“各地区客户”。单击“确定”按钮，完成报表的创建152021/12/230《Access2007循序渐进》第9章双击“各地区客户”项，打开我们刚创建的报表16在此报表中，“报表页眉”中显示的是报表名称和当前时间，“地区页眉”和“主体”中显示的是一条一条的客户记录2021/12/231《Access2007循序渐进》第9章9.1.5使用宏创建主窗体打开“客户管理系统”数据库，切换至“创建”标签页，单击“宏”按钮12021/12/232《Access2007循序渐进》第9章单击“操作”列第一行的下拉按钮，选择“OpenQuery”项，然后在其操作参数区域的“查询名称”中选择“各公司的年度供货单”项3切换至“设计”标签页，单击宏名按钮增加“宏名”列，单击“宏名”列的第一行，输入“查询各客户的年度供货单”2在第二行的“宏名”列中输入“查询供货金额最高的五个供货单”，在“操作”列中选择“OpenQuery”项，并在其操作参数区域的“查询名称”中选择“供货金额最高的五个供货单”项42021/12/233《Access2007循序渐进》第9章在“宏名”列的第四行中输入“打印各地区客户报表”，并在其对应的“操作”列选择“OpenReport”项，然后在其操作参数区域的“报表名称”中选择“各地区客户”项6单击“宏名”列的第三行，输入“打开客户信息管理窗体”。单击“操作”列中第三行的下拉按钮，选择“OpenForm”项，然后在其操作参数区域的“窗体名称”中选择“客户信息管理”项52021/12/234《Access2007循序渐进》第9章重复同样的操作，在“宏名”列的第五行中输入“关闭当前窗体”，在其“操作”列选择“Close”项，其操作参数区域均保持系统默认87在“宏名”列的第六行中输入“关闭当前数据库”，在其对应的“操作”列中选择“Close”项，其操作参数区域均保持系统默认。在第七行的“操作”列选择“quit”项。并保存为“宏组”宏2021/12/235《Access2007循序渐进》第9章在“属性”窗口中，单击“事件”标签，然后单击“单击”下拉框中的下拉按钮，选择“宏组.查询各客户的年度供货单”项11打开窗体的设计视图，添加一个命令按钮控件，并将其标题更改为“查看：各客户的年度供货单”

10重复同样的操作添加另外五个命令按钮，并为它们的单击事件选择相应的宏92021/12/236《Access2007循序渐进》第9章双击运行“主窗体”，单击“打印报表：各地区的客户”按钮，执行效果如下图所示122021/12/237《Access2007循序渐进》第9章9.1.6完善“公司客户管理系统”

打开“公司客户管理系统”数据库，右击“客户信息管理”，选择“设计视图”命令12021/12/238《Access2007循序渐进》第9章2选择“添加”按钮，单击“代码”按钮，打开代码编辑窗口2021/12/239《Access2007循序渐进》第9章为“添加”按钮（Command39）的单击（Click）事件编写代码，此段代码实现添加新客户资料的功能4在对象列表中选择“Command39”，在事件过程列表中选择“Click”事件32021/12/240《Access2007循序渐进》第9章为“查询”按钮（Command57）的单击（Click）事件编写此段代码6在对象列表中选择“Command57”，在事件过程列表中选择“Click”事件52021/12/241《Access2007循序渐进》第9章为“！清空所有客户信息（慎用）”按钮（Command58）的单击（Click）事件编写如下代码8在对象列表中选择“Command58”，在事件过程列表中选择“Click”事件72021/12/242《Access2007循序渐进》第9章为“保存修改”按钮（Command90）的单击（Click）事件编写如下代码，此段代码实现保存数据的功能10在对象列表中选择“Command90”，在事件过程列表中选择“Click”事件92021/12/243《Access2007循序渐进》第9章为“保存修改”按钮（Command91）的单击（Click）事件编写如下代码12在对象列表中选择“Command91”，在事件过程列表中选择“Click”事件112021/12/244《Access2007循序渐进》第9章这是添加数据的执行效果2021/12/245《Access2007循序渐进》第9章这是查询数据的执行效果2021/12/246《Access2007循序渐进》第9章9.2进销存管理系统9.2.1系统数据库和表设计作为一个销售型的公司，或者对于某个工厂的销售部门来说，建立完善的“进销存管理系统”是控制企业进货和监控盈利的关键。下边将以实例的形式讲述“进销存管理系统”的创建。本实例“进销存管理系统”共有四个表组成：“产品类型”表、“产品信息”表、“出库数据”表和“入库数据”表组成，具体如下页图所示。2021/12/247《Access2007循序渐进》第9章2021/12/248《Access2007循序渐进》第9章关于表格的创建前边已有多处叙述，此处不再详细讲解，至于表中字段类型标注为“查阅向导”的，请使用查阅向导与相关表格的相关字段相关联即可。2021/12/249《Access2007循序渐进》第9章9.2.2建立查询我们需要建立如图所示的三个查询2021/12/250《Access2007循序渐进》第9章在这三个查询中，“入库数据查询”以“入库数据”表为基础表，“出库数据查询”以“出库数据”表为基础表，除了“ID”字段外，其余字段均显示；“盈利查询”以“产品信息”为基础表，且只显示“类别ID”和“产品名称”字段。这三个查询均使用“查询向导”即可轻松创建，关于创建的方法，这里不再详细叙述。2021/12/251《Access2007循序渐进》第9章9.2.3建立主窗体本系统只有一个窗体构成，左侧有一个“出库”和“入库”的单选按钮，选择“出库”和“入库”单选按钮，下边和右侧数据会跟着改变2021/12/252《Access2007循序渐进》第9章单击“选项组”按钮，在窗体上使用向导添加一个包含两个选项按钮的选项组控件2打开“进销存管理系统”数据库，打开窗体“设计视图”

1添加一个名字为“产品名称”的下拉按钮控件，并与“产品信息”表中的产品名称相关联（按照向导操作即可）。并添加其他的五个文本框和两个命令按钮32021/12/253《Access2007循序渐进》第9章分别右击“产品名称”、“产品价格”、“入库日期”和“入库数量”四个文本框，在弹出的菜单中选择“属性”命令，打开“属性”设置窗口将“产品名称”、“产品价格”和“入库数量”三个控件的默认值设置为0将有效性规则的默认值设置为『<>“”』将“入库日期”的默认值设置为『=Date()』（就是默认为当前日期），有效性规则为『<>“”』45672021/12/254《Access2007循序渐进》第9章通过属性设置让这两个窗体完全重合，将窗体分别命名为“出库数据查询”和“入库数据查询”，将他们的标签分别命名为“出库数据”和“入库数据”9单击“子窗体/子报表”按钮，在窗体上使用向导添加两个以“入库数据查询”和“出库数据查询”为数据源的子窗体8将主窗体的设计视图关闭，并保存为“主窗体”窗体102021/12/255《Access2007循序渐进》第9章右击“产品编号”等控件，选择“属性”命令，打开其“属性”窗口12右击“出库数据查询”窗体，并选择“设计视图”命令，打开其设计视图112021/12/256《Access2007循序渐进》第9章14将“可用”属性选为“否”，将“是否锁定”属性选为“是”（五个白色的控件都进行相同的设置）13单击左上角的窗体属性按钮，打开窗体的属性对话框，只保留“数据表”视图为“是”，“允许编辑”属性选为“否”，“允许删除”属性选为“是”，“允许添加”属性选为“否”，“数据输入”属性选为“否”，完成对此窗体的设置2021/12/257《Access2007循序渐进》第9章打开“主窗体”的设计视图，并通过双击其左上角的“属性”按钮打开其属性设置窗口将“主窗体”的属性设置为：标题为“进销存管理系统”；只允许“窗体”视图；“记录选择器”为“否”；“导航按钮”为“否”，边框样式为“细边框”；“最大最小化按钮”为“无”。然后保存窗口设置即可完成主窗体的创建15162021/12/258《Access2007循序渐进》第9