基于VB的图书馆管理系统的设计与实现 毕业论文.doc

郑州大学现代远程教育毕 业 论 文题 目： 基于VB的图书馆管理系统的设计与实现入 学 年 月_2011年4 月 姓 名_ _学 号_11788187036 专 业_机电一体化 联 系 方 式_15133086236 学 习 中 心_ _ 指 导 教 师_ _完成时间_2014年_3月_26日28目录第一章 绪论2第二章 需求分析32.1任务概述32.1.1 存在的问题3 2.1.2 图书管理系统完成的主要目标 32.1.3用户的特点32.2需求规定32.2.1对功能的规定32.2.2读者管理功能42.2.3系统管理功能4第三章 概要设计53.1总体设计53.1.1系统目标设计53.1.2系统功能分析53.2系统设计思想53.3 系统模块功能解析6第四章 详细设计74.1程序设计说明74.1.1用户登录模块74.1.2用户添加模块74.1.3书籍查询模块84.1.4图书借阅模块94.1.5图书归还模块104.1.6新书入库模块11第五章 编码与测试135.1各功能模块的实现135.2 测试195.2.1借阅卡管理测试195.2.2书籍管理测试195.2.3系统管理测试19结束语20致 谢21参考文献21摘 要本文依据软件工程开发软件的严格要求，着重阐述了数据库系统的设计步骤，介绍了图书馆管理系统的详细设计和开发过程。文中所介绍的管理系统依据工程化的原则，采用面向对象的设计方法，在Windows XP操作平台下，选择Microsoft公司强大的应用程序开发工具Visual Basic6.0和SQL2000完成图书馆管理系统的全部功能的开发，解决了读者的借阅、续借、还书等基本管理，实现了新书的订购、验收、入库图书查询、库存图书检索、基础数据的书商管理、出版社管理、收藏单位管理、印刷厂管理、图书类别管理等功能。本文所设计的图书馆管理系统达到了图书馆管理的实际应用水平，系统虽然设计简单，但有一定的实用性。系统的功能较为全面，使用简单，基本上可以作为一般大、中、小学的图书管理系统。关键词：数据库；Visual Basic6.0；SQL2000AbstractIn this paper, based on the software engineering software development strict requirements, focused on the design of the database system steps on the library management system for the detailed design and development process. Described in the text of the engineering management system based on the principles of object-oriented design methodology, in the Windows XP operating platform, choice of Microsoft Corporation powerful application development tool Visual Basic6.0 and SQL2000 complete library management systems of all of the features development, solve the readers to borrow, renew, but also on the basic management and the book ordering, inspection, storage for books, inventory Library, on the basis of data management, publishing management, collections management units, printing Plant management, library management, and other types of functions. In this paper, the design of the library management system to the practical application of library management level is in the area of University Library Management Keywords: database Database; Visual Basic6.0 ; SQL200019第一章 绪论 进入21世纪以来，信息技术从根本上推动了图书馆的快速发展，计算机和计算机管理系统已成为图书馆进行图书管理的主要设备和系统，国内主要图书馆已呈现网络化、信息化、智能化和社会化的和特征。如何将一些先进的信息技术运用到图书馆的管理和服务中，用这些技术来改变图书馆的传统管理模式，多方面、多角度的满足广大群众获取知识是目前图书馆的工作重点。信息技术的发展和应用不仅改变了图书馆信息资源的结构和获取信息的方式，同时也促进了图书馆传统功能模式向开放式、网络式的信息服务模式转变，由单一功能向多功能转变，也改变了其服务的理念。在学校，尤其是在一些高校，图书是学校的一项重要资源，图书的管理也是学校的一项常规性的重要工作。图书馆管理系统是典型的信息管理系统，其开发主要包括后台数据库的建立和维护以及前端的应用程序的开发两个方面。对于前者要求建立数据的一致性和完整性，对于后者则要求应用程序功能的完备，易用等的特点。基于上述考虑本系统主要利用VB6.0作前端的应用开发工具 ，利用sqlsever 作为后台的数据库，利用WINDOWS作为系统平台开发的图书管理系统。进行系统分析和设计的，而系统实现等步骤则采用了原型法和面对对象的方法系统开发的总目标是实现内部图书借阅管理的系统化、规范化和自动化。提供较为完善的差错控制与友好的用户界面，尽量避免误操作。在VB6.0环境下采用“自上而下地总体规划，自下而上地应用开发”的策略开发一个管理信息系统的过程。第二章 需求分析2.1任务概述2.1.1 存在着这样几个共有的问题： 1 图书馆管理员的工作内容重复、工作效率低、工作量大。在图书借阅和归还的管理中，需要实现很多的流程。如需查询出图书借阅单，然后再填写图书归还单、查询超期图书等操作。如果手工去进行这些操作，将会既费时又费力，大大地降低了图书馆工作人员的工作效率，加重了工作人员的负担。2 办理图书借阅与归还的速度过慢。通过手工办理图书借阅与归还业务，常常会出现很多读者排队等候的现象，因而增加了管理员工作时的错误几率。3 查询、统计困难。在图书馆管理工作当中，每天都会产生大量的借书、还书数据，这些数据都需要进行统计管理。另外，面对这些复杂的数据，想要查询读者所需的图书是否在库存会很困难。为了解决以上问题，我们从读者和图书馆的角度出发，本着以读者借书、还书快捷方便和图书馆管理员管理图书方便和图书馆管理员管理图书方便的原则，开发了图书馆管理系统。2.1.2 图书管理系统完成的主要目标进入系统前需要身份认证、用户名、密码、输入正确方可进入。用户可以进行借书证的办理、查询、挂失等操作。用户可以添加账户和修改密码。2.1.3用户的特点 最终用户包括读者（具有借阅卡的人）、图书管理员，鉴于此软件应用于大学图书管理，读者基本都是在校大学生即校职工和领导，图书管理员都是接受过高等教育的职工，因此他们都懂得运用基本的计算机知识。大学图书管理系统的使用频度很高，假如一个一万人的大学来讲，每天图书馆的平均日流量为1.5万。因此，该软件的可靠性、可用性、可维护性显得尤为重要。2.2需求规定2.2.1对功能的规定 1、图书信息查询/借书信息查询:图书馆主要向读者提供图书借阅的服务。读者为了借阅图书，一般情况下，图书馆需要为读者提供图书查询功能。 2、新书入库:图书馆要及时更新馆藏图书。对于新书，要购进，供读者借阅；所以要设计到图书的批量入库。要批量登记图书的信息.3、借阅图书/归还图书:借书过程中，图书管理员要对读者的借书资格进行审查,读者拿到要借阅的图书，同时拿到自己的借阅卡，借书过程完毕。图书馆提供还书服务，读者把所借的图书和自己的借阅卡交给图书管理员。图书管理员对图书进行检查，如果出现图书的损坏情况，读者应进行相应的赔偿。如果已经过期，则读者要按规定交纳罚金。图书管理员进行登记，同时把还书信息记入借阅卡。读者拿回自己的借阅卡，还书过程借书。 4、书籍挂失:对图书由于丢失不能即时还书的情况，读者要到图书管理员进行登记.2.2.2读者管理功能1、办理借阅卡:图书馆向读者提供借阅服务，读者须具有有效凭证借阅。因此，读者必须办理借阅卡获取有效凭证，办理借阅卡并生成个人帐号、读者可修改密码。2、借阅卡信息查询;图书馆在正常运营中要面对大量的读者信息，需要掌握每个读者的信息，即时准确的掌握读者的基本情况,读者要进行信息查询，3、借阅卡挂失:对借阅卡的丢失要即时进行挂失处理，防止其他人盗用自己的有效信息并出现私自借书等行为。2.2.3系统管理功能 1、注册管理员:为了对图书馆管理系统进行管理，管理员对系统进行管理之前须进行注册功能，对管理员进行注册，系统生成相应信息。其中管理员的基本信息包括：成员ID、密码等。系统管理员每次登陆前输入自己的ID与密码，系统对其信息进行核实 2、修改密码:服务图书馆管理员可能由于某些原因，如电脑中毒导致管理员密码的泄露，系统具有修改密码的功能，确保图书管理功能的安全性。 3、退出功能:系统管理员每次离开必须进行退出功能，确保管理功能不被他人所用。第三章 概要设计 3.1总体设计 3.1.1系统目标设计系统开发的总目标：实现内部图书借阅管理的系统化、规范化和自动化。能够对图书进行注册登记，也就是将图书的基本信息，预先存入数据库中，供以后检索。能够借阅人进行注册登记，包括记录借阅人的姓名等信息。反映出图书的借阅情况；以借阅人编号对借阅人信息进行检索；提供统计分析功能。可以展现出图书类型比例、库存与借出比例。提供旧书销毁功能，对于淘汰、损坏、丢失的书目可及时对数据库进行修改。3.1.2系统功能分析 根据以上功能，将图书管理系统的数据分为：数据输入部分：主要包括图书基本信息的录入、借阅人基本信息的录入、用户基本信息的录入。数据输出部分：主要是各种统计查询，包括：根据图书信息查阅图书及其借阅信息、统计输出图书类型比例等。数据处理部分：主要涉及借阅和归还的处理.概念设计阶段主要任务和目标是根据需求分析的结果，包括一般联系实体，画出对应的ER图。功能分析之后，再根据各个岗位、各个用户对数据和使用权限的不同要求作出局部ER图，然后再把各个局部ER图综合起来形成统一的整体ER图。3.2系统设计思想1、图书管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。图书管理系统使用的是SQL Server2000的数据管理系统和以Visual Basic6.0为开发工具。2、首先进行系统设计分析，系统设计主要包括系统功能分析、系统模块设计以及运行环境的选择、系统实现过程。3、然后根据系统功能分析设计出需要的数据库，绘制系统数据流图与总结数据字典、设计数据库结构。4、最后在实现各个功能模块时，采用先模块后系统集成的方式3.3 系统模块功能解析（1）系统设计分析本图书管理系统主要有以下功能:图书征订：包括图书征订数据的录入修改删除与审校等图书编目：包括图书数目信息的录入修改删除图书典藏：包括新书分配、库室调配等功能。图书流通：包括图书借阅、续借、图书返还，图书书目的查询系统用户管理：包括系统用户数据的录入、修改与删除读者数据管理：包括读者类别管理，读者个人数据的录入、修改和删除。（2）系统功能分析权限功能：权限功能设置的对象为高级管理员、普通管理员、读者。录入功能：为普通管理员提供相应的录入功能，为高级管理员提供对所有信息的录入功能。查询功能：为所有用户提供查询的功能，可查询允许范围内的所有信息。维护功能：为普通管理员提供查询及相应的修改，删除功能，为高级管理提供对所有信息的修改删除功能。打印功能：可打印图书征订计划。退出功能：各个功能模块和主窗体都设有关闭命令按钮，可方便地退出各模块或系统。第四章 详细设计4.1程序设计说明4.1.1用户登录模块 1.程序描述:用于用户登陆的至用户界面2.功能:实现用户的登录功能3.性能:用户通过输入用户ID,用户名和密码进行用户登陆4. 输入项:输入用户ID,用户名，密码5.输出项:用户主页面。流程逻辑如图所示：图4-1用户登录流程逻辑4.1.2用户添加模块 1.程序描述:此程序用于添加新的用户，用户通过向数据库内输入必要的信息来注册成为新的用户，才通过一系列的验证之后，即注册成为真正的用户。 2.功能:实现对用户的添加功能。 3.性能:查询新用户的用户名是否存在，若存在则停止添加返还数据库；若用户不存在，则进行添加，并进行注册，注册成功后返回。4.输入项:输入用户的详细信息 5.输出项:若添加成功，则输出提示用户注册成功界面；若未成功，则提示输出未成功原因界面。 6.流程逻辑如下图所示：图4-2用户添加模块流程逻辑4.1.3书籍查询模块 1.程序描述：此程序用于实现用户对想要借阅的查询功能。 2.功能：实现图书查询功能。 3.性能：对进行想要查询的书籍进行搜索 4.输入项：输入图书的详细信息，包括图书名称，书籍ID，图书作者，出版社，单价等信息。 5.输出项：若输入的图书存在即输出图书详细信息界面；若输入的图书不存在则显示图书不存在界面。6.流程逻辑如下图所示：图4-3图书查询模块流程4.1.4图书借阅模块 1.程序描述：此程序用于图书的借阅，用户通过登录自己的借阅ID后，对需要借阅的图书进行借阅操作，如果符合借阅的要求，则可进行借阅。 2.功能：实现对图书的书籍借阅功能。 3.性能：首先验证借阅者输入的借阅ID是否存在，若存在进行下一步；若不存在则返回。4.若借阅ID存在，则检查此借阅ID是否借阅书籍超出4本，若超出则提示超出借阅数目，返回；若没有超出，则进行下一操作。5.对想要借阅的图书ID进行搜索，若此书不存在，则提示此书不存在；若此书存在则进行下一步操作。将借阅者借阅的数量増一，将数据库中此书数量减一，同时提醒借阅成功，然后返回。 6.输入项：输入借阅证的ID,图书ID 7.输出项：若借阅证ID正确且图书ID正确且符合借阅要求，则输出提示借阅成功界面；若存在借阅ID或图书ID或不符合借阅要求等问题，则输出提示没有借阅成功原因的界面。 8.流程逻辑如下图图4-4图书借阅模块4.1.5图书归还模块 1.程序描述：此程序用于图书的归还，用户在登录自己的ID之后，用户可以对需要归还的图书进行操作，如果符合归还要求，则可以将图书归还。 2.功能：实现对图书的书籍归还功能。 3.性能：首先验证借阅者输入的借阅ID是否存在，若存在进行下一步；若不存在则返回。对想要归还的图书ID进行搜索，若此书不存在，则提示此书不存在；若此书存在则进行下一步操作。将借阅者借阅的数量减一，将数据库中此书数量加一，同时提醒借阅归还，然后返回。 4.输入项：输入借阅证ID和图书ID 5.输出项：若借阅证ID和图书ID正确，则输出提示图书归还成功界面；若借阅证ID或图书ID不正确，则输出提示没有成功原因的界面。6.流程逻辑如下图：图4-5图书归还模块4.1.6新书入库模块1.程序描述：用户可以将新书的详细信息进行输入，保存在数据库中后，新书即登记成功。2.功能;实现新进图书入库功能。3.性能:对数据库查询是否已存在此书4.输入项:输入新书的书籍ID，书名等信息。5.输出项:若添加成功，则输出提示新书添加成功界面；若没有添加成功，输出提示未成功原因界面。6.流程逻辑如下图图4-6新书入库模块第五章 编码与测试5.1各功能模块的实现（1）用户登录窗体图5-1 用户登录窗体用户登录代码：Const MaxLogTimes As Integer = 3Private Sub cmdcancel_Click() If MsgBox("是否真的退出系统登录？", vbYesNo, "登录验证") = vbYes Then Unload Me End IfEnd SubPrivate Sub cmdok_Click() Static intLogTimes As Integer intLogTimes = intLogTimes + 1 If intLogTimes > MaxLogTimes Then MsgBox "超过登录次数！", vbCritical, "登录验证" Else With Library_Manage.rsSysUsers .Open If .RecordCount > 0 Then .MoveFirst .Find "编号=" & Trim(txtLog(0) & "" If .EOF Then MsgBox Trim(txtLog(0) & "不是系统用户，请检查输入！", vbCritical, "登录验证" txtLog(0).SetFocus txtLog(0).SelStart = 0 txtLog(0).SelLength = Len(txtLog(0) ElseIf .Fields("口令") <> Trim(txtLog(1) Then MsgBox "口令错误，请检查输入口令！", vbCritical, "登录验证" txtLog(1).SetFocus: txtLog(1) = "" Else CurrentUserNum = .Fields(编号) CurrentUserPassword = .Fields("口令") CurrentUserStatus = .Fields("权限") MsgBox "欢迎使用常州信息学院管理系统！", vbInformation, "登陆成功！" Unload Me End If End If .Close End With End IfEnd SubPrivate Sub Form_Load() SysLogon.BackColor = RGB(192, 210, 270)End Sub（2）用户管理窗体界面图5-2 用户管理窗体用户管理窗体代码'保存Private Sub cmdSave_Click() Dim objcopy As New Recordset If Trim(txtNum) = "" Then MsgBox "不能为空！", vbCritical, "系统用户管理" txtNum.SetFocus txtNum.SelStart = 0 txtNum.SelLength = Len(txtNum) ElseIf Len(Trim(txtPwd) <> 6 Then MsgBox "用户口令须为6位字符串！", vbCritical, "系统用户管理" txtPwd.SetFocus txtPwd.SelStart = 0 txtPwd.SelLength = Len(txtPwd) ElseIf Not txtAuth Like "0,1" Then MsgBox "用户权限必须为0或1", vbCritical, "系统用户管理" txtAuth = "" txtAuth.SetFocus Else Set objcopy = Library_Manage.rsSysUsers.Clone '对错？ With objcopy If .RecordCount > 0 Then .MoveFirst .Find "编号" & Trim(txtNum) & "" If Not .EOF And .AbsolutePosition <> Library_Manage.rsSysUsers.AbsolutePosition Then MsgBox "编号:" & Trim(txtNum) & "已被使用，请选择其他编号！", vbCritical, "系统用户管理" txtNum.SetFocus txtNum.SelStart = 0 txtNum.SelLength = Len(txtNum) Exit Sub Else '保存记录 Library_Manage.rsSysUsers.Update MsgBox "数据保存成功！", vbInformation, "系统用户管理" cmdAdd.Enabled = True cmdDel.Enabled = True isAdding = False: picNavigation.Enabled = True End If End With End IfEnd SubPrivate Sub Form_Load() cmdMove(0).Value = TrueEnd Sub（3）读者数据管理窗体界面图5-3 读者数据管理窗体读者数据管理窗体代码Library_Manage.Library_Manage_Con.Execute "TRUNCATE TABLE 读者类别" With Library_Manage.ReaderType If .State = adStateClosed Then .Open .AddNew .Fields("编号") = "0" .Fields("名称") = "特殊" .Fields("借书量") = Val(txtSp(1) .Fields("借书期") = Val(txtSp(2) .Fields("有效期") = Val(txtSp(3) .Update .AddNew .Fields("编号") = "1" .Fields("名称") = "馆员" .Fields("借书量") = Val(txtL(1) .Fields("借书期") = Val(txtL(2) .Fields("有效期") = Val(txtL(3) .Update .AddNew .Update .AddNew .Fields("编号") = "2" .Fields("名称") = "教师" .Fields("借书量") = Val(txtT(1) .Fields("借书期") = Val(txtT(2) .Fields("有效期") = Val(txtT(3) .Update .AddNew .Fields("编号") = "3" .Fields("名称") = "学生" .Fields("借书量") = Val(txtS(1) .Fields("借书期") = Val(txtS(2) .Fields("有效期") = Val(txtS(3) .Update End WithEnd SubPrivate Sub Form_Load()cmdMove(0).Value = TrueEnd SubPrivate Sub SSTab1_DblClick()End Sub（4）图书征订管理窗体图5-4 图书征订管理窗体图书征订管理代码txtPubDate.SelLength = Len(txtPubDate) ElseIf Trim(txtAuthor) = "" Then MsgBox "作者不能为空！", vbCritical, "图书征订管理" txtAuthor.SetFocus txtAuthor.SelStart = 0 txtAuthor.SelLength = Len(txtAuthor) ElseIf Val(txtNum) = "" Then MsgBox "正的数量无效！", vbCritical, "图书征订管理" txtNum.SetFocus txtNum.SelStart = 0 txtNum.SelLength = Len(txtNum) ElseIf Not IsDate(txtDate) = "" Then MsgBox "作者不能为空！", vbCritical, "图书征订管理" txtDate.SetFocus txtDate.SelStart = 0 txtDate.SelLength = Len(txtDate) Else '保存记录 Library_Manage.rsBooksOrder .Update MsgBox "数据保存成功！", vbInformation, "图书征订管理" cmdAdd.Enabled = True: cmdDel.Enabled = True cmdExam.Enabled = True: cmdRefresh.Enabled = True isAdding = False: picNavigation.Enabled = True End IfEnd SubDim objcopy As RecordsetPrivate Sub cmbOut_Click() AddListOut End SubPrivate Sub cmdAddAll_Click(Index As Integer) '选择全部条码 ListItem_Add lstPre(Index), LstIn(Index), Index, True End SubPrivate Sub cmdAddOne_Click(Index As Integer)'选择当前条码 ListItem_Add lstPre(Index), LstIn(Index), Index, False End SubPrivate Sub cmdExit_Click() If LstIn(0).ListCount > 0 Then If MsgBox("你选定了部分新书准备入库，但没执行保存操作" & vbCr & "是否要执行保存操作？", vbCritical + vbYesNo, "图书典藏管理") = vbYes Then SSTab1.Tab = 0 cmdSave.Value = True End If ElseIf LstIn(1).ListCount > 0 Then If MsgBox("你选定了部分新书准备入库，但没执行保存操作" & vbCr & "是否要执行保存操作？", vbCritical + vbYesNo, "图书典藏管理") = vbYes Then SSTab1.Tab = 1 cmdSave.Value = True End If End If Unload MeEnd Sub'刷新新书或调出库室条码列表Private Sub cmdRefresh_Click(Index As Integer) Select Case Index Case 0 '刷新新书列表 With Library_Manage.rsBooksBibli If .State = adStateClosed Then .Open .Requery End With AddListNew Case 1 '刷新库室条码列表 With Library_Manage.rsBooksStore If .State = adStateClosed Then .Open .Requery End With AddListOut End SelectEnd SubPublic Sub AddListNew() lstPre(0).Clear With Library_Manage.rsBooksBibli If .State = adStateClosed Then .Open If .RecordCount > 0 Then .MoveFirst While Not .EOF lstPre(0).AddItem .Fields("条码") .MoveNext Wend Else lstPre(0).AddItem "当前无待分配新书" End If End WithEnd Sub5.2 测试5.2.1 借阅卡管理测试进度安排测试办理借阅证信息，检查个人账号、读者可自行修改密码。测试查询借阅卡信息的正确性，包括输入的读者信息等。测试借阅卡挂失功能，包括读者信息等。例如：用户登录实现权限登录系统，通过用户名，密码验证登陆人身份。添加信息在页面实现对信息的添加并能提交到数据库。修改信息在页面对信息进行修改并能提交到数据库，实现对数据库信息的刷新。删除信息在页面选定要删除的信息，页面刷新不在显示此信息，但数据库内仍保留此信息。通过对图书馆管理系统的基本数据进行录入，进行增加、删除、修改及查询等功能的测试，一切正常。对读者和出版社的基本数据进行保存，未有错误弹出。5.2.2 书籍管理测试 进度安排：测试新书入库信息的正确性。测试借书、还书功能信息正确性。测试书籍挂失信息的正确性。测试图书信息查询的正确性。测试借书信息查询的正确性。5.2.3 系统管理测试 进度安排测试注册管理员信息的正确性。测试修改密码信息的正确性。结束语本系统的最终目的是针对各大中专院校的图书管理现状，设计出适合一般学校的计算机辅助图书管理系统。实现对图书基本信息、读者基本信息进行计算机辅助管理，完成借书和还书有关信息的记录、修改、查询、删除等一系列任务的计算机管理与实现。从而在图书馆对新旧书的反应；对书籍借阅的管理能力；对读者和图书馆工作人员的管理能力；对图书馆管理人员软件操作的适应时间和操作感觉这些方面都将大大的提高。通过这一段时间的学习，我对图书管理系统软件有了更深一层的了解，对在利用Visual Basic6.0编写有关应用程序有了进一步的认识，并能够掌握了面向对象的程序设计方法和技巧。在本次毕业设计中我学会使用Visual Basic6.0和SQL数据库设计制作图书管理系统。其设计原理基本上可以满足图书馆内图书管理的需要。本着实用性和介绍性的原则, 系统的各个功能模块能实现了基本的功能,有效应用到图书馆的图书自动化管理 。 总之，通过这次毕业设计，深切地认识到VB6.0系统软件对现代化起了促进作用，也提高了人们的办事工作效率，更使之高效的服务于人。 致 谢首先,感谢老师对我的细心指导和严格的要求，论文的指导和对程序的调试都给予了莫大的帮助，少走了不少弯路，也使我发现了程序的不足之处，能及时修改，使程序的错误降到最低，在本次设计的过程中，老师们给了我们很大