药店药品销售管理系统.doc

辽 宁 工 业 大 学数据库系统概论课 程 设 计 说 明 书题目： 药品销售管理系统 学院（系）： 电子与信息工程学院 专业班级： 软件工程 班 学 号： 060403002 学生姓名： 指导教师： 教师职称： 副教授 起止时间： 20117.4-2011.7.8 辽宁工业大学课程设计（论文）任务书院（系）：电子与信息工程学院 教研室： 软件工程 学 号学生姓名专业班级软件工程 班设计题目药品销售管理系统设计技术参数1 题目要达到的目标：完成系统的登陆、数据的插入删除修改统计等基本操作。2 数据库：采用关系数据库ACCESS2003/SQLSERVER2000。3 所使用的语言、工具:VB6.0+ACCESS2003+WINDOWSXP。4 所采用的技术、系统结构:ADO数据库联接技术,系统结构为C/S结构。课设要求1 上机前预先把所有的源程序编写好。2 上机时不得迟到，不得缺席，爱护设备，认真调试程序。3 仔细查阅相关资料，认真完成思考题。4 按要求书写设计任务书，并按要求按版打印，不得雷同。工作量一周工作计划周一听取教师布置设计的任务及要求。周二学生查阅相关资料，进行数据库设计。周三至周五：详细设计与界面设计。周一至周四程序设计与上机，调试源程序。周五书写课程设计任务书。参考资料数据库系统概论数据库系统概论实验指导书自编数据库系统概论课程设计大纲等自编指导教师评语该生在数据库系统概论课程设计期间：上机时不迟到，不缺席，爱护设备，认真调试程序。仔细查阅相关资料，认真完成作业。听从指导教师安排。在设计与实现过程中，能使设计的系统达到预期设计要求，功能合理，流程清楚，语句条理通顺。按要求书写设计任务书，其论文格式规范，图表清晰合理，资料详实。系统界面友好，程序运行基本正常，功能完备。成绩： 指导教师签字： 说明：此表一式四份，学生、指导教师、教研室、系部各一份。可加附页。2011年 7 月 8 辽 宁 工 业 大 学 课 程 设 计 说 明 （ 计 算 ）书 目录第一章 概述4第二章 问题定义4第三章 需求分析4第四章 数据库设计6第五章 界面设计7第六章 代码9第一章 概述本系统本着一切为用户着想的设计指导思想，力求做到界面美观大方，操作简捷明了，而且具备一个实用的操作系统的良好容错性，在用户出现误操作时能尽量及时地给出警告，以便用户能够及时进行改正。由于不同用户所使用的计算机资源总是会受到不同条件的限制，因此，我们就要充分利用的功能，在设计出自己的功能强大的软件的同时，尽可能地减少对系统资源的占用，并且还要力求做到通过使用本药品销售管理系统，尽量使单位的药品销售工作系统化、自动化和规范化，从而达到提高企、事业单位效率的目的。本系统开发的总体设计目标是使企、事业单位的办公人员能够轻松、快捷地完成本单位的药品销售管理任务。第二章 问题定义工作人员：系统的录入人员，主要指管理各种档案的工作人员，需要通过密码才能进入。他们拥有对系统数据的录入、修改、查询、删除等操作权限。但不可以更改系统密码。查询人员：权限最低的登入人员，他们拥有对相关数据的查询权限，但不能对数据进行修改和删除。系统管理人员：指药品销售管理系统的管理人员，他们拥有所有权限，包括对系统数据的录入、修改、查询、删除等操作权限。可以对系统密码进行更改，可以管理用户信息、权限。第三章 需求分析一、主要功能： 本系统主要用于企事业单位的药品销售管理，采用面向对象的设计思想，以菜单和表单的形式进行各表单的调用，其系统功能分析是在系统开发的总体任务的基础上完成的。因此，本系统应该主要完成和实现如下功能：初始化系统数据；录入药品的基本信息数据；药品基本信息数据的修改和删除；药品信息的基本设定；浏览药品的信息；查询药品的具体参数；药品信息： 在该项内容中将包括的数据库项有药品编号、药品名称、生产厂商、供应商、生产日期、保质期、单价、存货数量。药品信息的基本设定：通过该模块可以设定药品名称、生产厂商、供应商、生产日期、保质期、单价、存货数量。二、数据流图（DFD）：（略）三、数据字典（DD）:药品销售=药品编号+药品名称+生产厂商+供应商+生产日期+保质期+单价+存货数量；应用在了：药品管理界面，添加药品信息界面，查询药品信息界面四、程序流程图验证登录口令密码是否正确？是系统主界面否调用系统菜单退出系统药品销售管理系统药品信息管理药品信息添加药品信息删除药品信息查找退出 五、功能结构图：部门工资药品销售管理系统模块药品信息设定药品编号药品名称生产厂商供应商生产日期保质期单价存货数量 药品信息设定模块第四章 数据库设计一、概念设计：系统ER图交易顾客打印收据1n销售员编号管理药品药品信息nn二、逻辑设计：下面列出主要的数据库表设计：药品销售信息表：序号中文名字段名类型备注0药品编号数字型 主键1药品名称文本型arar2生产厂商文本型3供应商文本型4生产日期日期型5保质期日期型6单价货币型7存货数量数字型三、物理设计建立索引是加快查询速度的有效手段。用户可以根据应用环境的需要，在基本表上建立一个或多个索引，以提供多种存取路径，加快查找速度。一般说来，建立与删除索引由数据库管理员DBA或表的属主（owner），即建立表的人，负责完成。系统在存取数据时会自动选择合适的索引作为存取路径，用户不必也不能显示地选择索引。在RDBMS中索引一般采用B+树、HASH索引来实现。B+树索引具有动态平衡的优点。HASH索引具有查找速度快的特点。索引是关系数据库的内部实现技术，属于内模式范畴。用户使用CREATE INDEX语句定义索引时，可以定义索引是唯一索引、非唯一索引或聚簇索引。至于某一个索引是采用B+树，还是HASH索引则由具体的RDBMS来决定。第五章 界面设计一、登陆窗口如下所示：若输入的密码不符合，即弹出对话框，提示该用户无法进入系统。密码错误 密码正确二、药品销售管理主界面单击主界面上的各个按钮，可以进入相应的界面中。三、添加药品信息先点击添加后在进行添加“确定添加”，然后输入添加的信息后点击“确定保存”四、查询药品信息五、删除药品信息第六章 代码与注释一、登录窗口代码Private Sub Command1_Click()If Text1.Text = 123 And Text1.Text Thena = MsgBox(欢迎进入！, 64, 提示框)If a = 1 ThenForm1.Show 0Unload MeEnd IfElseMsgBox 密码错误,请重新输入!, 48, 提示框Text1.Text = Text1.SetFocusEnd IfEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_Load()End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenCommand1.SetFocusEnd IfEnd SubPrivate Sub Timer1_Timer()Label1.Left = Label1.Left - 10End Sub二、药品管理代码Option ExplicitPrivate Sub Command1_Click()Adodc1.Recordset.MoveFirstEnd SubPrivate Sub Command10_Click()Adodc1.RefreshEnd SubPrivate Sub Command2_Click()Form2.ShowEnd SubPrivate Sub Command3_Click()Form4.Show vbModalEnd SubPrivate Sub Command4_Click()Form5.Show vbModalEnd SubPrivate Sub Command6_Click()Dim a As Integera = MsgBox(是否返回登录界面？, 3 + 32 + 256, 提示框)Select Case aCase 6Load Form3Form3.Show 0Form1.HideCase 7EndEnd SelectEnd SubPrivate Sub Command7_Click()If Not Adodc1.Recordset.BOF ThenAdodc1.Recordset.MovePreviousElseMsgBox 已经到顶!End IfEnd SubPrivate Sub Command8_Click()If Not Adodc1.Recordset.EOF ThenAdodc1.Recordset.MoveNextElseMsgBox 已经到底!End IfEnd SubPrivate Sub Command9_Click()Adodc1.Recordset.MoveLastEnd SubPrivate Sub Form_Load()End Sub三、添加药品信息代码Private Sub Command1_Click()a = MsgBox(确定添加？, 33)If a = 1 ThenAdodc1.Recordset.AddNewEnd IfIf a = 2 ThenExit SubEnd IfEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.AddNewAdodc1.RefreshMsgBox 成功添加End SubPrivate Sub Command3_Click()Form2.HideEnd SubPrivate Sub Form_Load()End Sub四、查询药品信息代码Private Sub Command1_Click()a = MsgBox(确定添加？, 33)If a = 1 ThenAdodc1.Recordset.AddNewEnd IfIf a = 2 ThenExit SubEnd IfEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.AddNewAdodc1.RefreshMsgBox 成功添加End SubPrivate Sub Command3_Click()Form2.HideEnd SubPrivate Sub Form_Load()End Sub六、设计总结本系统可完成基本的查药品信息查询和添加删除其的相关信息，在登录系统的安全性方面也有着一定的保证，实现了药品销售信息的管理，包括添加，查询，删除等。1)在界面设计方面，某些设计不是很合理，整个系统的界面设计不够美观，简洁；2）在功能实现方面，比如信息修改等，由于时间原因，没有完善。3）对表的设计很不完善，并且只有一个表，所以表间的关系也没有实现。总而言之，本系统基本上实现了药品销售信息管理的功能，但是附加功能没有，系统很不完善，其他细节可以逐步完善。这次课设中学到了不少东西，无论是编程还是数据库设计，受益匪浅。参考文献：1郑阿奇,彭作民主编. Visual Basic.NET程序设计教程.机械工业出版社,2006-12 戴军湘,文龙编著.Visual Basic.NET程序设计基础教程.清华大学出版社3 石志国编著 . Visual Basic.NET实用案例教程.清华大学出版社出版,2003-7-14 林联彬,李旭,顾青主编.Visual Basic.NET 程序设计.中国铁道出版社,2004-15 李万红主编.Visual Basic.NET程序设计入门 . 清华