超市进销售管理系统.doc

西安财经学院实践教学活动周登记表姓 名： 信彦君 学 号： 0905170106 专 业： 计算机科学与技术 院 系： 信息学院 本校指导教师： 实践单位指导教师： 西安财经学院教务处 制实践教学开展时间2012年 7 月 9 日 2012 年 7 月 20 日 实践形式（在选项后打）集中分散 实践单位实践地点本校指导教师许文丽职称讲师二级学院、系信息学计算机科学与技术实习单位指导教师职称职务所在单位实践内容及收获本次实践我与同组成员共同设计了超市进销存管理系统，本系统采用VB.6.0平台和大型数据库Access进行开发，主要是处理商业企业商品的采购、库存和销售各个环节的活动，使用ADO.NET访问数据库。我查阅了软件工程、系统设计方面的书籍，了解了系统建设的基本流程、总体布局设计以及系统开发前所需的一些准备工作，特别是系统需求分析的重要性。这次设计中虽然中间碰到了许多困难，许多功能还不够完善，但我从中学到了许多以前书本上所不能学到的也不曾碰到过的问题，通过不断的阅读相关书籍，开发水平有了明显提高，对系统的设计有了新的认识。通过这次设计，我已基本上掌握了系统的设计流程，同时也掌握了一些相关技术，增强了动手能力，并积累了使用软件工程的思想来开发软件的经验，这对于我今后的工作和学习是非常有益的。实践单位意见单位盖章：年 月 日成绩评定（综合评语） 成绩： 指导教师签字： 、 年 月 日系意见签字（盖章）： 年 月 日二级学院意见签字（盖章）： 年 月 日本科生实践教学活动周实践教学成果成果形式： 实践报告+系统 成果名称： 进销存管理系统的设计与实现 学生姓名： 信彦君 学 号： 0905170106 专 业： 计算机科学与技术 班 级： 0901班 指导教师： 许文丽 完成时间： 2012 年 7 月 22 日计算机专业本科实践教学 进销存管理系统的应用与实现目 录一、绪论2（一）研究背景2（二）进销存系统的现状2（三）进销存系统的研究意义2二、进销存管理系统的分析4（一）需求分析4（二）可行性分析4（三）开发平台与工具的选择41.Visual Basic简介52. Access简介53. AOD.NET简介5三 进销存管理系统的实现与测试7（一）系统设计目标7（二）系统功能模块划分7（三）系统结构图8四、详细设计9（一）开发及运行环境9（二）文件夹组织结构9（三）数据库设计91.创建数据库92.数据表设计10（四）程序开发121.程序运行结果122.创建工程123.创建系统主窗体124.创建数据访问模块135.实现系统各功能模块14五、设计总结22参 考 文 献2323计算机专业本科实践教学 进销存管理系统的应用与实现一、绪论（一）研究背景随着国家的政治经济政策的优化改革，使得国内中小企业得以蓬勃发展。可是随着企业的发展，客户数量的的为断增多，财务工作繁杂化，库存产品零乱等一系列问题也接踵而至，给企业经营者运作带来了很大的困扰。信息技术的迅猛发展，科学经营管理观念的迅速传播，使中小企业经营者逐渐认识到转变企业经营管理理念，改善企业经营管理模式是企业适应时代的发展急需解决的问题。现代管理，应该建立在真实、有效的数据信息基础之上，应该是一种科学的、理性的管理体制，而这种管理与经营的联系与互助，又必须依赖于计算机的强大的数据统计功能，计算机管理系统便是实际的企业进销问题与计算机强大数据统计功能相结合的产物。管理系统解决的了商业企业商品的进、销、存、退、换、盘、损、残、调、借、赠等一系列操作流程中的数据信息的处理问题，提供一系列的数据分析，帮助经营者合理的调整各个经营运作环节的运作节奏，并对商品流转过程进行了全程跟踪管理、相应款项流通的全程记录管理和票据信息统计的管理。因此进销存管理系统的全面应用，规范业务流程、提高了企业的管理水平，提高资金流动的透明度，加快商品资金周转速度，进而全面提高了企业的经营水平、进而全面提升了企业的经济效益。（二） 进销存系统的现状当今，企业管理在很多方面、很大程度上都必须借助信息化的工具来完成，采用电脑管理进货、库存和销售等诸多环节也已成为必然趋势。在现代企业的物流管理中，一个良好的进销存管理系统不仅能大大降低企业由于生产经营管理不善而产生的过多的成本，提高企业的办事效率，降低企业在物流管理中不必要的人力物流财力损失，而且能使企业的运行机制更加规范合理，使企业在节省自身成本提高竞争优势的同时，树立好企业形象，形成带头优势，从而带动整个行业的高效发展及社会经济效率的整体素质的提高。（三）进销存系统的研究意义企业经营如逆水行舟不进则退。每一个努力发展的企业都明白，先进管理的重要作用，引进先进管理系统使企业经营变得规范、合理。进销存管理系统无论是在功能设计还是业务流程上都尽可能做到满足经营管理运作流程的需求，并且操作方便、功能强大，即使操作者对计算机知识一窍不通也能一用就会。它强化库存管理，规范业务流程，提高资金管理的透明度，加快商品资金周转，是企业经营管理中数据分析中必不可少的管理工具。本系统的开发适用于多个行业，可以帮助企业快速有效管理进货、销售、库存等各项业务，合理控制进销存各个环节，提高资金利用率，实现管理高效率和实时性。二、进销存管理系统的分析进销存管理是企业日常经营管理中十分重要的一个组成部分，传统的手工管理方式呈现出越来越多的弊端。在手工管理模式下，统计，汇总处理时的工作量极其繁重，处理效率非常低，领导也无法及时了解企业资金占用的实际状况。通过报表管理，企业可以直观分析企业的进销存情况，提高企业的竞争能力。 （一）需求分析该系统的设计应具备以下功能：1.系统具有良好的人机界面，易学好懂、简捷实用。2.规范、完善的基础信息设置，提供快速、准确的处理进、销、存、盘点等业务模式，能够实现商品入库、入库、商品销售、销售退货、库存管理（调货、盘点）报损管理，供货商管理，销售分析等操作。3.操作简单易行，查询灵活方便，支持多条件查询，数据存储安全可靠。4.支持多人操作，要求有权限分配功能。在相应的权限下，删除数据方便简单、数据稳定性强。5.系统维护方便可靠，有较高的安全性，满足实用性、先进性的要求。（二）可行性分析随着经济的全球化以及中国经济改革的逐渐深化，中小企业面临着越来越激烈的竞争，改善企业内部以及整个供应链各个环节的管理、调度及资源配置，迅速适应客户的新需求和市场新机遇的能力，是企业赢得竞争胜利的决定性因素，进销存管理系统的开发是提高企业竞争力的最有效的方法之一。进销存管理系统的开发实现了从进货、库存、到销售的一体化管理。提高了管理水平和工作效率，最大限度减少了手工操作带来的错误。（三）开发平台与工具的选择本系统后台数据库采用Microsoft Office Access，该数据库系统在安全性、准确性、运行速度方面有绝对的优势，并且处理数据量大、效率高；以VB作为开发语言，采用Visual Basic 6.0中文版作为开发工具，采用ADO.NET对数据库进行访问，同时建立ODBC数据库接口,可与Access数据库无缝连接。1.Visual Basic简介微软公司的Visual Basic是一套完整Windows系统软件开发工具，用于开发Windows环境下的各类应用程序，是一种可视化、真正面向对象、采用事件驱动方式的结构化高级程序设计语言和工具的完美集成。它编程简单、方便、功能强大，具有与其它语言的良好接口。Visual Basic在数据库开发方面比其他语言也有优势，特别是6.0版本较以前的有相当大的变化，从数据源维护、数据访问等都有良好的表现，配合后台服务器更能显示界面的独到之处。2. Access简介Microsoft Access是一种关系式数据库，关系式数据库由一系列表组成，表又由一系列行和列组成，每一行是一个记录，每一列是一个字段，每个字段有一个字段名，字段名在一个表中不能重复。Access数据库以文件形式保存，文件的扩展名是MDB。Access 数据库由七种对象组成，它们是表、查询、窗体、报表、宏、页和模块。表(Table) 表是数据库的基本对象，是创建其他5种对象的基础。表由记录组成，记录由字段组成，表用来存贮数据库的数据，故又称数据表。查询(Query)查询可以按索引快速查找到需要的记录，按要求筛选记录并能连接若干个表的字段组成新表。窗体(Form)窗体提供了一种方便的浏览、输入及更改数据的窗口。还可以创建子窗体显示相关联的表的内容。窗体也称表单。报表(Report)报表的功能是将数据库中的数据分类汇总，然后打印出来，以便分析。宏(Macro)宏相当于DOS中的批处理，用来自动执行一系列操作。Access列出了一些常用的操作供用户选择，使用起来十分方便。模块(Module)模块的功能与宏类似，但它定义的操作比宏更精细和复杂，用户可以根据自己的需要编写程序。模块使用Visual Basic编程。页是一种特殊的直接连接到数据库中数据的一种WEB页。通过数据访问页将数据发布到Internet 或Intranet上，并可以适用浏览器进行数据的维护和操作。3. AOD.NET简介ADO.NET是.NET Framework的重要组成部分，ADO.NET中包含用于连接至数据源、提交查询以及处理结果的类，利用ADO.NET中最主要的非连接对象DataSet(数据集)能以脱机方式处理数据，可以对数据进行排序、搜索、筛选等操作。使用ADO.NET可以对多种数据源中的数据进行有效处理，从而轻松地在.NET Framework中创建出分布式、数据共享的应用程序。下面简单介绍下.NET Framework数据访问对象.NET的数据访问对象主要包括四个对象：Connection、Command、DataReader和DataAdapter。针对不同的数据源提供了不同的对象与之对应。Connection对象提供与数据源的连接；Command对象用于执行SQL命令，主要包括检索数据、修改数据以及运行存储过程等命令语句；DataReader对象从数据源中提供一个只读的、前向的高性能数据流；DataAdapter对象在DataSet对象和数据源之间，起到了桥梁的作用，可以用来填充数据集，并可将修改结果更新回数据库。三 进销存管理系统的实现与测试（一）系统设计目标该系统的制作目标如下：1.具有完善、美观的网站界面，以便用户可以高效的使用。2.操作简单方便，系统信息齐全并分类清晰明确。3.数据信息完善，存储安全、可靠。4.提供灵活、方便的权限设置功能，使整个系统的管理分工明确。5.强大的查询功能，为管理员保证数据查询的灵活性。6.网站维护有较强的可靠性与安全性，并满足实用性、先进性的要求。（二）系统功能模块划分该进销存管理系统主要由商品类型管理、商品管理、销售管理、库存管理、报损管理、供货商管理、系统管理等模块以及树形列表组成，具体划分如下：商品类型管理模块：用来添加超市所增加的商品类型，以便于更好的管理，其由添加，修改，删除三个选项构成，每一选项中有类型名和说明构成。修改商品类型的时候需在树形列表中选择所需修改的商品类型，删除时则会弹出对话框。商品管理模块：用来记录商品的具体信息，在这一模块中同样有增删改三个选项，在增删改操作时，都需要在树形列表中选择商品类型，在添加单中有商品名，商品类型，库存量，商品介绍以及备注各选项销售管理模块：用于记录超市的销售情况，以便于更好的使超市运转。这一模块中同样有增删改三个选项来及时的更新数据存储。库存管理模块：用于管理超市的库存信息。“库存查询”用于查询超市商品的库存情况。报损管理模块：该模块就是用于及时的更新记录超市的商品存储情况对商品的影响。同样具有增删改三个选项。系统管理模块：该模块最重要的就是操作员的权限管理，即用户管理，在用户管理中可以增删改操作员的权限信息。树形列表：该列表可以使商品的基本情况一目了然，在列表中列出了超市所有的商品类型，而其所在类型下的商品则会显示在右边的视图中，便于统计商品。（三）系统结构图登陆界面主界面商 品 类 型 管 理商 品 管 理进 货 管 理销 售 管 理报 损 管 理供 货 商 管 理销 售 分 析帮 助系 统 图2-1系统功能结构图四、详细设计（一）开发及运行环境系统开发平台：Microsoft Visual Basic 6.0系统开发语言：VB数据库管理系统软件：Microsoft Office Access 2003（二）文件夹组织结构在进行系统开发之前，需要规划文件夹组织结构，也就是说，建立多个文件夹，对各个功能模块进行划分，实现统一管理。这样做的好处在于：易于开发、管理和维护。本系统的文件夹组织结构如图4-1所示。图4-1文件夹组织结构图（三）数据库设计1.创建数据库创建数据库打开Access企业管理器，新建一个数据库，将其命名为超市进销存系统。然后点击使用设计器创建表来建自己所需的数据表。如表4-1。表4-1数据表用途表数据表名称数据表用途用户表保存系统使用者的信息商品类型表保存系统所存储的所有商品类型商品表保存超市经营商品的资料信息供货商表保存超市供货商的资料信息进货表保存超市所购入商品的资料信息销售表保存超市销售商品的资料信息报损表保存超市商品报损的资料信息2.数据表设计 用户表： 图4-2数据库用户表设计商品表： 图4-3数据库商品表设计商品类型表： 图4-4数据库商品类型表设计报损表： 图4-5数据库报损表设计销售表： 图4-6数据库销售表设计进货表：图4-7数据库进货表设计供货商表： 图4-8数据库供货商表设计（四）程序开发采用多文档窗体程序，每一功能对应一个子窗体。1.程序运行结果如图：图4-9程序运行结果截图选择主菜单中的各菜单项即可进入相应的功能，例如可以选择【进货管理】|【登记进货信息】菜单命令，在其中输入进货的商品、数量、价格等信息，保存后单击【确定】按钮，商品库存就会增加。2.创建工程启动Microsoft Visual Basic 6.0,在主菜单中选择【文件】|【新建工程】命令，选择【标准EXE】建立新的工程，后在属性的【名称】中更名为超市进销存管理系统。3.创建系统主窗体(1)用系统默认生成的主窗体作为主窗体，并将其对应的文件更名为frmMain.frm,布局如图：图4-10程序主窗体截图(2)在VB6.0的【工具】下拉菜单中，选择【菜单编辑器】，开始编辑表结构的菜单。4.创建数据访问模块各个窗体均需要对数据库进行访问，故而建立了一个DB模块，这样可以使对数据库的访问更加快捷简单，主要代码如下Option ExplicitPublic g_Conn As Connection Public g_DBPath As StringPublic Sub DBMain() g_DBPath = App.Path & DB超市进销存管理系统.mdb If ConnectToDatabase(DBAccess) = False Then Err.Raise vbObjectError + 1, , 连接数据库出错！ End IfEnd SubPublic Function NextID(ByVal strTable As String, ByVal strId As String) As Long Dim rs As Recordset Set rs = g_Conn.Execute(SELECT MAX( & strId & ) FROM & strTable) If IsNull(rs(0) Then NextID = 1 Else NextID = rs(0).Value + 1 End IfEnd Function5.实现系统各功能模块实现商品信息登记模块：利用可视化的方法建立数据库的连接及对数据库进行操作以实现商品商品信息登记功能。（1）新建窗体，将其【名称】改为“frmMerch”并在窗体上分别添加一个Frame控件，五个Label控件，四个TextBox控件，两个Button控件，两个ComboBox控件。布局如图所示：图4-13商品信息模块窗体截图（2）各控件的属性设置如表所示：表4-4各控件属性表控件类型对象名属性取值（说明）FramefraMerchCaption商品信息LabelLabel1Caption商品名LabelLabel2Caption商品介绍LabelLabel3Caption备注LabelLabel4Caption商品类型LabelLabel5Caption库存量CommandButtonOKButtonCaption确定CommandButtonCancelButtonCaption取消TextBoxtxtNameTextTextBoxtxtStorageTextTextBoxtxtIntroTextTextBoxtxtRemarkTextComboBoxcboTypeTextComboBoxcboUnitText （3）frmMerch窗体主要代码如下：Option ExplicitPrivate OK As Boolean 确定用户按了OK还是CANCEL按钮Private m_obj As clsMerch 数据对象，用来存储用户输入数据Public m_ViewType As gxcViewType 显示状态，指添加还是修改Private m_TypeId As Long 商品类型根据是“新增”还是修改，确定显示内容Private Sub SetStatus() 设置控件默认值 Call SetDefaultValue 设置状态 Select Case m_ViewType Case vtadd 添加 CancelButton.Visible = True OKButton.Caption = 确定 Case vtModify 修改 CancelButton.Visible = True OKButton.Caption = 保存 End SelectEnd Sub打开对话框，并传出用户输入数据Public Function ShowDlg(ByRef obj As Object, _ ByVal eViewType As gxcViewType, _ Optional nTypeId As Long = -1) As Boolean 保存数据 Set m_obj = obj 用户输入数据存放于此对象中 m_ViewType = eViewType 对话框状态 If nTypeId = -1 And (Not m_obj Is Nothing) Then m_TypeId = m_obj.TypeId Else m_TypeId = nTypeId End If 根据新增、编辑或查看设置显示内容SetStatus 显示对话框 OK = False Me.Show vbModal If OK = False Then ShowDlg = False Exit Function End If 保存数据 Set obj = m_obj 返回并释放对话框 ShowDlg = True Unload MeEnd Function设置控件默认值Private Sub SetDefaultValue() Dim ctl As Control Dim i As Integer 如果是新增，则清空所有文本框 此处判断 m_obj为空与判断m_ViewType = vtAdd等效，但更安全 If m_obj Is Nothing Then For Each ctl In Controls If TypeOf ctl Is TextBox Then ctl.Text = End If Next Else 用传入对象的值更新数据 With m_obj txtName.Text = .MerchName txtStorage.Text = .Storage cboUnit.ListIndex = 0 txtIntro.Text = .Introduce txtRemark.Text = .Remark For i = 0 To cboType.ListCount - 1 If cboType.ItemData(i) = m_TypeId Then cboType.ListIndex = i 商品类型Id Exit For End If Next i End With End If End Sub检查输入有效性Private Function CheckValid() As Boolean If txtName.Text = _ Or txtIntro.Text = Then MsgBox 请填写完毕以上各项内容 CheckValid = False Exit Function End If If cboType.Text = Then MsgBox 请填写完毕以上各项内容 CheckValid = False Exit Function End If If Not IsNumeric(txtStorage.Text) Then MsgBox 库存量请输入数字 Exit Function End If CheckValid = True End Function保存数据Private Sub SaveValue() 给“成员变量”对象赋值 With m_obj 注意以下利用RealString函数替换去除输入中的单引号 .MerchName = RealString(txtName.Text) .Remark = RealString(txtRemark.Text) .Storage = RealString(txtStorage.Text) .Introduce = RealString(txtIntro.Text) .TypeId = cboType.ItemData(cboType.ListIndex) 商品类型Id .TypeName = cboType.Text End WithEnd Sub取消按钮Private Sub CancelButton_Click() Unload MeEnd SubPrivate Sub Form_Load() Dim opMType As New clsOpMType opMType.FillCombo cboTypeEnd SubPrivate Sub fraMerch_DragDrop(Source As Control, X As Single, Y As Single)End Sub确定按钮Private Sub OKButton_Click() OK = True 检测输入有效性 If Not CheckValid Then Exit Sub 如果是新增状态，则初始化一个数据对象 If m_ViewType = vtadd Then Set m_obj = New clsMerch 保存用户输入 SaveValue Me.HideEnd Sub到此完成了商品信息登记的功能模块，运行程序，可以看到结果如图所示：图4-14商品信息登记模块操作效果图实现销售信息登记功能 ：(1)新建一个窗体，Name属性为“frmSell”并在窗体上分别添加一个Frame控件、一个DTPicker控件、六个Label控件、三个TextBox控件、两个Button控件、两个ComboBox控件。如图所示：图4-16添加控件后的窗体截图(2)各控件的属性设置如下表：表4-6各控件属性设置控件类型对象名属性取值（说明）FramefraSellCaption销售信息ComboBoxcboMerchNameTextComboBoxcboUnitTextLabelLabel1Caption售出商品LabelLabel2Caption统计时间LabelLabel3Caption售出数量Label LabelLabel4Caption售出单价TextBoxtxtCountTextTextBoxtxtPriceTextTextBoxtxtRemarkTextCommandButtonOKButtonCaption确定CommandButtonCancelButtonCaption取消DTPickerdtpRegDate自此销售信息登记模块已基本完成，运行程序，结果如下图所示：图4-17运行操作后的窗体截图以上所展示的是整个程序的部分过程。五、设计总结在此次系统设计过程中，我首先了解了系统建设的基本流程、总体布局设计以及系统开发前所需的一些准备工作，特别是系统需求分析的重要性，这样做到了心中有数，先把网上管理系统需要的功能划分成几个大模块，然后再思考进行细分。脑子里逐步形成了系统的框架，开始进行布局设计，经过反复的修改才让自己满意，以为自己的这次设计开始顺利起来时，在数据库建表过程中又出现了问题，因为这方面的知识不够成熟，没有事先完整的设计好数据项就开始建立了数据关系，到后来发现要改时只得又重新来过，浪费了很多时间，只好先停下来对数据项进行了系统的分析，才使得后面的过程得以顺利进行。由于对整个系统的设计不够深刻，加上需求分析做的不够深入、不够透彻就急于进入系统设计阶段导致后面的阶段坎坎坷坷。通过这些，我更加深刻地认识到需求分析的重要性，它对于下阶段工作开展的顺利与否具有决定性的意义。在项目设计的过程中，我通过查阅各种书籍及与小组成员的讨论学习，或是向指导老师请教，最终完成了超市进销存系统的开发设计。但限于水平有限，许多功能还不够完善，但我从中学到了许多以前书本上所不能学到的也不曾碰到过的问题，通过不断的阅读相关书籍，开发水平有了明显提高，对系统的设计有了新的认识。通过这次设计，我已基本上掌握了系统的设计流程，同时也掌握了一些相关技术，增强了动手能力，并积累了使用软件工程的思想来开发软件的经验，这对于我今后的工作和学习是非常有益的。计算机专业本科实践教学 进销存管理系统的应用与实现参 考 文 献1 王晟.Visual Basic.NET数据库开发经典案例解析.北京：清华大学出版社，2005,1722 虞益诚，孙莉.SQL Server 2000数据库应用技术.北京：中国铁道出版社，2006，2833023 张智毅，温才焱. Visual Basic.NET+SQL Server数据库开发从基础到实践.北京：电子工业出版社，2006，1032984 董国平，颜志军，万丽.Visual Basic数据库开发典型模块与实例精讲.北京：电子工业出版社，2006，65895 刘韬，骆娟. Visual Basic数据库通用模块及典型系统开发.北京：人民邮电出版社， 2006,1282066 徐国智，汪孝宜.SQL Server数据库开发实例精粹.北京：电子工业出版社，2006，1352067张海涛,桑婧,郭丽娟.Vsiual Basic.NET程序设计.北京：清华大学出版社，2009，1992368 冯硕，贾志博.Visual Basic数据库编程宝典.北京：电子工业出版社，2001,255276 9 李振亭.Visual Basic程序设计教程.北京：北方交通大学出版社，2001，23025610 赵军锁，龚波，李志.Visual Basic 6数据库访问技术，机械工业出版社，2000.611 Carsten Thomesen . Database Programming with Visual Basic.NET (英文版). 北京：中国电力出版社，2003,235112Tad Husted,Cedric Dumoulin,David Winterfeldt著，Struts in Action.2003,101120.13 (美)Marty Hall,Larry Brown, 赵学良译, VB与SQL核心编程.清华大学出版社,2004,321350