资源描述
目录第一章绪论2第二章需求分析32.1任务概述32.1.1 图书管理系统完成的主要目标32.1.2用户的特点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图书管理系统摘要：本文介绍了在VB6.0环境下采用“自上而下地总体规划，自下而上地应用开发的策略开发一个管理信息系统的过程。通过分析传统的人工管理图书馆的缺乏，创立了一套行之有效的计算机管理图书馆的方案。文章详细介绍了图书管理信息系统的系统分析局部，包括可行性分析、组织机构分析、管理职能分析、业务流程分析、数据流程分析、数据字典、处理描述等等；系统设计局部主要介绍了系统功能设计和数据库设计；系统实现局部列出了几个主要的程序框图，并附带了一些主要的窗口和程序。关键字:图书管理系统,VB6.0,sqlserver2000,信息系统Library Management SystemAbstract：This article introduces the detailed process of exploring a management information system under the environment of VB6.0, utilizing “Top-Bottom overall plan and a strategy according to “Bottom-Top application and exploitation. That is to establish a set of effective scheme for library management by puter, through analyzing disadvantages of traditional library management by human resources. This article emphasizes on three sections. The system analysis section of library management information includes feasible analysis, organizing organs analysis, management function analysis, technological process of business analysis, technological process of data analysis, data dictionary, disposal description and the like. The system design section mainly focuses on system function design and data base design. And the system realization section has provided several major program charts, together with the main windows and programs.Key words:library management system, VB6.0,information system第一章 绪论 随着人类社会的开展，人类对知识的需求也不断地增长。在这种形势下，书籍就渐渐地成为人们获取并增长知识的主要途径，而图书馆就自然而然地在人们的生活中占据了一定的位置，如何科学地管理图书馆不但关系到读者求知的方便程度，也关系到图书馆的开展，因此，开发一套完善的图书馆管理系统就必不可少了。图书馆管理系统是典型的信息管理系统，其开发主要包括后台数据库的建立和维护以及前端的应用程序的开发两个方面。对于前者要求建立数据的一致性和完整性，对于后者那么要求应用程序功能的完备，易用等的特点。基于上述考虑本系统主要利用VB6.0作前端的应用开发工具 ，利用sqlsever 作为后台的数据库，利用WINDOWS作为系统平台开发的图书管理系统。另外本图书馆管理系统利用软件工程化思想和方法，总体上是采用构造化生命法进展系统分析和设计的，而系统实现等步骤那么采用了原型法和面对对象的方法系统开发的总目标是实现部图书借阅管理的系统化、规化和自动化。能够对图书进展注册登记，也就是将图书的根本信息如：书名、作者、价格等预先存入数据库中，供以后检索。能够对借阅人进展注册登记，包括记录借阅人的、地址、等信息。提供方便的查询方法。如：以书名、作者、出版时间确切的时间、时间段、某一时间之前、某一时间之后等信息进展图书检索，并能反映出图书的借阅情况；以借阅人编号对借阅人信息进展检索；以名称查询联系方式信息。提供统计分析功能。可以展现出图书类型比例、库存与借出比例。提供旧书销毁功能，对于淘汰、损坏、丧失的书目可及时对数据库进展修改。能够对使用该管理系统的用户进展管理，按照不同的工作职能提供不同的功能授权。提供较为完善的过失控制与友好的用户界面，尽量防止误操作。图书馆的根本功能就是为读者提供借阅效劳，读者通过借阅这一过程，可以把图书带出图书馆，从而使读者能够更方便的浏览图书。借书过程中，图书管理员要对读者的借书资格进展审查，对符合借书条件的读者，允许其借书，对其借书记录进展登记；对没有借书资格的读者，制止其借书。在VB6.0环境下采用“自上而下地总体规划，自下而上地应用开发的策略开发一个管理信息系统的过程。通过分析传统的人工管理图书馆的缺乏，创立了一套行之有效的计算机管理图书馆的方案。文章详细介绍了图书管理信息系统的系统分析局部，包括可行性分析、组织机构分析、管理职能分析、业务流程分析、数据流程分析、数据字典、处理描述等等；系统设计局部主要介绍了系统功能设计和数据库设计；系统实现局部列出了几个主要的程序框图，并附带了一些主要的窗口和程序。第二章需求分析2.1任务概述2.1.1图书管理系统完成的主要目标进入系统前需要身份认证、用户名、密码、输入正确方可进入。用户可以根据需要进展书库管理。用户可以进展借书证的办理、查询、挂失等操作。用户可以添加账户和修改密码。2.1.2用户的特点 最终用户包括读者具有借阅卡的人、图书管理员，鉴于此软件应用于大学图书管理，读者根本都是在校大学生即校职工和领导，图书管理员都是承受过高等教育的职工，因此他们都懂得运用根本的计算机知识。大学图书管理系统的使用频度很高，假设一个一万人的大学来讲，每天图书馆的平均日流量为1.5万。因此，该软件的可靠性、可用性、可维护性显得尤为重要。2.2需求规定2.2.1对功能的规定1、图书信息查询/借书信息查询:图书馆主要向读者提供图书借阅的效劳。读者为了借阅图书，一般情况下，需要在借书之前查询所要借阅的图书情况，所以图书馆需要为读者提供图书查询功能。例如，读者可能想借阅某方面的书，但不知道图书馆在该方面有哪些图书可供借阅，所以需要对图书馆的图书进展查询；或者，读者知道想借阅的图书信息，但不知道该图书馆是否有该书或不知道图书在图书馆的位置、是否被借出、是否可以借阅等信息，这也需要使用图书查询功能。一般的图书查询中，读者是通过图书登记卡、浏览图书登记卡中的信息得到图书信息的。经过图书查询，读者获得图书馆是否有自己想要的图书，该图书的简单信息以及图书在图书馆的借阅位置等信息。2、新书入库:为了能正常运行，图书馆要及时更新馆藏图书。对于新书，要购进，供读者借阅；所以要设计到图书的批量入库。对于批量入库，图书管理员要批量登记图书的信息，包括书名ID、ISBN、图书名称、作者、单价、入库时间、图书总量、现存总量等。3、借阅图书/归还图书:图书馆的根本功能之一就是为读者提供借阅效劳，读者通过借阅这一过程，可以把图书带出图书馆，从而使读者能够更方便的浏览图书。借书过程中，图书管理员要对读者的借书资格进展审查，对符合借书条件的读者，允许其借书，对其借书记录进展登记；对没有借书资格的读者，制止其借书。具体的步骤如下：读者向图书管理员提交请求和图书借阅卡,图书管理员检查读者提供的借阅卡，如果该借阅证真实准确，读者已经借阅的图书并没有超过允许借书量，而且读者没有逾期未还的图书，那么允许读者借书，否那么，读者不能从图书馆借书。读者拿到要借阅的图书，同时拿到自己的借阅卡，借书过程完毕。当借阅图书的数量超过5本或者出现未按期归还图书的情况，那么不好进展借阅处理。图书馆的另一根本功能就是为读者提供还书效劳，读者在一本图书借阅期满之前把该图书还给图书馆，一般的还书步骤如下：读者把所借的图书和自己的借阅卡交给图书管理员。图书管理员对图书进展检查，看有无损坏，如果出现图书的损坏情况，读者应进展相应的赔偿。图书管理员查看是否超过规定借阅期限，如果已经过期，那么读者要按规定交纳罚金。图书管理员进展登记，同时把还书信息记入借阅卡。读者拿回自己的借阅卡，还书过程借书。读者逾期未归还图书超过三天，将按照每本每天进展一定的罚款。4、书籍挂失:对图书由于丧失而不能即时还书的情况，读者要即时到图书管理员进展登记，确保图书信息的更新。进展书籍挂失的步骤一般如下：读者将所丢图书信息告诉图书管理员并将借阅卡交给图书管理员。图书管理员对该图书信息进展登记，并按图书的价格，要求读者进展相应赔偿。图书管理员将信息记入借阅卡。读者拿回自己的借阅卡，挂失功能完毕。2.2.2读者管理功能1、办理借阅卡:图书馆向读者提供借阅效劳，读者必须具有有效凭证方可借阅。因此，读者必须办理借阅卡获取有效凭证。读者在办理借阅卡时，必须输入个人有关注册信息，包括读者、性别、出生日期、家庭住址、等信息。系统根据读者提供的信息，办理借阅卡并生成个人、读者可自行修改密码。2、借阅卡信息查询;图书馆在正常运营中要面对大量的读者信息，需要掌握每个读者的信息，即时准确的掌握读者的根本情况，这些是图书馆运营的保证。读者要进展信息查询，可以通过系统将自己的借阅卡账户、密码输入系统，系统通过核对找到读者的信息。如果读者的信息正确，系统将读者的信息包括读者、性别、出生日期、家庭住址、等信息。如果读者的信息不正确，系统将提示错误，并且系统设定，当错误次数超过5次时，系统将不予查询。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.程序描述:此程序用于用户登陆的至用户界面，程序通过输入用户的ID,用户密码的正确性来实现对验证用户的真实性。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 Sub2用户管理窗体界面图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: piavigation.Enabled = True End If End With End IfEnd SubPrivate Sub Form_Load() cmdMove(0).Value = TrueEnd Sub3读者数据管理窗体界面图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 Sub4图书征订管理窗体图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: piavigation.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系统管理测试进度安排测试注册管理员信息的正确性。测试修改密码信息的正确性。完毕语 对于这篇论文我有不少心得体会。这次是对我们掌握所学知识的一次考核。它可以让我们了解自己一学期里的学习情况，有助于在今后的学习中加以改良。通过这次上机实验，我发现了自己对数据库和vb语言掌握的并不牢，有的知识点根本就不懂。这都要怪自己在平时的学习过程中不够用心，不懂的地方也没有及时的去搞懂，课后也没怎么花时间去研究。这次实验我觉得自己不仅学到了很多软件设计方面的知识，也让我稳固了以前所学的知识以及看到了自己以前学习中的缺乏之处。 在今后的学习过程中，我一定会认真学习专业课程，再也不能像以前那样迷迷糊糊的，课后要多花时间去研究一些有关编程方面的题目，不懂的地方及时把它弄懂。以后自己还要多动手编写一些程序。在这里我要感学校能提供这么一个珍贵的时机，我们可以把课堂上所学的理论知识运用到实践中去，把书上的东西变成我们自己的。这个时机既让我们学习稳固了知识，也让我们发现了自己的缺乏之处。特别要感我们的指导教师，正因为有了您的帮助我们才可以完成实验。我也希望今后还会有更多的时机让我们去实践，去充实自己。致 在本次设计的过程中，教师们给了我们很大的帮助。不仅使我们在规定时间完成了系统的设计，同时还使我们学到了很多有益的知识和珍贵的经历在此， 我谨向他们表示最衷心的感。感教师的指导,使我们充分利用软件工程,VB,数据库原理开发出自己的工程.在开发的过程中使我体会到了工程化开发方法和瀑布模型利用的重要性,在此还要感所有合作参与工程开发的同学们这次毕业设计的成功离不开所有参与的同学们的帮助和支持,是他们让我知道了团队工作的重要.参考文献1、宏才.数据库原理及设计M.:清华大学.2004. 2、陆丽娜.软件工程 M.:经济科学.1999 3、郝志恒、舫.Visual Basic 6.0 编程篇M ：电子工业2004 4、世峰.数据库根底与应用M ：中央电大20035、吴斌、鲁大林. Visual Basic+SQL Sever数据库应用系统开发M ：机械工程 20086、邱华 .SQL Server 2000 数据库应用教程M ：人民邮电 20077、钟军 . Visual Basic数据库高级实例导航M :清华大学 2003 8、松涛. Visual Basic+SQL Server 2000 系统开发实录M : 机械工业 200721 / 22
展开阅读全文