- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验九 办公设备管理系统
实验目的:
熟悉系统的功能分析
掌握表之间关系的创建
掌握登录窗体的创建
掌握切换控制面板窗体的创建
掌握系统的调式与发布
说明 :本实验需要至少4 个课时才能完成,所以本实验可以到下次实验课完成
后再提交
1.系统概述:
一个组织或企业的设备管理部门全面地掌握组织内部各部门的办公设备信
息,包括设备名称、类别、配置、责任人、保险日期和数量等,对管理和组织固
定资源是非常必要的。通过建立办公设备管理系统可以方便地查询和管理办公设
备。
2.系统分析
创建系统之前,首先必须对系统进行分析。系统分析包括明确系统的功能、
确定系统数据库中包含哪些表、确定表的字段及其表之间的关系,最后给出系统
预览。
2.1 系统功能分析
办公设备管理系统包括以下两部分功能。
1) 主要操作功能:用户通过该功能可以完成一些基本操作,包括用户登录系统
功能、办公设备数据录入功能、查询功能和资产统计功能。
2) 辅助操作功能:该功能用于辅助用户完成部门管理功能、设备类别管理功能
和供应商管理功能。
根据办公设备管理系统的设计目的和功能,可以得知系统中应包括用户表、
设备信息表、部门信息表、设备类别表和供应商信息表。
2.2 预览系统可以让用户了解系统的整体框架。
启动【办公设备管理系统】时,首先打开【登录窗体】窗体,如下图所示。
当用户输入正确的用户名和密码后,单击 【登录】按钮,进入系统的【切换
面板】窗体,如下图所示。
3.系统实现
对系统功能和整体结构有了一定的认识之后,即可开始着手实现系统功能。
整个系统实现分为7 个步骤
创建数据库
创建数据表
创建系统查询
创建系统窗体
创建系统报表
VBA 编程
系统调试与发布
3.1 首先创建一个空白数据库
3.2 创建数据表
3.2.1 创建表
请自己创建用户表的结构,并输入几个记录。
用户表的字段设置
字段名 字段类型 字段大小 允许空字符串 主键 索引
用户名 文本 10 否 有(无重复)
密码 文本 10 否 无
并设计密码字段的掩码为密码。
后面的设备信息表、供应商信息表、部门信息表、设备类别表的表结构如下。
可以自己创建,也可以导入实验指导里相应的文本文件后做适当的修改。
3.2.2 创建表间关系
创建表之间的关系后,就可以根据具体需求向表中录入初始数据。
3.3 创建系统查询
3.3.1 在办公设备管理系统中,需要创建一个 “设备查询”,该查询将作为窗
体和报表的数据源。以“设备信息表”为数据源。
查询所有字段,如下所示:保存查询名为“设备查询”
3.3.2 还需创建一个“查询报表数据源”,它将作为窗体和报表的数据源。仍
然以“设备信息表”为数据源。
首先在查询视图中添加所有字段,
参数查询的条件可以在后面设计完窗体[设备高级查询],再逐一添加
在[类别编号]字段下添加条件:Like IIf(IsNull([forms]![设备高级查询]![类别名
称]),*,[forms]![设备高级查询]![类别名称])
在[部门编号]字段下添加条件:Like IIf(IsNull([forms]![设备高级查询]![部门名
称]),*,[forms]![设备高级查询]![部门名称])
在[单价]字段下添加条件:Between IIf(IsNull([forms]![设备高级查询]![最低价
格]),0,[forms]![设备高级查询]![最低价格]) And IIf(IsNull([forms]![设备高级查
询]![最高价格]),100000,[forms]![设备高级查询]![最高价格])
在[购置日期]字段下添加条件:Between IIf(IsNull([forms]![设备高级查询]![起
始日期]),#200/1/1#,[forms]![设备高级查询]

文档评论(0)