创建实用Access数据库-公司-进销存.ppt

第9章创建实用Access数据库 公司客户管理系统进销存管理系统 9 1公司客户管理系统 9 1 1创建 公司客户管理系统 数据表 作为一个销售型的公司 或者对于某个工厂的销售部门来说 公司客户管理系统的建立可以有效的避免因业务员个人工作变动而造成公司客户的流失 也可以方便我们统计每个业务员的销售业绩 以及各个地区间的销售差异 根据公司情况 建立公司客户管理系统共需5个表 如下页图所示 1 创建基础表 创建一个空白的 公司客户信息管理系统 数据库后 切换至 创建 标签页 单击 表设计 按钮 打开 表设计器 窗口 1 2 在表设计器窗口中 按照书中表9 1的要求输入相应的字段名称 并在数据类型一列按规定设置相应的 数据类型 然后设置 客户编号 为 主键 这些 常规 属性 先不要设置 下边将分别进行设置 在表设计器窗口中 选中 公司名称 字段 在下边的常规选项卡中设置格式为 公司名称 蓝色 将索引设置为 有 无重复 3 以相同的操作 按照书中表9 1的规定设置 联系人性别 邮政编码 公司规模 和 加入时间 的 常规 属性 设置完毕后将此窗口关闭 并选择保存为 客户信息表 后 即可完成此表的创建 4 创建了 客户信息表 后 按照相同的操作步骤 创建其它表 5 2 创建 客户信息表 的下拉列表 打开 客户信息表 表设计窗口 选中 地区 字段 在其 数据类型 的下拉列表中选择 查阅向导 命令 打开 查阅向导 对话框 1 选择 地区信息表 单击 下一步 按钮继续 3 保持系统默认 单击 下一步 按钮 2 保持系统默认连续单击两次 下一步 按钮 打开 查阅向导 的最后一个对话框 接着保持系统默认 单击 完成 按钮 5 在 可用字段 列表中选择 地区名称 字段 单击选择按钮后单击 下一步 按钮继续 4 6 单击 是 按钮保存表 完成查阅向导的操作 9 1 2创建 公司客户管理系统 的供货查询 1 创建 各客户的年度供货单 查询 打开 公司客户管理系统 数据库 单击 创建 标签 2 单击 查询向导 按钮 1 4 选择 表 进出帐表 项 单击 下一步 按钮 3 选择 交叉表查询向导 单击 确定 按钮 6 选择 供货时间 项 单击 下一步 按钮 5 双击 公司名称 将其添加到 选定字段 列表框 重复同样的操作将 货品名称 添加到 选定字段 列表框 单击 下一步 按钮继续 8 在字段列表中选择 供货金额 项 在函数列表中选择 汇总 项 将 是 包括各行小计 复选框中的勾去掉 单击 下一步 按钮 7 选择 年 项 单击 下一步 按钮继续 为查询输入名称 各客户的年度供货单 单击 完成 按钮完成查询的创建 9 行标题是 公司名称 和 货品名称 列标题是 供货时间 的年份 行 列交叉处的值是 供货金额 总和 双击 各客户的年度供货单 查询 执行效果如图所示 2 创建 供货金额最高的五个供货单位 的查询 单击 查询向导 按钮 打开查询 设计视图 单击 关闭 按钮关闭 显示表 对话框 2 打开 公司客户管理系统 数据库 切换至 创建 标签页 1 在设计视图上半区域单击右键 选择 SQL视图 命令 打开SQL视图 3 单击关闭按钮 弹出 是否保存 对话框 单击 是 按钮 弹出 另存为 对话框 输入 供货金额最高的五个供货单 单击 确定 按钮完成查询的创建 5 输入SQL语句 4 这是执行结果 按照 供货金额 从高到低排列 取前五条记录 9 1 3创建窗体 打开 客户管理系统 数据库 切换至 创建 标签页 2 单击 窗体设计 1 重复相同的操作 添加另外三个标签 添加新客户功能 查询功能 和 修改与删除功能 并将它们的字体修改为12号粗体红色 4 创建一个标签 输入标题 客户管理 并将其字体改为18号粗体 3 单击直线按钮 在下边画一条直线 5 为 查询功能 区域添加一个 请输入要查询的公司名称 文本框 7 创建文本框 将其标签的标题修改为 公司名称 重复相同的操作为 添加新客户功能 区域添加其他文本框 包括 公司主营业务 和 联系人 等 6 为 修改与删除功能 区域添加一组文本框 8 重复相同的操作添加 业务员名称 等其它组合框 10 单击组合框按钮 使用向导创建表为 表 地区信息表 字段选 地区名称 的 地区名称 组合框 9 在 添加新客户功能 区域添加 添加 按钮 在 查询功能 区域添加 查询 按钮 在 修改与删除功能 区域添加 清空所有客户信息 慎用 保存修改 和 删除该记录 命令按钮 11 通过以上操作步骤我们就完成了 客户信息管理 窗体的创建 双击打开 效果如图所示 9 1 4创建客户报表 单击鼠标右键 选择 报表页眉 页脚 命令 2 打开 客户管理系统 数据库 进入报表设计视图工作区 1 在 页面页脚 节中创建另一个文本框 将其对应的标签删除 在文本框中输入 第 Page 页 4 在 报表页眉 节中添加一个文本框 在标签框中输入 各地区客户 字体设为12号粗斜体 在文本框中输入 Now 3 双击报表属性按钮 弹出 报表 属性窗口 5 切换至 数据 标签页 单击 记录源 组合框的下拉按钮 选择 客户信息表 项 6 切换至 设计 标签页 单击 分组和排序 按钮 打开 排序和分组 窗口 7 单击 添加排序 按钮 在打开的字段列表中选择 地区 字段 默认排序次序为升序 分组形式设置为 有页眉节 和 有页脚节 8 单击 添加现有字段 按钮 11 单击 字段列表 中的 地区 项 将其拖动至 地区页眉 节第一行的方格内 并将其标签和文本框的字体均设为12号粗体 9 在两条直线之间添加一个标签 将其标题更改为 公司名称 重复同样的操作在同一行添加另外两个标签 联系人 和 联系人电话 12 绘制两条直线 颜色设置为 深灰1 色 边框宽度为3磅 10 在 地区页脚 节中绘制文本框 将其标签更名为 客户数量 在文本框内输入 Count 公司名称 14 将字段列表中的 公司名称 拖动至 主体 节的第一行中并将其对应的标签删除 重复同样操作将 联系人 和 联系人电话 项添加到 主体 节中 13 单击关闭按钮 弹出 提示 保存对话框 单击 是 按钮 弹出 另存为 对话框 输入 各地区客户 单击 确定 按钮 完成报表的创建 15 双击 各地区客户 项 打开我们刚创建的报表 16 在此报表中 报表页眉 中显示的是报表名称和当前时间 地区页眉 和 主体 中显示的是一条一条的客户记录 9 1 5使用宏创建主窗体 打开 客户管理系统 数据库 切换至 创建 标签页 单击 宏 按钮 1 单击 操作 列第一行的下拉按钮 选择 OpenQuery 项 然后在其操作参数区域的 查询名称 中选择 各公司的年度供货单 项 3 切换至 设计 标签页 单击宏名按钮增加 宏名 列 单击 宏名 列的第一行 输入 查询各客户的年度供货单 2 在第二行的 宏名 列中输入 查询供货金额最高的五个供货单 在 操作 列中选择 OpenQuery 项 并在其操作参数区域的 查询名称 中选择 供货金额最高的五个供货单 项 4 在 宏名 列的第四行中输入 打印各地区客户报表 并在其对应的 操作 列选择 OpenReport 项 然后在其操作参数区域的 报表名称 中选择 各地区客户 项 6 单击 宏名 列的第三行 输入 打开客户信息管理窗体 单击 操作 列中第三行的下拉按钮 选择 OpenForm 项 然后在其操作参数区域的 窗体名称 中选择 客户信息管理 项 5 重复同样的操作 在 宏名 列的第五行中输入 关闭当前窗体 在其 操作 列选择 Close 项 其操作参数区域均保持系统默认 8 7 在 宏名 列的第六行中输入 关闭当前数据库 在其对应的 操作 列中选择 Close 项 其操作参数区域均保持系统默认 在第七行的 操作 列选择 quit 项 并保存为 宏组 宏 在 属性 窗口中 单击 事件 标签 然后单击 单击 下拉框中的下拉按钮 选择 宏组 查询各客户的年度供货单 项 11 打开窗体的设计视图 添加一个命令按钮控件 并将其标题更改为 查看 各客户的年度供货单 10 重复同样的操作添加另外五个命令按钮 并为它们的单击事件选择相应的宏 9 双击运行 主窗体 单击 打印报表 各地区的客户 按钮 执行效果如下图所示 12 9 1 6完善 公司客户管理系统 打开 公司客户管理系统 数据库 右击 客户信息管理 选择 设计视图 命令 1 2 选择 添加 按钮 单击 代码 按钮 打开代码编辑窗口 为 添加 按钮 Command39 的单击 Click 事件编写代码 此段代码实现添加新客户资料的功能 4 在对象列表中选择 Command39 在事件过程列表中选择 Click 事件 3 为 查询 按钮 Command57 的单击 Click 事件编写此段代码 6 在对象列表中选择 Command57 在事件过程列表中选择 Click 事件 5 为 清空所有客户信息 慎用 按钮 Command58 的单击 Click 事件编写如下代码 8 在对象列表中选择 Command58 在事件过程列表中选择 Click 事件 7 为 保存修改 按钮 Command90 的单击 Click 事件编写如下代码 此段代码实现保存数据的功能 10 在对象列表中选择 Command90 在事件过程列表中选择 Click 事件 9 为 保存修改 按钮 Command91 的单击 Click 事件编写如下代码 12 在对象列表中选择 Command91 在事件过程列表中选择 Click 事件 11 这是添加数据的执行效果 这是查询数据的执行效果 9 2进销存管理系统 9 2 1系统数据库和表设计 作为一个销售型的公司 或者对于某个工厂的销售部门来说 建立完善的 进销存管理系统 是控制企业进货和监控盈利的关键 下边将以实例的形式讲述 进销存管理系统 的创建 本实例 进销存管理系统 共有四个表组成 产品类型 表 产品信息 表 出库数据 表和 入库数据 表组成 具体如下页图所示 关于表格的创建前边已有多处叙述 此处不再详细讲解 至于表中字段类型标注为 查阅向导 的 请使用查阅向导与相关表格的相关字段相关联即可 9 2 2建立查询 我们需要建立如图所示的三个查询 在这三个查询中 入库数据查询 以 入库数据 表为基础表 出库数据查询 以 出库数据 表为基础表 除了 ID 字段外 其余字段均显示 盈利查询 以 产品信息 为基础表 且只显示 类别ID 和 产品名称 字段 这三个查询均使用 查询向导 即可轻松创建 关于创建的方法 这里不再详细叙述 9 2 3建立主窗体 本系统只有一个窗体构成 左侧有一个 出库 和 入库 的单选按钮 选择 出库 和 入库 单选按钮 下边和右侧数据会跟着改变 单击 选项组 按钮 在窗体上使用向导添加一个包含两个选项按钮的选项组控件 2 打开 进销存管理系统 数据库 打开窗体 设计视图 1 添加一个名字为 产品名称 的下拉按钮控件 并与 产品信息 表中的产品名称相关联 按照向导操作即可 并添加其他的五个文本框和两个命令按钮 3 分别右击 产品名称 产品价格 入库日期 和 入库数量 四个文本框 在弹出的菜单中选择 属性 命令 打开 属性 设置窗口 将 产品名称 产品价格 和 入库数量 三个控件的默认值设置为0 将有效性规则的默认值设置为 将 入库日期 的默认值设置为 Date 就是默认为当前日期 有效性规则为 4 5 6 7 通过属性设置让这两个窗体完全重合 将窗体分别命名为 出库数据查询 和 入库数据查询 将他们的标签分别命名为 出库数据 和 入库数据 9 单击 子窗体 子报表 按钮 在窗体上使用向导添加两个以 入库数据查询 和 出库数据查询 为数据源的子窗体 8 将主窗体的设计视图关闭 并保存为 主窗体 窗体 10 右击 产品编号 等控件 选择 属性 命令 打开其 属性 窗口 12 右击 出库数据查询 窗体 并选择 设计视图 命令 打开其设计视图 11 14 将 可用 属性选为 否 将 是否锁定 属性选为 是 五个白色的控件都进行相同的设置 13 单击左上角的窗体属性按钮 打开窗体的属性对话框 只保留 数据表 视图为 是 允许编辑 属性选为 否 允许删除 属性选为 是 允许添加 属性选为 否 数据输入 属性选为 否 完成对此窗体的设置 打开 主窗体 的设计视图 并通过双击其左上角的 属性 按钮打开其属性设置窗口 将 主窗体 的属性设置为 标题为 进销存管理系统 只允许 窗体 视图 记录选择器 为 否 导航按钮 为 否 边框样式为 细边框 最大最小化按钮 为 无 然后保存窗口设置即可完成主窗体的创建 15 16 9 2 4给主窗体添加代码 在 主窗体 的设计界面 单击代码按钮打开 进销存管理系统 数据库的代码设置窗口 在此窗口中 通过 控件选择 下拉列表和 功能选择 下拉列表 可以选择对不同控件的不同操作设计代码 由于代码的添加过程 用幻灯片说明 没有太大的实际意义 建议同学们到正文中反复研究本文提供的代码 理解每一句代码的意义 这样才能举一反三 为自己做出更好的数据库打好基础 本课件对代码的添加不做过多讲述 9 2 5建立 盈利查询 报表并添加代码 我们主要对每个产品的 进货数量 进货总金额 出货总量 和 出货总金额 进行统计 并根据 已售商品 计算出基本的盈利状况 再根据 进货总金额 和 出货总金额 对比出当前资金的占用情况 为此报表添加如图所示的后边几个字段 进货总量 进货金额 出货总量 出货金额 出货盈利和资金亏损 并删除附带标签 2 使用向导 以 盈利查询 查询为数据源 创建一个 盈利查询 报表 注意此时 盈利查询 报表只有前两个字段 类别ID 和 产品名称 右击此报表 选择 设计视图 命令 打开其设计视图 1 在页面页眉节添加字段的相关标签 3 在 页面页脚 节中添加 总盈利 和 总亏损 两个文本框 4 打开窗体的代码编写窗口后 在 控件选择 下拉列表中选择 主体 然后添加书中所述的代码 即可以实现我们需要的功能 5 代码开始 首先根据 产品名称 从 产品信息 表中查找 产品编号 然后根据产品编号 在 入库数据 表和 出库数据 表中 检索出相同的数据进行计算即可 具体操作请看代码中的相关解释