毕业设计VBaccess管理信息系统课程设计实验报告毕业论文

1、 . PAGE14 / NUMPAGES15课程设计实验报告 课 程 名 称信 息管 理系 统一摘要1二.系统分析2三.系统设计33.1 系统功能结构设计.3 3.2模块子系统设计.53.3 系统模块时序图6四.系统实施84.1系统的数据库设计84.2 关系模型94.3页面设计和代码设计.10五.系统评价14参考文献14一.摘要随着经济的发展，社会的进步，计算机越来越深入到我们日常的工作学习与生活中，成为我们日常生活中不可缺少的辅助工具。 随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。进销存管理系统是典型的信息管理

2、系统(MIS),其开发主要包括后台数据库的建立和维护以与前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。经过分析,决定使用 MICROSOFT公司的 VISUAL BASIC开发工具和ACCESS数据库,利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象,首先在短时间建立系统应用原型,然后,对初始原型系统进行需求迭代,不断修正和改进,直到形成用户满意的可行系统。二.系统分析 1用户登陆模块:拥有权限用户登陆.2. 商品管理: 添加商品信息,修改商品信息,删除商品信息3.进

3、货管理:添加进货管理,修改进货管理,删除进货管理4. 销售管理: 添加销售管理,修改销售管理,删除销售管理5. 退货管理: 添加报损管理,修改报损管理,删除报损管理6. 业务管理: 对销售商品进行管理三.系统设计3.1 系统功能结构设计:程序登陆主界面商品类型管理商品管理退货管理进货管理销售管理供货商管理销售分析帮助退出3.2模块子系统设计:进货管理自动制定进货计划自动入库登记查询打印计划进货与入库记录功能描述：进货管理子系统可以根据库存自动指定进货计划，进货时自动等级，以与提供查询和打印计划进货与入库记录的功能。销售管理商品销售控制查询打印销售情况生成销售排行榜功能描述：销售管理子系统可以控

4、制某商品是否允许销售，查询每种商品的销售情况并产生年、月、日报表，同时可以生成销售排行榜。查询库存明细记录库存状态库存管理盘点计算功能描述：库存管理子系统提供查询库存明细记录的基本功能，并根据库存的状态报警，以与自动盘点计算。人员管理基本信息登记管理员工操作权限管理提示客户销售权限管理提示功能描述：人员管理子系统提供基本信息登记管理，员工操作权限管理，客户销售权限管理的功能。3.3 系统模块时序图3.3.1用户登陆管理:3.3.2商品录入管理3.3.3商品销售管理3.3.4 商品结帐管理四.系统实施4.1系统的数据库设计.(数据库主要表格设计)4.1.1用户表4.1.2商品销售表4.1.3商品

5、库存表4.1.4商品明细表(注:部分表格有省略)4.2 关系模型a)用户表 （用户名称，用户密码，用户类型）b)会员表 （会员编号，会员卡号，累积消费金额，）c)销售表 （商品名称，销售数量，销售金额，销售日期）d)交易表 （，用户名称，交易金额，交易日期）e)入库表 （商品名称，入库数量，单额，入库日期）4.3页面设计和代码设计(主要部分)4.3.1登陆界面编程分析1.利用adodc（ADO Data Control)进行数据库：使用adodata控件访问数据库可以完全不用编写代码,只需要通过简单的设置和操作其属性就可以实现与数据库的连接,通过绑定数据感知控件,就能提供一个访问数据库的界面,

6、用来实现对数据库的浏览,贴加,删除,修改等操作.2.代码段Private Sub Command1_Click()Adodc1.Recordset.Find 用户名= & Text1.Text & If Adodc1.Recordset.EOF Then MsgBox 用户名不存在, , 提示ElseIf (Adodc1.Recordset.Fields(密码) Text2.Text) Then MsgBox 密码不正确, , 提示 Else Unload Me main.ShowEnd IfEnd Sub4.3.2 系统版面设计代码分析Private Sub 关于_Click(Index A

7、s Integer)gy.Show 1End SubPrivate Sub 库存查询_Click(Index As Integer)kccx.Show 1End SubPrivate Sub 库存退回_Click(Index As Integer)spth.Show 1End SubPrivate Sub 日查询_Click(Index As Integer)Dim db As DatabaseDim rs As Recordsetsl = 0; zj = 0; yl = 0Set db = OpenDatabase(App.Path & db1.mdb)Set rs = db.OpenRec

8、ordset(select * from 商品销售 where 销售日期 like & Date & ) If rs.EOF Or rs.BOF Then MsgBox (当日没商品售出) Else rcx.Show 1 End IfEnd SubPrivate Sub 入库明细查询_Click()rkmx.Show 1End SubPrivate Sub 商品入库_Click(Index As Integer)sprk.Show 1End SubPrivate Sub 商品售出_Click(Index As Integer)spcs.Show 1End SubPrivate Sub 商品退回

9、_Click(Index As Integer)spth.Show 1End SubPrivate Sub 售出商品退回_Click()scspth.Show 1End SubPrivate Sub 退出_Click(Index As Integer)Unload MeEnd SubPrivate Sub 销售情况查询_Click(Index As Integer)rcx.Show 1End SubPrivate Sub 赠送情况查询_Click()zscx.Show 1End Sub五.系统评价一.和传统管理模式相比较，使用本系统，毫无疑问会提高超市的运作效率，辅助提高超市的决策水平，管理水

10、平，为降低经营成本， 提高效益，减少差错，节省人力，减少顾客购物时间，增加客流量，提高顾客满意度，增强超市扩能力， 提供有效的技术保障。由于开发者能力有限，加上时间仓促，本系统难免会出现很多不足之处，例如：1.本系统只适合微型美容产品超市使用，不能适合型超市使用；2.超市管理系统涉与围宽，要解决的问题多，功能复杂，实现困难，但由于时间和本人能力有限制,系统只能做出其中的一部分功能；3.在编程上遇到不少问题,由于没有系统地去学习过VB.ACCESS.所以很多控件和语法不了解.导致系统存在很多漏洞,特别是连接数据库对数据库进行操作时.4.在设计系统中,重点就是要建模和各模块之间的联系.系统的开发,

11、分析,和信息的收集较为重要,其中还要运用到其他学科的知识.难点就是如何用程序语言实现我们想要的功能.参考文献1明 . 软件工程学教程 .科技，20022 萨师煊，王珊 . 数据库系统概论 . 第三版 . 高等教育，20003 飞思科技产品研发中心 . visual basic 6.0数据库应用开发 .电子工业，20034 飞思科技产品研发中心 . visual basic 6.0开发者手册 . 电子工业, 2002 5 申旻 . visual basic 6.0高手突破 . 清华大学，2002，3026 Steve Teixeira，Xaviver Pacheco著，龙劲松，王瑜，尚书译 . visual basic 6.0开发人员指南 . 机械工业