VB超市销售管理系统

1、南京*大学毕业设计(论文)说明书作者 * 学号 * 系部 计算机科学与技术系 专业 计算机与信息管理 题目 超市销售系统 指导教师 评阅教师 完成时间： 2010 年 05 月 20 日 毕业设计(论文)中文摘要题目：超市销售系统 摘要：随着信息技术的发展及管理信息系统（Management Information System ,简称MIS）的日益普及，计算机在企业管理中的作用越来越不容忽视。本课题就是针对超市的采购与销售两方面的管理，开发一个基于C/S构架的管理信息系统，我采用了 VB做开发工具，后台采用ACCESS数据库。其中系统涉及系统管理、基础数据、单据录入三大模块。本系统能够完成商

2、品管理、进货管理、供应商管理、用户管理等功能，使用本组开发出来的超市管理系统，简单易懂，解决了中小型超市中进销货以及购买、库存等众多繁琐问题，以及从而导致的耗费人员过多，超市经营紊乱等众多问题。在系统开发的过程中，我主要负责登陆界面设计、所有界面美化及总体规划。关键词：MIS C/S VB ACESS 销售毕业设计(论文)外文摘要Title: the sale system for supermarket Abstract: with the development of information technology, the Management Information System (MI

3、S) becomes more popular, the computer is important in the business management.The topic is to be aimed at two aspects, one is purchase, and the other is sale. To design an MIS this is on the base of C/S (Client/Server), in the process of designing. The system, we use Visual Basic as a tool, the back

4、stage uses Access database .About the system, there are three modules: the management of the system, the foundation data and the documentary evidence inputs.The system can achieve some functions. Such as the management of the goods, the management of the stock, the management of users and so on .Use

5、 the system, youll operate it quickly. It can settle many kinds of problems. For example, it can settle the problems of sale, sale, stock and the waste of people resource .In the process of the subject, Im responsible for the designing of login, and beautify all the interfaces.Keywords: MIS C/S VB A

6、CCESS sale目 录目 录i1 前言12 超市销售系统的功能13 可行性分析13.1 技术可行性13.2 经济可行性23.3 操作可行性24 登陆界面的设计24.1 流程图34.2 数据库连接34.3 界面设计45 ACCESS数据库设计65.1 Dealing表65.2 Factory表65.3 Merchinfo表75.4 Provide表75.5 Sale表75.6 User表75.7 Stock表76 超市销售系统各个功能模块简介87 业务流程118 软件的测试与运行118.1 软件测试118.2 测试小结12结 论12致 谢14参考文献14附 录 A151 前言超市已经成为人们

7、日常生活中不可或缺的一部分，越来越多的人选择超市购物成为不可逆转的趋势。所以，随着这种趋势的前进，超市的管理变的越来越复杂，这时候，就要借助计算机软件来解决超市日常营业中产生的矛盾，例如库存的不足，普通员工查询超市的商品信息以及新的商品的上市宣传等，总之，利用超市管理信息系统可以节省大量的人力、物力，为超市节省了开支，一定程度上增加了超市的收入，这是每一个营业性的企业都想达到的目标，针对这种情况，各种各样的适合超市管理的软件系统出现了， 我们在对市场作过调研以后，开发了本系统，适用于中小型的超市，模拟实践证明，本系统可以达到预期的目的。为超市的高层管理者提供了准备的第一手资料。2 超市销售系统

8、的功能本系统可以做到对于超市商品销售的情况做出及时准确的统计，可以快速查找到某种商品处于何种状态，是滞销还是库存不足，并针对商品所处的状态，超市的高层管理人员及时的做出正确的决策，获得最大的赢利。在进货管理的模块中，可以清楚的看到每种商品进货的时间，数量等情况，根据进货的情况。可以估计出本商品是赢利还是亏损，在供应商的模块中，管理人员可以看到供应商的信息，例如商品的调价等情况，以便于及时的对本超市的某种商品的价格做出调整，超市内的员工可以申请自己的账号登陆系统，查看关于超市商品和自己工资的信息，本系统运行起来很简单，具有典型的WINDOWS操作界面，一目了然，不用经过特定的培训等，为公司节省了

9、开支，达到设计本系统的最终目的，即为超市创造最大的利润。3 可行性分析可行性研究可行性研究的目的使用最小的代价在尽可能短的时间内确定问题是否能够解决，确定这个软件是否值得去开发。以下从技术可行性，经济可行性，操作可行性来分析。3.1 技术可行性此数据库系统属于一般的小型数据库管理系统，并没有特殊的技术要求。本系统采用ACCESS数据库，虽然没有SQL数据库的功能强大，但是操作起来非常简单，在系统设计过程中由于数据库设计不当引发的问题比较好解决，很容易查找到是哪一部分出现了问题。3.2 经济可行性从经济上分析，完成此系统所需要的开发成本是十分少的，一旦软件设计完成，就能给超市的销售和统计管理带来

10、非常大的便利，其经济效益远远大于开发成本，因此，经济方面也是可行的。3.3 操作可行性本系统的界面是典型的Windows应用程序的界面，简单明了。只要熟悉Windows，即使是初次使用也很容易上手，因此，操作方面也是可行的。4 登陆界面的设计在系统的设计过程中，我负责登陆界面的设计。这个模块在整个系统中起着至关重要的作用。选择什么样的权限进入系统就会对系统进行不同的操作，系统管理员一般设一个，他对系统可以进行任意的操作。在核对用户名和密码信息时，系统会弹出不同的提示页面，例如当密码和用户名不一致时，会提示错误，而两者相一致时，则可以正常登陆到系统里。下面，详细介绍一下登陆界面的设计。4.1 流

11、程图用户登录验证用户称是否存在验证密码是否正确登录系统登录是否超过三次退出系统提示：用户名不存在提示：密码错误提示：登录超过限制次数存在不存在正确错误是否图 1 流程图4.2 数据库连接连接数据库，这里选择ADO，下面简单介绍一下这种技术。ADO是ActiveX Data Object 的缩写，是Microsoft数据库应用程序开发的新接口，是Microsoft新的访问技术，是建立在OLE DB之上的高层数据库访问技术。使用ADO操作数据库的一般过程为：打开数据库。首先需要创建数据库连接对象(Connection),按后调用该对象的open方法即可打开数据库。操作数据库对象，在数据库打开之后，

12、通过command 对象执行SQL命令，或者创建记录集（Recordset）对象，使用该对象的各种方法就可以进行数据库数据的查询、定位、以及增加或修改。关闭数据库。使用上面创建的数据库连接对象的close方法就可以完成数据库关闭的操作。本系统也是采用这种方法，从创建好的数据库里取出数据，进行登陆系统。4.3 界面设计在MySupmaket.exe工程中创建一个窗体为login.frm，在窗体中添加两和标签控件，其caption属性为用户名和密码，添加一个下拉列表框控件，用于选择所要登陆的用户名。添加一个文本框，用于输入密码，添加两个命令按钮，其caption属性为确定和取消，由于本系统中使用的

13、控件较多，为了辨别起见，将其名称相应改为:cboUser, txtPW,cmdOK_click,cmdQUIT_click.另外，窗体的背景选择也很重要，要符合设计的风格。 最后，来看一下登陆模块在系统中的效果图，如图2所示。 图 2 登陆界面输入正确的密码和用户名后，可以成功登陆系统，进入菜单的主页面，系统由文件，视图，帮助三个菜单项组成，如图3所示。图 3 主页面 如果用户名不存在，不能自动登陆到系统，出现以下提示：如图4所示。图 4 出错对话框如果密码不正确，出现以下提示：如图5所示。图 5 出错对话框出现这样的提示后，登陆者就要核对一下自己的用户名和密码是否正确。然后重新登陆。在用户管

14、理中可以添加用户：用户信息包括用户名，密码两个字段。权限选择有管理员和普通用户。若选择用户的权限为管理员，则可以对本系统进行一切操作，包括查询信息，添加供应商信息，删除某商品的信息等。若选择权限为普通用户，则只能查看商品的信息，不能进行添加，删除等操作，包括对用户的管理也一样，只能以管理员的权限进入系统中时，才能添加用户，或者更改某用户的信息，删除某一个用户等。在以普通用户的权限进入本系统的时候，若要添加、更改、删除用户或商品信息时，会出现下面的提示：如图6所示。图 6 提示界面登陆代码见附录A。5 ACCESS数据库设计数据库采用ACCESS,简单易懂，主要的表及字段如下所示：5.1 Dea

15、ling表：域段名称描述类型是否强制缺省值是否可见是否indexDealingIDIdInt主键不可见建立索引DealingDate日期dateDealingPrice价格FloatUserName名称stringMemberCard编码string5.2 Factory表：域段名称描述类型是否强制缺省值是否可见是否indexFactoryIDIdInt主键不可见建立索引FactoryName名称stringFactoryAddress地址stringFactoryPhone电话string5.3 Merchinfo表：域段名称描述类型是否强制unset value是否可见是否indexMer

16、chIDIdInt主键不可见建立索引MerchName名称stringMerchPrice价格FloatMerchNum数量IntBarCode条形码string5.4 Provide表：域段名称描述类型是否强制unset value是否可见是否indexProvideIDIdInt主键不可见建立索引ProvideName名称stringProvideAddress地址stringProvidePhone电话stringBarCode条形码string5.5 Sale表：域段名称描述类型是否强制unset value是否可见是否indexSaleIDIdInt主键不可见建立索引MerchID外

17、键idInt是建立外键SaleDate日期DateSalenum数量IntSalePrice价格Float5.6 User表：域段名称描述类型是否强制unset value是否可见是否indexUserIDIdInt主键不可见建立索引UserName用户名称stringUserPW用户密码stringUserStyle用户类型int5.7 Stock表：域段名称描述类型是否强制unset value是否可见是否indexStockIDIdInt主键不可见建立索引MerchNum数量IntMerchPrice价格FloatPlanDate计划日期DateStockDate存货日期date6 超市

18、销售系统各个功能模块的美化此外，我还负责整体界面的美化工作。在系统其他模块都创建好的情况下，开始进行各模块的联接，最终生成可执行的文件。单个模块在独自运行时界面是否美观不容易看出来，运行整个系统的时候，哪个模块的界面设计的不协调（包括背景图片和颜色的选择上，控件摆放的整齐度，控件大小的设置等）就很容易的看出来，本着系统的界面要做到简洁大方、赏心悦目的原则，在背景的选择和版面的布置上面，我都做了慎重的考虑，和其他的同学商量，不断的修改和完善，最终达到了下面的效果。下面就是各个界面的效果图。商品管理的界面如图7所示。 图 7 商品管理界面进货管理的界面如图8 所示。图 8 进货管理供货商管理的界面

19、如图9所示。 图 9 供应商界面用户管理管理的界面如图10所示。图 10 用户管理界面帮助菜单里则是关于本系统的一些简单介绍和作者的信息。如图11所示。图 11 提示界面7 业务流程业务流程图是分析业务功能流程的重要工具。它是一种描述系统内各单位、人员之间业务关系、作业顺序和管理信息流向的图表。管理人员商品管理进货管理供应商管理用户管理添加商品删除商品修改商品新的商品列表添加供应商删除供应商供应商列表添加用户修改用户删除用户新的用户查看信息图 12 业务流程图8 软件的测试与运行8.1 软件测试这个阶段是用来测试程序，找出系统Bug并修改错误的过程。虽然在每个模块开发的过程中都进行过阶段性的测

20、试，但是现场整体测试更接近将来系统投入使用的情况。在系统能够正常运行的情况下，打开商品管理模块，点击添加按钮，根据提示的信息，添加一件商品，例如条形码为，名称为上好佳奶糖。最后保存即可。在商品查询的模块中，输入商品的条形码，点击查询商品的信息，便可以看到商品的具体信息，包括名称、价格、状态等。数据库中商品表中随之也增加了一条记录，修改，删除的测试和其一样。在用户管理模块的测试中，要注意用户权限的问题，如果增加用户权限为管理员，则可以对系统进行所有的操作，如果权限选择普通用户，则有些功能是不可以实现的。经过反复的测试，确保系统的正确运行。减少后期使用过程中出现的问题。8.2 测试小结在测试过程中

21、，确实可以发现了自己的一些错误。一部分因为开发环境与实际使用环境不同产生的，比如说图片的效果不对，或者控件的位置出现偏移等等；还有数据库的连接问题，在不同的计算机上因为计算机名的不同导致无法连接数据库，这些问题通过现场的调试基本得到了解决。另一部分错误却出乎意料，比如说有些控件数组的初始化问题。因为要知道很多情况下程序的错误是连锁性的，一个语句错误，其后相关语句也跟着出错，所以找出错误源是很重要，在程序中设置断点或在调试模式下执行程序，可以快速发现和纠正错误，把无法初始化的控件元素单独初始化后，问题可以得到解决。经过测试的过程，认识到自己在程序的编写和思路方面都存在一定的问题，相信经过不断的学

22、习和经验积累，可以实现较大的改观。结 论 通过本系统的开发，我对软件开发过程有了更清晰的了解，首先是问题定义、需求分析，然后是功能设计、详细设计等，并对软件测试的方法、手段有了较深的理解，同时对制造业的流程有了一个系统的认识。在开发过程还认真学习了与系统相关的知识，极大地拓宽了我的知识面,我感到收获不小。在系统的开发初期，必须要熟悉企业的管理流程，初步了解管理信息系统的相关知识，这样才能进入到设计的过程中去。从开始熟悉这些知识到对整体设计有了解，再从概要设计、详细设计到开始编码，以及最后的测试，整个过程感觉很充实，虽然遇到了不少困难，但当我通过自己查资料、或是向指导老师请教以及向同学请教，最后

23、都可以得到及时的解决。 经过这几个月的毕业设计实习，确实学到了不少的东西，同时也深感自己知识的欠缺。虽然即将毕业，但在以后的学习工作中，一定要继续坚持不断地学习新的专业知识及相关的非专业知识，只有这样才能紧跟时代的潮流。致 谢感谢周老师在系统的开发过程中以及论文的修改过程中给予的帮助和建议，指导老师每一次帮我修改论文都很仔细，一目了然，这让我节省了不少的时间，在系统的开发过程中，给了不少好的建议，这样才使得系统和论文能够及时的开发完成，另外，同组的同学同样给了我不少帮助，这里一同表示感谢。参考文献1 龚沛曾, 陆慰民,杨志强.Visual Basic 程序设计简明教程.第2版.北京:高等教育出

24、版社, 2003 2 张宏林,孔艳,王哲. Visual Basic 6.0开发数据库. 北京：人民邮电出版社, 2000 3 Evangelos Petroutsos,Kevin Hough.Visual Basic 6.0高级开发指南.北京：电子工业出版社出版, 1999 4 李畅,王学卿,郑广成,朱翠苗,徐颖峻. Visual Basic 程序设计.北京：中国铁道出版社, 2005 5 常晋义，绉永林，周蓓.管理信息系统. 第2版.北京: 中国电力出版社, 2005 6 尚俊杰. 网络程序设计ASP. 第2版. 北京： 清华大学出版社, 2005 7 张云鹏.V B 6.0程序设计 英文

25、改编版. 北京： 电子工业出版社, 2006 8 仲维俊. V B 6.0 完全自学手册. 北京： 机械工业出版社, 20079 林卓然. V B 6.0 程序设计教程. 北京:电子工业出版社, 2006 10 曹青, 邱李华, 郭志强. V B 6.0程序设计教程. 北京： 机械工业出版社, 2006附 录 A登陆代码：Private Sub cmdOK_Click() If cboUser.Text = Then MsgBox 请填写用户名。, vbInformation cboUser.SetFocus cboUser.SetF Exit Sub End If If txtPW.Text

26、 = Then MsgBox 请填写密码。, vbInformation txtPW.SetFocus Exit Sub End IfOn Error GoTo aaaa ConnectSysMDB cnMain, App.Path & data.mdb Dim rs As New ADODB.Recordset, strMD5 As String strMD5 = GetMD5(txtPW.Text) rs.Open Select * From User2;, cnMain, 1, 1 If rs.EOF Then MsgBox 找不到任何用户！, vbCritical cnMain.Clo

27、se Else Do Until rs.EOF If StrComp(rs(UserName), cboUser.Text, 1) = 0 And StrComp(rs(UserPW), strMD5, 1) = 0 Then If rs(UserStyle) = 1 Then UserStyleFlags = 1 Else UserStyleFlags = 0 End If curUserName = rs(UserName) curUserStyle = CLng(rs(UserStyle) cboUser.AddItem curUserName, 0 SaveUserList frmMa

28、in.Icon = Me.Icon Unload Me frmMain.Show Exit Sub End If rs.MoveNext Loop End If MsgBox 用户名或密码错误，登陆失败！, vbCritical cnMain.CloseExit Subaaaa: MsgBox Err.Description, vbCritical If cnMain.State = 1 Then cnMain.CloseEnd SubPrivate Sub Form_Activate()On Error Resume Next cboUser.SetFocus cboUser.SetFEnd

29、 SubPrivate Sub Form_Load() ConnectSysMDB cnMain, App.Path & data.mdb If cnMain.State 0 Then cnMain.Close LoadUserList If cboUser.ListCount 0 Then cboUser.ListIndex = 0End SubPublic Sub LoadUserList()On Error GoTo aaaa Dim strTmp As String, j As Long Open GetApp & Filesuser.inf For Input As #1 cboUs

30、er.Clear Do Until EOF(1) Line Input #1, strTmp strTmp = Trim(strTmp) If strTmp Then cboUser.AddItem strTmp j = j + 1 If j = 10 Then Close #1: Exit Sub End If Loop Close #1aaaa:End SubPublic Sub SaveUserList()On Error GoTo aaaa Dim strTmp As String, i As Long, j As Long If cboUser.ListCount = 10 Then Exit For Next Open GetApp & Filesuser.inf For Output As #1 Print #1, strTmp Close #1aaaa:End SubtgKQcWA3PtGZ7R4I30kA1DkaGhn3XtKknBY