材料管理系统程序设计

1系统功能设计

根据系统需求，可以列出以下功能模块：①设备材料管理模块：该模块管理基本的设备材料数据，及其查询，该模块为系统的主要模块。②出入库管理模块：该模块用来管理企业需要购买的设备材料及企业安装需要使用的项目用料，及其相关查询，为系统的核心模块。③库存统计模块：该模块用来管理企业安装企业设备材料的库存及使用情况查询，该模块为辅助模块。④项目信息管理模块：用来管理项目立项的相关信息建立及查询。⑤仪器器材借出归还管理模块：该模块用来管理仪器器材的借出和归还及相关查询。⑥系统用户管理模块：该模块用来管理系统用户密码。

2系统数据流图

数据流图是一种图形化技术，它描绘信息流和数据从输入移动到输出的过程中所经受的变换，它是分析员与用户之间较好的通信工具。综合分析系统流程可得出企业设备材料库存管理信息系统的整体数据流图及系统一层数据流图，如图1及图2所示。

3数据库设计

数据库是信息管理的基础，其结构直接关系到各种功能的实现和程序运行的效率，进行数据库设计首先必须准确了解与分析用户需求（包括数据与处理）。建立数据库，首先确定数据库中要保存什么样的数据信息，然后设计数据库，建立由子段组成的表，字段里定义要存储的数据类型。建好数据库的结构后，数据库就能在纪录里存储数据。提前设计数据库，一个重要的原因就是效率问题，如果数据库中的纪录达到了10000条以上的话，那么效率就是建立数据库头等要考虑的事情了。另外，设计数据库的一个指导原则是把子段与不在同一表中的同类数据相联系，数据存在不同的表中，并不意味着不能一起使用它们；相反，当需要的数据横跨关系数据库中两个或更多的表时，能够使用“关系”访问数据。3.1数据信息设计根据需求分析，建立了一个数据库名为mydb的数据库，其中有八个数据表。用户信息表：此表中记录了用户的所有信息，管理员通过此表对员工进行添加、删除、修改管理，也可通过此表查询某个用户的信息，此表的主键为用户姓名，其结构如表1所示。库存信息表：此表中记录了设备材料的库存信息，此表的主键为编号。设备材料信息表：此表中记录了设备材料的所有信息，此表的主键为编号，其结构如表2所示。3.2数据库E-R图概念模型的最常用的表示方法是实体-联系方法(Entity-RelationApproach，简称E-R方法)。E-R方法是用E-R图来描述某一组织的信息模型。E-R图中包含了实体、关系和属性等三种基本成分，通常用矩形框代表实体，用连接相关实体的菱形框表示关系，用椭圆形或圆角矩形表示实体（或关系）的属性，并用直线把实体（关系）与其属性连接起来。由于人们通常就是用实体、联系和属性这三个概念来理解和描述现实问题的，所以实体联系图非常接近人的思维方式。此外，E-R模型使用简单的图形符号来表达系统分析员对问题域的理解，不熟悉计算机技术的用户也都能够理解，因此，ER模型可以作为用户与分析员之间的交流工具。实体联系图：简称为E-R图，是指以实体、关系、属性三个基本概念概括数据的基本结构，从而描述静态数据结构的概念模式。与此有关的概念有：①实体：是观念世界中描述客观事物的概念。②属性：指实体具有的某种特性，用来描述一个实体。③联系：可分为两类：一是实体内部的联系，一是实体之间的联系。

4主要功能实现

4.1公用模块在制作系统前，必须要制作一个完整的公用模块来进行数据库Access的连接，这样方便以后的系统开发。常用的连接方法有两种，第一种Recordset对象用来操作来自提供者的数据。使用ADO时，通过Recordset对象可对几乎所有数据进行操作。所有Recordset对象均使用记录（行）和字段（列）进行构造。第二种Connection对象代表与数据源进行的唯一会话。如果是客户端/服务器数据库系统，该对象可以等价于到服务器的实际网络连接。公用模块代码如下：PublicCnnAsNewADODB.ConnectionPublicPublicStrAsString注释：字符串PublicSubMain()Cnn.CursorLocation=adUseClient注释：设置或返回游标引擎的位置PublicStr="Provider=Microsoft.Jet.OLEDB.4.0;Da-taSource="&App.Path&"\mydb.mdb;JetOledb:databasepassword=123"注释：提供了连接数据库的字符串,并将其赋值给全局变量PublicStr,提供数据连接Cnn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&App.Path&"\mydb.mdb;JetOledb:databasepassword=123"FrmLogin.Show注释：provider=Microsoft.Jet.OLEDB.4.0表示采用的数据库引擎，该数据库引擎多用于Access数据库注释：&App.Path&"\mydb.mdb;JetOledb:databasepassword=123"表示数据源所在的位置名称以及数据库密码EndSub4.2用户登录通过输入系统的用户姓名和密码（图5.1所示系统登录界面），系统会通过语句rs.Open"select*from用户where姓名='"&Trim(TxtID.Text)&"'and密码='"&Trim(TxtPwd.Text)&"'",Cnn连接数据库并进行查找，自动判断输入用户的身份，来进入主界面。主界面设计简洁大方，下设五个菜单用于引导用户完成相应的功能。4.3设备材料入库流程用户可以使用主界面第一个菜单的“添加设备材料”来使用户输入设备材料基本信息进入系统数据库。（重要语句：Cnn.Execute"insertinto设备材料values('"&Text1(0)&"','"&Text1(1)&"','"&Text1(2)&"','"&Text1(3)&"','"&Text1(4)&"','"&Text1(5)&"','"&Text1(6)&"',"&Text1(7)&","&Text1(8)&")"'SQL语句写入）有了这些基本信息，系统才允许用户使用设备材料采购（入库）模块。用户可以在主界面第四个菜单中设备材料采购管理来进行设备材料入库。通过编号的下拉菜单用户可以选择已录入基本信息的设备材料编号，窗体在选择后在名称处自动显示选择的设备材料名称，方便用户辨认校对，至此用户可以输入剩余信息单击添加按钮完成设备材料数量的入库。4.4设备材料出库流程设备材料的出库必须建立在有项目的基础上。项目用料管理界面，用户通过下拉菜单选择项目，项目名称会自动显示。（代码如下：rs.Open"select*from项目where项目编号='"&Trim(Combo1.Text)&"'",CnnIfrs.EOF=FalseThenText1(1).Text=rs.Fields(1)EndIf）用户核对项目名称正确后使用“》”按钮调出用料列表进行设备材料的选择，价格和设备材料名称会自动显示，用户只需填写剩余信息按添加按钮可完成设备材料出库。4.5仪器器材管理仪器器材在电力安装企业是可以重复使用的工具。本系统按设备材料入库模式建立了仪器器材管理数据表，方法同设备材料管理表相同，这里主要介绍仪器器材借入借出功能的实现。用户可以使用主界面第三项仪器器材管理中的仪器器材借出管理。当仪器器材借出管理界面窗体出现后使用“》”按钮可以调出仪器器材表，用户可以选择需要借的仪器器材名称，选好后窗体上会显示剩余数量方便用户决定借出数量。当用户需要归还时依旧在仪器器材菜单下选择仪器器材归还管理，仪器器材归还管理界面，在表格里选中要归还的仪器器材，相关信息会显示在文本框里，用户核对后点击归还就可完成仪器的归还了。4.6查询窗口本系统给每一模块设计了相应的查询窗口。在所需要查询关键内容打勾并输入相应内容，点击查询按钮可以得到想要查询的内容，其中名称提供模糊查找。

5结束语

该设计主要完成了电力安装企业设备材料管理系统的各项功能，在系统分析的过程中，运用了E-R图和业务流图对系统的功能进行了分析，相应写出出数据并进行数据库的建立；完成各商品信息和用户信息进行查询、修改、删除、录入等操作的程序设计，能够完成用户对系统的要求。

作者：马玉荣 单位：新疆天富热电股份公司