库存管理系统

作者:潘鲲鹏

指导老师:陈小玉 【摘要】

随着现代工业的发展，计算机信息管理系统越来越受到企业重视。本文主要分析了库存管理系统的一些基本功能和组成情况，包括系统的需求分析、系统结构，功能模块划分以及数据库模式分析等，重点对应用程序的实际开发实现作了介绍。达到了数据的一致性和安全性，且应用程序功能完备，符合了库存管理系统作为典型的信息管理系统(MIS)的要求。同时简单介绍了Visual Basic编程环境和Access数据库管理系统的功能特点，库存管理系统是企业物流管理中不可或缺的一部分。 关键词：库存管理，数据库，信息管理，VB

【关键词】库存管理，数据库，信息管理，VB

第一章 绪论

库存管理系统是一个企事业单位不可缺少的一部分,它的内容对于企业的决策者和管理者来说都是至关重要的，因此，库存管理系统应该能够为用户提供充足的信息和快捷的查询手段，但一直以来人们使用传统的人工方式管理库存，这种管理方式存在着许多缺点，诸如效率低，保密性差等，而且时间一长，将产生大量的文件和数据，这对于查找、更新和维护都带来了不少的困难。

作为计算机应用的一部分，使用计算机对产品库存信息进行管理，具有着人工管理无法比拟的优点，它检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等，可减少更多的人力物力，这些都能够极大地提高货品库存的管理效率，也是企业库存管理科学化、正规化，与世界接轨的重要条件。因此，开发一个库存管理系统是很有必要的，具有其特有的技术意义和管理意义。 1.1管理信息系统的概述

管理信息系统（简称MIS）是在管理科学、系统科学、计算机科学等的基础上发展起来的综合性边缘科学。在21世纪信息高速发展的时代中，管理信息系统具有很重要的作用，它的预测和辅助决策的功能，即利用现代管理的决策和支持。

管理信息系统是一个由人、机（计算机）组成的能进行管理信息的收集、传递、存储、加工、维护和使用的系统。它能观测企业或组织的各种运动情况，利用过去的数据预测未来；从全局出发辅助决策；利用信息控制企业或组织行为，帮助其实现长远的规划目标。简言之，管理信息系统是一个以计算机为工具，具有数据处理、预测、控制和辅助决策功能的信息系统。

管理信息系统是一个人机系统，同时它又是一个一体化集成系统。管理信息系统是信息系统的一个子系统，它以计算机技术、通讯技术和软件技术为技术基础，同时将现代管理理论、现代管理方法及各级管理人员融为一体，最终为某个组织整体的管理与决策服务，是由人和计算机组成的能进行管理信息的收集、传递、存储、加工、维护和使用的系统。

管理信息系统的基本结构可以概括为四大部件，即信息源、信息处理器、信息用户和信息管理者。因此，一个成功的管理信息系统应该具有可靠的硬件、实用的软件、强有力的现代化管理水平。具体讲，管理信息系统的三大支柱是：计算机网络、数据库和现代化的管理，这三打支柱称为管理信息系统的扩展部件。

第 - 1 - 页 (共 18 页)

1.2数据库应用系统开发简介

在数据库应用系统开发之前，对开发数据库的基本概念应当了解，对数据库的结构、开发数据库应用程序的步骤、开发体系及方法都应当有相当清晰的了解和认识。

数据库应用系统开发的目标是建立一个满足用户长期需求的产品。开发的主要过程为：理解用户的需求，然后，把它们转变为有效的数据库设计。把设计转变为实际的数据库，并且这些数据库带有功能完备、高效能的应用。

数据库技术在计算机软件邻域研究中一直是非常重要的主题，产生于60年代，30多年来数据库技术得到了迅速发展，并已形成较为完整的理论体系和一大批实用系统。并且，近年来，随着World Wide Web(WWW)的猛增及Internet技术的迅速发展，使得数据库技术之时成为最热门技术之一。 1.3库存管理系统

当今时代是飞速发展的信息时代，在各行各业中离不开信息处理，这正是计算机被广泛应用于信息处理系统的环境。计算机最大的好处在于利用它能够进行信息管理，使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了其安全性。尤其对复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。 1.3.1国内外同类管理软件的研究现状与发展趋势

现在国内外对此类系统的开发与研究也是很有实用性的，基本上能满足各企业的自身特点，来进行库存方面的管理，同时，改类系统又都在不断地深入与发展，来适用更多的企业，一般都能运用于各个企业的库存管理，但是都没有针对大众的广泛应用，只能运用某个企业或单位，这一点还有待于今后的进一步开发与实践。

今后此类软件将会向条码库存管理系统发展，现阶段，伴随物流及管理信息化、网络化的发展，应用条码技术进行库存管理、实现仓库作业自动化，将是一个必然的发展趋势，也是需要迫切解决的一个现实问题。随着信息化技术的不断提高和应用的日渐普及，更多的商品拥有自己的条码，而且，使用条码化工作代替传统作业模式，减少了手工输入，这样不但提高了作业效率，还能确保资料正确，并减少因人为失误所造成的损失。 1.3.2库存管理系统研究背景与意义

随着我国经济的飞速发展，各种类型规模的公司企业迅速崛起，许多从事生产和经营管理的企业都有自己生产和销售的产品，而这些产品都需要储存在仓库中，对于每个企业来说，随着企业规模的不断扩大，产品数量的急剧增加，所生产产品的种类也会不断地更新与发展，有关产品的各种信息量也会成倍增长。面对庞大的产品信息量，如何有效地管理库存产品，对这些企业来说是非常重要的，库存管理的重点是销售信息能否及时反馈，从而确保企业运行效益。而库存管理又涉及入库、出库的产品、经办人员及客户等方方面面的因素，如何管理这些信息数据，是一项复杂的系统工程，充分考验着仓库管理员的工作能力，工作量的繁重是可想而知的，所以这就需要由库存管理系统来提高库存管理工作的效率，这对信息的规范管理、科学统计和快速查询，减少管理方面的工作量，同时对于调动广大员工的工作积极性，提高企业的生产效率，都具有十分重要的现实意义。

第二章 数据库理论基础 2.1数据库系统设计

一个成功的信息管理系统，是建立在许多条件之上的，而数据库是其中一个非常重要的条件和关键技术。信息管理系统所涉及的数据库设计分五个步骤：数据库需求分析、概念设计、逻辑设计、物理设计与加载测试。

（1） 数据库需求分析的任务是将业务管理单证流化为数据流，划分主题之间的边界，绘制出DFD图，并完成相应的数据字典。

（2） 概念设计的任务是从DFD出发，绘制出本主题的实体－关系图，并列出各个实体与关系的纲要表。

（3） 逻辑设计的任务是从E-R图与对应的纲要表出发，确定各个实体及关系的表名属性。

（4） 物理设计的任务是确定所有属性的类型、宽度与取值范围，设计出基本表的主键，将所有的表名与字段名英文化（现在很多软件能支持中文字段，如Access 2000），实现物理建库，完成数据库物理设计字典。

（5） 加载测试工作贯穿于程序测试工作的全过程，整个录入、修改、查询、处理工作均可视为对数据库的加载测试工作。 2.2 SQL语言介绍 2.2.1 SQL基础

SQL(Structured Query Language，结构查询语言)是一个功能强大的数据库语言。使用SQL的常见关系数据库管理系统有：Oracle、 Sybase、 Microsoft SQL Server、 Access、 Ingres等等。虽然绝大多数的数据库系统使用SQL，但是它们同样有它们自立另外的专有扩展功能用于它们的系统。但是，标准的SQL命令，比如\"Select\"、 \"Insert\"、 \"Update\"、 \"Delete\"、 \"Create\"和 \"Drop\"常常被用于完成绝大多数数据库的操作。 2.2.2 SQL语句

SQL语句概括起来可以分为数据操作语言，数据定义语言和数据控制语言几大组，它们用于对数据库数据的查询，修改和更新，是一种完备的数据处理语言。主要用到的数据操作语言主要是：

SELECT:用于数据检索；

INSERT:用于增加数据到数据库；

UPDATE:用于从数据库中修改现存的数据； DELETE:用于从数据库中删除数据。

第三章 应用系统开发工具

3.1 Visual Basic简介及实现原理

Visual Basic（简称VB）是美国微软公司（Microsoft）于1990年推出的一套完整的Windows系统软件开发工具，可用于开发Windows环境下的各类应用程序，是一种可视化、面向对象、用事件驱动方式的结构化高级程序设计语言和工具，是目前使用最广泛的编程语言之一。至今以升级到了6.0版。

VB的重要特点之一是可视性。系统引进了窗体和控件的机制，用于设计应用程序界面。用户通过在屏幕上生成窗体，在窗体中绘制所需要的控件和按钮，设计菜单和对话框，VB会自动生成相应的代码。大大降低了对程序设计的要求，提高了应用程序的开发效率。 3.2 数据库组件介绍 在使用Visual Basic开发数据库应用程序的时候，会经常使用数据库访问控件。这些控件包括：

● Data控件；

● ADO Data控件；

● DataList控件/DataCombo控件； ● DataGrid控件； ● MSChart控件。

下面将分别对这些控件的主要功能及使用方法进行介绍。 3.2.1 Data控件

Data控件是Visual Basic中最基本的数据库操作控件。它使用Recordset对象提供对存储在数据库中数据的访问。Data控件允许从一个记录移动到另一个记录，并显示和操纵来自被连接控件的记录的数据。许多其他的数据库操作控件都需要Data控件或类似的数据源控件。

3.2.2 ADO Data控件 ADO Data控件与内部Data控件以及Remote Data控件（RDC）相似。用户可以使用ADO Data控件快速地创建一个到数据库的连接。 3.2.3 DataList控件/DataCombo控件

DataList控件是一个数据绑定列表框，它可以自动地由一个附加数据源中的一个字段充填，并且可选择地更新另一个数据源中一个相关表的一个字段。DataCombo控件的功能与DataList控件完全相同，只不过DataCombo控件是一个组合框。 3.2.4 DataGrid控件

在许多情况下，需要使用表格形式来显示数据库中的数据。这时就要借助于DaatGrid控件。用户可以设置DataGrid控件的DataSource属性为一个ADO Data控件，从而将ADO Data中的数据自动地填充到DataGrid表格中。这个DataGrid控件实际上是一个固定的列集合，每一列的行数都是不确定的。 3.2.5 MSChart控件

MSChart控件的功能是以图形方式显示数据的图表。这会使枯燥的数据变得更加生动直观，增加了程序的实用价值。 3.3 SQL语言在VB中的应用 1.SQL提供的实用函数

为实现使用VB程序调用SQL语言访问Access数据库多个记录的目的，我们利用SQL提供的函数。

●Davg Function（求平均值）

●Dcount Function（计算满足条件的记录数）

●Dfirst Function（返回记录集的第一个记录的某个域值） ●Dlast Function（返回记录集的最后一个记录的某个域值）

●Dlookup Function（返回记录集中满足待定条件的记录的域值） ●Dsum Function（求和计算） ●Dmax Function（求最大值） ●Dmin Function（求最小值）

利用以上的SQL函数能够方便地进行数据库文件记录地查询和统计工作。 2.利用SQL访问多个记录地方法

在进信息查询和统计地过程中，我们往往需要从记录集中根据待定的条件提取其中的一部分记录信息。这种改变基于数据库关系视图的记录集，这里我们介绍提取记录信息的有效方法。

建立一个新的查询

set mydb=Open Database(“c:\\DIR1\\manage.mdb”) （打开数据库文件c:\\DIR1\\manage.mdb）

set myquery=mydb.creat QueryDef(“monthquery”)(创建查询名为monthquery的查询)

货品信息管理Myquery.SQL=”select*from OPNRPT where mid $(year,7,2)=’”&yeartext.text&”’…”

(利用查询的SQL属性，建立查询依据，即查询的条件。这里用到了Setect Statement) 以后如果需要这样的查询，只需要引用查询名”monthquery”即可。需要说明的两点是：①使用前先定义Dim mydb AS Database及myquery AS querydef.②查询”monthquery”没有使用Data控件，也就不直接显示信息。 3.4 Access 2000简述

Access2000 是关系数据库开发工具，1992年，Microsoft Access作为第一个面向Windows操作平台的桌面数据库管理系统而诞生，它不但充分体现了面向对象的思想，提供可视化的编程手段，而且充分利用了Windows操作平台的优越性，采用与Windows完全一致的界面风格，使界面非常友好。

第四章 库存管理系统设计分析 4.1需求分析

库存管理系统需满足仓库管理员及工作人员的需求，他们具有登陆应用系统的权限，所以需要对工作人员的登陆本模块进行更多的考虑，设计不同用户的操作权限和登陆方法。 4.2模块划分 库存管理系统 系仓入出盘综附历打 统库库库存合项史印管管管管管分数、 理理理理理类据查 管询理 盘货存品 录出仓供收经 出货收入入库货货办货短超库品货库信单单人 品线储登出单期息位位员货货 库记库位间管管管管存品品管年年汇理理理理 管管管理度度总理理 理 统收表计货 金 额统基本模块与功能： 计1.系统 包括用户管理，密码管理，关闭系统，以及数据的备份与恢复。 2.库存管理

货品信息管理：对仓库里的货品进行登记； 货品库存管理：管理仓库的库存情况； 3.入库管理

入库登记管理：能对货品的入库登记，删除，更改等。 4.出库管理

对货品出库期间的年度统计，出库登记，及收获单位金额统计等； 5.盘存管理 数据流程图：

登陆库存管理系统 密码错误

验证用户信息

系统主窗体

仓入出综盘附理历 系统库库库合存项史 管管管管管分数理理理理理类 据管

汇总计算

库存汇总

数据备份 备份输出

4－1 库存管理数据流程图 打印、查询 货品入库单货品出库单经办人员报表

货品登记 基本信息录入 货品基本信息管理 出库货品信息管理 入库货品信息管理 货品调配汇总 货品其他信息管理 4－2 货品信息管理数据

4.3数据库设计

本库存管理系统是应用在单机系统上的，只需建立起一个数据库，在此数据库基础上建立起表格，现将部分数据结构表描述如下： 货品信息表

字段名 货品编码 货品名称 类别 型号 单位 仓库编码 存放仓库 入库计划单价 出库计划单价 原始库存 默认货位 警戒底线库存 警戒高线库存

入库登记表 字段名 入库日期 入库单号

数据类型 文本 文本 文本 文本 文本 文本 文本 货币 货币 数字 文本 数字 数字 字段长度 5 10 8 4 2 5 12 长整型 5 长整型 长整型 表1 货品信息表 是否为空 数据类型 日期/时间 文本 字段长度 10 是否为空

货物编码 数量 进货价 总额 已付货款 供货单位编码 供货单位 经办人编码 经办人 增值税率 备注

出库登记表

字段名 出库日期 出库单号 货物编码 货物名称 数量 单价 出货价 总额 已收获款 收货单位编码 收货单位 经办人编码 经办人 增值税率 备注

用户表 字段名 UserID userPWD 文本 数字 货币 货币 货币 文本 文本 文本 文本 数字 备注 5 长整型 5 20 5 8 单精度型 表2 入库登记表 数据类型 日期/时间 文本 文本 文本 数字 货币 货币 货币 货币 文本 文本 文本 文本 数字 备注 字段长度 10 5 10 长整型 5 20 5 8 单精度型 是否为空 表3 货品出库表 数据类型 文本 文本 字段长度 10 6 是否为空

表7 用户表 第五章 应用程序设计 5.1程序结构

本应用程序由33个窗体组成，主要的分别是：主窗体，欢迎界面，登陆窗体，入库窗体，出库窗体，库存汇总，打印及查询等窗体组成。 5.2 程序源代码

程序实现的部分代码如下： ●公共模块

Public date1 As String Public date2 As String

Public gUserName As String '保存用户名' 添加执行SQL语句的函数

Public Function transactSQL(ByVal sql As String) As ADODB.Recordset Dim con As ADODB.Connection Dim rs As ADODB.Recordset Dim strConnection As String Dim strArray() As String

Set con = New ADODB.Connection '创建连接 Set rs = New ADODB.Recordset '创建记录集 On Error GoTo TransactSQL_Error

strConnection = \"Provider=Microsoft.jet.oledb.4.0;Data Source=E:\\库存管理\\kucun.mdb\"

strArray = Split(sql)

con.Open strConnection '打开连接

If StrComp(UCase$(strArray(0)), \"select\ rs.Open Trim$(sql), con, adOpenKeyset, adLockOptimistic Set transactSQL = rs '返回记录集 iflag = 1 Else

con.Execute sql '执行命令 iflag = 1 End If

TransactSQL_Exit: Set rs = Nothing Set con = Nothing Exit Function TransactSQL_Error:

MsgBox \"查询错误：\" & Err.Description iflag = 2

Resume TransactSQL_Exit End Function

●主窗体的程序代码

图5－1 主窗体界

Private Sub a1_Click() Form1.Show End Sub

Private Sub a5_Click() '调入数据备份 Load main_sjbf main_sjbf.Show

main.Enabled = False End Sub

Private Sub a6_Click() '调入数据恢复 Load main_sjhf main_sjhf.Show main.Hide End Sub

Private Sub b1_Click() frm货品信息.Show End Sub

Private Sub b12_Click()

sql = \"select * from 货品信息 order by 货品编码\" frmProInfo.createList (sql) frmProInfo.Show End Sub

Private Sub b2_Click() frm货品库存.Show End Sub

Private Sub B3_Click() frm超储货品.Show End Sub

Private Sub b4_Click()

frm短线货品.Show End Sub

Private Sub c1_Click() frm入库登记.Show End Sub

Private Sub c2_Click() frm货品入库年度统计.Show End Sub

Private Sub c3_Click()

frm供货单位供货分类金额统计.Show End Sub

Private Sub c4_Click()

frm供货单位年度供货金额统计.Show End Sub

Private Sub Command1_Click()

date1 = Text1.Text & \"/\" & Text3.Text & \"/\" & Text2.Text date2 = Text6.Text & \"/\" & Text4.Text & \"/\" & Text5.Text Text7.Text = date1 End Sub

Private Sub d1_Click() frm出库登记.Show End Sub

Private Sub d2_Click() frm货品出库年度统计.Show End Sub

Private Sub d3_Click()

frm收货单位期间收货统计.Show End Sub

Private Sub d4_Click()

frm收货单位年度收货金额统计.Show End Sub

Private Sub e1_Click() frm盘存录入.Show End Sub

Private Sub e2_Click() frm盘存表.Show End Sub

Private Sub f1_Click() frm货品出入汇总表.Show End Sub

Private Sub g1_Click() frm经办人员.Show End Sub

Private Sub g2_Click()

frm供货单位.Show End Sub

Private Sub g3_Click() frm仓库信息.Show End Sub

Private Sub g5_Click() Form6.Show End Sub

Private Sub h1_Click() frm历史库存.Show End Sub

Private Sub h2_Click() frm历史入库.Show End Sub

Private Sub h3_Click() frm历史出库.Show End Sub

Private Sub i1_Click() DataReport1.Show End Sub

Private Sub i2_Click() DataReport2.Show End Sub

Private Sub i3_Click() DataReport3.Show End Sub

Private Sub j1_Click() Form2.Show End Sub

Private Sub j2_Click() Form3.Show End Sub

Private Sub j3_Click() Form4.Show End Sub

Private Sub j4_Click() Form5.Show End Sub

Private Sub Toolbar1_ButtonClick(ByVal Button As ComctlLib.Button) Select Case Button.Key

Case Is = \"rk\" '调入入库登记 c1_Click

Case Is = \"ck\" '调入出库登记 d1_Click

Case Is = \"kchz\" '调入库存汇总 f1_Click

Case Is = \"zhcx\" '调入组合查询 j4_Click

Case Is = \"sjbf\" '调入数据备份 a5_Click End Select End Sub

Private Sub x_Click() End

End Sub

●登陆模块的实现

Private Sub cmdLogin_Click() denlu_name = txtUserName.Text denlu_pass = txtPassword.Text Dim mycn As New ADODB.Connection Dim myrs As New ADODB.Recordset Set myrs = New ADODB.Recordset

mycn.Open \"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=kucun.mdb;\"

myrs.Open \"SELECT * FROM [用户] where userID='\" + denlu_name + \"';\adOpenKeyset, adLockOptimistic

If myrs.BOF = True And myrs.EOF = True Then MsgBox \"查无此人\登陆信息\" Else

If myrs(\"userPWD\") = denlu_pass Then

'''''''''''''''''''''''''''''''''''''''''' MsgBox \"身份正确\登陆信息\" main.Show Unload Me

''''''''''''''''''''''''''''''''''''''''''''''''''' Else

MsgBox \"密码不正确\登陆信息\" End If End If End Sub

货品入库登记模块的实现

5－3 入库登记窗口

Private Sub Form_Unload(Cancel As Integer) Screen.MousePointer = vbDefault End Sub

'为这个 recordset 显示当前记录位置 datPrimaryRS.Caption = \"Record: \" &

CStr(datPrimaryRS.Recordset.AbsolutePosition) End Sub

'下列动作发生时该事件被调用’ Dim bCancel As Boolean Select Case adReason Case adRsnAddNew Case adRsnClose Case adRsnDelete

Case adRsnFirstChange Case adRsnMove Case adRsnRequery Case adRsnResynch Case adRsnUndoAddNew Case adRsnUndoDelete Case adRsnUndoUpdate Case adRsnUpdate End Select

If bCancel Then adStatus = adStatusCancel End Sub

Private Sub cmdAdd_Click() On Error GoTo AddErr

datPrimaryRS.Recordset.AddNew Exit Sub

AddErr:

MsgBox Err.Description End Sub

Private Sub cmdDelete_Click() On Error GoTo DeleteErr

With datPrimaryRS.Recordset .Delete .MoveNext

If .EOF Then .MoveLast End With Exit Sub DeleteErr:

MsgBox Err.Description End Sub

Private Sub cmdRefresh_Click() '只有多用户应用程序需要’ On Error GoTo RefreshErr datPrimaryRS.Refresh Exit Sub RefreshErr:

MsgBox Err.Description End Sub

●出库登记模块的实现

5－4出库登记窗口

Private Sub Form_Unload(Cancel As Integer) Screen.MousePointer = vbDefault End Sub

'下列动作发生时该事件被调用 Dim bCancel As Boolean

Select Case adReason Case adRsnAddNew Case adRsnClose Case adRsnDelete

Case adRsnFirstChange Case adRsnMove Case adRsnRequery Case adRsnResynch Case adRsnUndoAddNew Case adRsnUndoDelete Case adRsnUndoUpdate Case adRsnUpdate End Select

If bCancel Then adStatus = adStatusCancel End Sub

Private Sub cmdAdd_Click() On Error GoTo AddErr

datPrimaryRS.Recordset.AddNew Exit Sub AddErr:

MsgBox Err.Description End Sub

Private Sub cmdDelete_Click() On Error GoTo DeleteErr

With datPrimaryRS.Recordset .Delete .MoveNext

If .EOF Then .MoveLast End With Exit Sub DeleteErr:

MsgBox Err.Description End Sub

Private Sub cmdRefresh_Click() '只有多用户应用程序需要 On Error GoTo RefreshErr datPrimaryRS.Refresh Exit Sub RefreshErr:

MsgBox Err.Description End Sub

Private Sub cmdUpdate_Click() On Error GoTo UpdateErr

datPrimaryRS.Recordset.UpdateBatch adAffectAll

Exit Sub UpdateErr:

MsgBox Err.Description End Sub

Private Sub cmdClose_Click() Unload Me End Sub

第六章 设计总结

由于以前对Visual Basic 6.0的接触并不是很多，对它的开发环境不是非常了解，所以在程序的开发过程中遇到了很多的困难，但经过同学和指导老师的帮助，一一化解了困难，并从中学到了很多编程方面的知识。但是由于经验方面的原因，以及对库存方面的操作流程了解不足，该系统还有许多不尽如人意的地方和功能上的缺陷，这些都有待于进一步改善。

在本次毕业设计中，我从指导老师陈小玉老师身上学到了很多东西，陈老师认真负责的工作态度，无论在理论上还是实践中，她都给予我很大的帮助，是我得到不少的提高，相信对我以后的工作和学习都会有很大的帮助，感谢她细心而耐心的辅导。

参考文献

[1] 汉清计算机工作室,《 Visual Basic 6.0 数据库开发实例 》,机械工业出版社 2000.3

[2] 何旭洪,《Visual Basic 数据库开发实例导航》,人民邮电出版社 2002 [3] 孙健鹏,《VB数据库开发实例解析》,机械工业出版社 [4] 王汉新,《Visual Basic程序设计》,科学出版社 2002

[5] 陈惟斌,《Visual Basic 6.0开发指南》,清华大学出版社 2001.1 [6] 张春葆,《VB数据库系统设计与开发》,清华大学出版社

[7] Buczek,《Access 2002数据库开发即时应用》,人民邮电出版社 2002

[8]潇湘工作室 《Access2002中文版从入门到精通》 人民邮电出版社 2001.10

Inventory management system Author:Pan Kunpeng

Guidance teachers：Chen Xiaoyu 【Abstract】

With the development of modern industry, the information management system of the computer is being paid attention to by enterprises. This text has analysed some basic functions of the administrative system of the stock and makes up the situation mainly, including the systematic demand is analysed, systematic structure, the function module divides and the data base mode is analysed etc., have realized doing the introduction to the actual development of the application program especially. Having reached the consistency and security of the data, and the application program function is complete, have accorded with the

administrative system of the stock as the request for the typical information management system (MIS). Introduced the function characteristics of Visual Basic

programming environment and Access data base management system briefly at the same time, the administrative system of the stock is an indispensable part in enterprise's material flow management.

【Keywords】 stock management, database, information management, VB