电脑销售管理系统-

石家庄铁道大学四方学院集中实践报告书课题名称电脑销售管理系统姓名学号系、部土木工程系专业班级指导教师刘仁芬2015年6月25日※※※※※※※※※※※※※※※※※※※※※※※※2014级高级语言程序设计一、设计任务及要求：设计任务：电脑销售管理系统要求：电脑销售的工作人员可以登录系统，工作人员包括系统的管理员和销售员，两者可以分别进行自己的权限内的管理，管理员可以进行进货管理和库存管理；而销售员可以进行销售管理二、指导教师评语：三、成绩指导教师签名：年月日电脑销售管理系统的开发1选题的意义制作该系统的原因是改变传统的电脑交易模式，消除以往供应商与顾客之间的交易不明情况，帮助顾客更快、更准确的根据自己的需要来找到所需电脑，以提高工作准确度和工作效率。在该系统制作的过程中我运用了所学的数据库的创建和连接、函数过程、控件数组、条件语句（If语句、SelectCase语句）、循环语句等数据结构和知识点。2系统功能需求分析2.1系统概述本系统包括用户登录、供应商信息管理、电脑信息管理、以及供应商与顾客之间的交易管理等功能。用户可以根据自己的需要方便快捷的选择自己所需要的电脑。2.2系统的组成及各模块的功能电脑销售管理系统的组成主要包括以下几点功能：1.用户登录功能：没有权限的用户不能使用该软件。2.进货管理功能：用户可以及时了解进货情况。3.销售管理功能：用户可以及时了解销售情况。4.库存管理功能：用户可以及时查看库存，以此实现交易顺利进行。5.人员信息管理功能：用户可以根据自己的需要的人员信息。6.销售员管理功能：销售员可以对销售情况进行管理，并可对库存进行查询。2.3系统的运行环境1.系统使用环境操作系统：Windows2000/XP系统支持：Visualbasic6.0及以上版本支持库数据库：Access硬件环境：硬盘：剩余使用空间1GB以上内存：32MB以上显卡：SVGA显示适配器2.系统开发环境操作系统：Windows2000/XP系统支持：Visualbasic6.03系统设计3.1总体结构设计图1总体模块图3.2数据库实现表1人员信息表字段号类型宽度备注人员编号数字255姓名文本255性别文本255年龄数字255出生日期日期255籍贯文本255职位文本255管理（销售）员登陆界面销售系统进货管理销售管理库存管理人员信息管理退出销售管理库存管理退出电脑销售查询电脑销售录入库存查询进电脑录入进电脑查询电脑销售查询库存查询人员信息查询管理系统表2电脑信息表字段名类型宽度备注产品名称文本255型号文本255内存文本255屏幕尺寸数字255操作系统文本255品牌文本255数量数字255表3进电脑信息表字段名类型宽度备注电脑名称文本255进入日期日期255单价货币255台数文本255表4电脑销售表字段名类型宽度备注电脑名称文本255出售日期日期255数目数字255台数数字2554系统实现4.1登录模块的设计与实现图2登陆模块程序代码：PrivateSubCommand1_Click()IfText1.Text=20145321AndText2.Text=11111ThenMsgBox您已成功登入！,vbOKOnly+vbInformation,登陆成功销售系统.ShowMe.HideElseMsgBox账号或密码错误请从新输入Text1.Text=Text2.Text=Text1.SetFocusEndIfEndSub4.2其他（销售员登陆）模块的设计与实现1.销售员登陆界面图3销售模块PrivateSubFDF_Click()EndEndSubPrivateSubfghj_Click()库存查询.Show销售系统.HideEndSubPrivateSubhjh_Click()电脑销售查询.Show销售系统.HideEndSubPrivateSubsfddf_Click()电脑销售录入.Show销售系统.HideEndSub(1).电脑销售录入模块图4销售录入模块PrivateSubCommand2_Click()电脑销售录入.Hide销售系统.ShowEndSubPrivateSubCommand4_Click()Dimf%,n%f=Text3.Textn=Adodc5.Recordset.Fields(数量).ValueAdodc2.Recordset.AddNewAdodc2.Recordset.Fields(电脑名称)=Text1.TextAdodc2.Recordset.Fields(出售日期)=Text2.TextAdodc2.Recordset.Fields(数量)=Text3.TextAdodc2.Recordset.Fields(成交价)=Text4.TextAdodc2.Recordset.UpdateAdodc5.Recordset.Fields(数量).Value=Str(Val(Adodc5.Recordset.Fields(数量).Value)-f)Adodc5.Recordset.UpdateMsgBox购买成功！,vbExclamation+vbOKOnlyEndSubPrivateSubForm_Load()Text1.Text=dnmcText2.Text=DateAdodc5.ConnectionString=Provider=Microsoft.ACE.OLEDB.12.0;DataSource=Database2.accdb;PersistSecurityInfo=FalseAdodc5.CommandType=adCmdTableAdodc5.RecordSource=电脑库存Adodc5.RefreshEndSub(2).电脑销售查询模块图5销售查询模块PrivateSubCommand1_Click()Adodc1.CommandType=adCmdTextAdodc1.RecordSource=select*from电脑销售where电脑名称='&Text1.Text&'Adodc1.RefreshText2.Text=Adodc1.Recordset.Fields(出售日期)Text3.Text=Adodc1.Recordset.Fields(数目)Text4.Text=Adodc1.Recordset.Fields(成交价)EndSubPrivateSubCommand2_Click()电脑销售查询.Hide电脑销售系统.ShowEndSub（3）.库存查询模块图6库存查询模块PrivateSubCommand1_Click()dnmc=Adodc5.Recordset.Fields(电脑名称)电脑销售录入.ShowEndSubPrivateSubCommand2_Click()库存查询.Hide电脑销售系统.ShowEndSub5设计体会5.1总结VB小学期的课程如期完成，感觉很欣慰，虽然遇到过很多问题，但在自己的努力以及老师和同学的帮助下都一一化解了，而且我觉得自己通过这次课程设计学到了很多东西，以前只知道学习课本上的固定原理和知识，很少用于自己实践，而这次课程设计完全将自己在书本上学到的东西实践操作出来。说实话开始感觉很迷茫，好像什么都不会，可是后来慢慢适应了，也知道如何操作了，也就一如既往的坚持了下来。不过付出就会有回报，所以我获得的远比我想象的多，这是慢慢积累的过程。5.2存在的主要问题在本程序的创建过程中，我遇到的最大的问题就是所需要代码的繁杂，需要一遍遍不厌其烦的翻书去看。还有就是在数据库的建立和连接。再有就是在程序设计好之后，经常出问题，只能再改。参考文献[1]孙春来，韩正清等.《Visualbasic6.0中文版编程基础与范例》，电子工业出版社，出版日期：2001-1-1.[2]知寒工作室.《中文Visualbasic6简明案例教程》机械工业出版社，出版日期：1999-4-1[3]徐健平，赵永.《Visualbasic基础教程》机械工业出版社出版日期：2000-5-1[4]张鲁.《Visualbasic6.0编程技巧与实例分析》，水利水电出版社出版日期：1999-10-1[5]张磊等.《Visualbasic6使用详解》，机械工业出版社出版日期：1999-7-1[6]康耀红，黄建青等.《Visualbasic6.0数据库设计》，北京大学出版社，出版日期：2002-2-1[7]郑刚.《Visualbasic6.0实效编程百例》，人民邮电出版社，出版日期：2002-7-1[8]周兰文.《Visualbasic6中文版与上机指导》，清华大学出版社，出版日期：1999