图书管理系统毕业论文 .doc

《图书管理系统毕业论文 .doc》由会员分享，可在线阅读，更多相关《图书管理系统毕业论文 .doc（27页珍藏版）》请在三一办公上搜索。

1、山西财贸职业技术学院毕业论文（设计） 图书管理系统 图书借阅管理系统 王慧红 论文指导教师姓名： 李志芳 所在系及专业名称： 计算机信息及技术 班级： 计应091班 论文提交日期：2012年4月17日 论文答辩日期：2012年5月19日答辩委员会主席：_评 阅 人：_2012 年04 月 11 日论文题目：图书信息管理系统专 业：计算机应用毕 业 生：王慧红 签名： 指导教师：李志芳 签名： 摘要图书管理系统是采用Visual Basic 6.0开发的一个数据库管理系统。开发本系统的基本步骤：需求分析、系统概念设计、系统逻辑和物理设计、系统实现和维护。在系统分析中先后用数据字典、数据流图、系统

2、的功能结构图、ER图分析了系统所需的各种数据。在系统的设计过程中，我们采用了模块独立设计法，比较详细的展现了各个模块的功能。在库和表的设计当中，我们力求参次清晰，设计简单实用。在系统具体实行阶段中，我们精心细致的画出了各个窗体并给出了相应的事件和代码，以实现各个窗体的作用。本系统虽然设计简单，但有一定的实用性。系统的功能较为全面，实用简单，基本上可以作为各个学校的图书管理系统。【关键词】图书管理；数据库；Visual Basic 6.0目 录1 系统简介1.1 开发系统的目的和意义1.2 开发工具1.3 开发软件Access 的介绍1.4 开发软件Visual Basic 6.0的介绍2 数据

3、库系统设计2.1 数据库及其应用2.2 数据库系统2.3 数据库设计概念3 需求分析3.1 图书管理现状3.2 可行性分析3.3 系统的数据字典3.4 数据流程图4 系统的概念4.1 系统模块功能解析4.2 系统功能结构图4.3 系统ER图设计5 系统逻辑和物理设计5.1 系统数据库的具体实现5.2 系统数据库的维护5.3 功能模块的实现5.3.1 登陆窗体的实现5.3.2 系统主界面的实现5.3.3 归还图书窗体的实现5.3.4 管理员设置窗体的实现6 调试与分析6.1 软件测试的目标6.2 测试举例总结 主要参考文献 随着人类社会的发展，人类对知识的需求也不短地增长。在这种形势下，书籍就渐

4、渐地成为人们获取并增长知识的主要途径。而图书馆就自然而然地在人们的生活中占据了一定的位置。当今时代是飞速发展的信息时代，在各行各业中离不开信息处理，这正是计算机被广泛应用于信息管理系统的原因。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息而设计的。图书馆包含很多的信息数据的管理，现今，有很多的图书馆都是初步开始使用，甚至尚未使用计算机进行信息管理。根据调查得知，以前对信息管理的主要方式是基于文本、表格等纸介质的手工处理，数据处理工作量大，容易出错。由于数据繁多容易丢失，且不易查找。总的来说，缺乏系统规范的信息管理手段。基于这个问题，我

5、认为有必要建立一个图书管理系统，使图书管理工作规范化，系统化，程序化，避免图书管理的随意性，提高信息处理的速度和确性，能够及时，准确，有效的查询和修改图书情况。1 系统简介任务：针对各大院校的图书管理现状，设计出适合一般学校的计算机辅助图书管理系统。实现对图书基本信息、读者基本信息进行计算机辅助管理，完成借书和还书有关信息的记录、修改、查询、删除等一系列任务的计算机管理与实现。 开发环境：本图书管理开发系统是基于以下的软件环境： 以windows xp为操作系统 以visual basic 6.0 为开发工具 以access 2000 作为后台数据库功能概述：该系统界面友好，操作简单，能完成添

6、加图书信息，修改图书信息，查询图书信息，删除图书信息，添加读者信息，查询读者信息，修改读者信息，删除读者信息等一系列图书管理功能，开发本系统的总体任务是实现图书管理的系统化和自动化，帮助管理人员更好更高效的完成图书管理工作。本着使用性和介绍性的原则，整个系统由五大模块组成，每个大的模块又包括三至四个小模块。一、图书管理部分：包括图书信息管理和类别管理，其功能是实现对各部分数据内容进行添加、修改、查询等操作。二、借阅管理部分：包括借书管理和还书管理，其功能是实现对各部分数据内容的添加和查询等操作。三、读者管理包括部分：包括读者信息管理，其功能是实现对各部分数据内容的添加和修改等操作。四、帮助部分

7、：包括系统设计前台和后台简概，退出系统等功能。系统具有高效、易操作、易维护等特点，并且系统结构清晰、界面友好，功能较为齐全，能有效的协助管理人员进行图书馆工作。如果想真正把它用到图书馆的图书自动化管理中，还需要对该系统进一步的完善工作。1.1 开发系统的目的和意义随着各高等院校的规模不断扩大，图书馆的藏书、管理人员、读者的数量也越来越多，图书管理涉及到大量的数据处理，传统的人工处理已经不能完成庞大的数据处理，因为图书的情况是随时改变的，因此必需对图书进行动态的管理，而这对于一个管理人员来说是一件比较复杂的事情，存储，查询，借阅是必不可少的业务。因此，为方便对图书馆书籍、读者资料、借还书等进行高

8、效的管理，提高业务流程效率，让管理员从繁重的工作中解脱出来，使管理员在使用一个软件以后能极其容易地对所有图书进行管理，并且准确无误，轻松自如。因此开发一个图书馆管理系统软件是当务之急，也是本论文选题的重要意义和研究宗旨。总之，建立图书馆的计算机自动化管理系统，不但可以大大提高图书馆图书流通率，而且推动了社会文化生活的进步。1.2 开发工具在确定了操作系统后，就该选择开发工具了。经过了综合的比较而且最重要的是本人在学校期间学习的就是Visual Basic。这个是个数据库管理系统，系统，所以我们必须得选一个合适的数据库。考虑到我这个系统。对的用户，已经价格方面的考虑，完全可以使用Access来进

9、行开发，而且我在使用Visual Basic的时候，操作数据库方面使用的是微软提供的数据访问接口，先我们来了介绍一下Visual Basic以及微软提供了哪些数据库访问方法，并且各自都有什么特点。1.3 开发软件Access的介绍本系统采用Microsoft access技术建立数据库，使用VB技术建立数据源的链接，并且生成图书管理的数据库应用程序从而实现数据库的管理功能。Access数据库管理系统是Microsoft Office套件的重要组成部分，适用于小型商务活动，Access不仅是一个数据库，而且它具有强大的数据管理功能，它可以方便的利用各种数据源，生成窗体（表单），查询，报表和应用程

10、序等。Access是一种关系数据库，关系式数据库由一系列表组成。表与表之间可以建立关系，以便查询相关联的信息。1.4 开发软件Visual Basic 6.0 的介绍首先，我们还从Visual Basic这个名字开始，来认识这个软件。所谓“Visual”指的是开发图形用户界面 (GUI) 的方法。它不需编写大量的代码去描述界面元素的外观和位置，而只要把预先建立的对象添加到屏幕上的某一位置即可。如果已使用过诸如 Paint 之类的绘图程序，则实际上已掌握了创建用户界面的必要技巧。“Basic”指的是 BASIC (Beginners All-Purpose Symbolist Instructi

11、on Code) 语言，一种在计算技术发展历史上应用得最为广泛的编程语言。Visual Basic 在原有 BASIC 语言的基础上进一步发展，至今包含了数百条语句、函数及关键词，其中很多和 Windows GUI 有直接关系。专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。Visual Basic 不仅是 Visual Basic 编程语言。Visual Basic 编程系统和 VBA 都使用这一语言。Visual Basic Scripting Edition (VBScript) 是广泛使用的脚本

12、语言，它是 Visual Basic 语言的子集。这样，在学习 Visual Basic 中得到的经验可应用到所有这些领域中。此外，Visual Basic在数据开发方面提供了十分强大的功能。有自带的数据管理器（Data Manager）、数据控件（Data Control）及数据访问对象(DAO)等一系列功能强大的工具来协助管理人员轻松地进行与数据库的连接和管理。2 数据库系统设计 给本图书管理系统数据库模式定义了数据库的结构、表、关系、域和业务规则。 数据库模式是一种设计，数据库和应用正是建立在此基础上的。域是一列可能拥有的值的集合。必须为每一个表的每一列确定域。除了数据的物理必填字段外，

13、还需要确定是否有些域对表来说是唯一的。计算机管理系统图书管理系统数据库模式的最后一个要素是业务规则，它是对需要反映在数据库和数据库应用程序中的业务活动的允许空字符串。业务规则是模式的一个重要部分，因为他们指定了无论什么数据变化到达DBMS引擎，允许的数据值必须满足的允许空字符串。不管无效的数据变化请求是来自窗体的用户、查询/修改请求还是应用程序DBMS都应该拒绝。遗憾的是，不同的DBMS产品用不同的方法实施业务规则。在某些情况下，DBMS产品不具备实施必要业务规则的能力，必须以代码形式把它们编入应用程序。2.1 数据库及其应用自20世纪70年代以来，数据库技术得到迅速发展。目前世界上已经有数百

14、万个数据库系统在运行，其应用已经深入到社会生活的各个领域，从企业管理，银行管理，资源管理，经济预测一直到信息检索，档案管理，普查统计等。我国20世纪90年代初在全国范围内装备了12个以数据库为基础的大型计算机系统，这些系统分布在邮电、计委、银行、电力、铁路、气象、民航、情报、公安、军事，航天和财税等行业。现在，数据库技术还在不断发展，并且不断的与其它计算机技术相互渗透。数据库技术与网络通信技术相结合，产生了分布式数据库系统。数据库技术与面象对象技术相结合，产生了面向对象数据库系统等各种数据库系统。 在人类迈向21世纪知识经济的时候，信息变为经济发展的战略资源，信息技术已成为社会生产力重要的组成

15、部分。人们充分认识到，数据库是信息化社会中信息资源管理与开发利用的基础。对于一个国家，数据库的建设规模，使用水平已成为衡量该国信息化程度的重要标志。因此，数据库的学习是非常重要的。2.2 数据库系统数据库系统本质上是一个用计算机存储记录的系统。数据库本身可被看作为一种电子文件柜：也就是说，它是收集计算机数据文件的仓库或容器。系统用户可以对这些文件执行插入数据、检索数据、更改数据、删除数据等一系列操作。 总之，数据库系统是一个计算机存储记录的系统，即，它是一个计算机系统，该系统的目标存储信息并支持用户检索和更新所需要的信息。2.3 数据库设计概述计算机信息系统以数据库为核心，在数据库管理系统的支

16、持下，进行信息的收集、整理、存储、检索、更新、加工、统计和传播等操作。对于数据库应用开发人员来说，为使现实世界的信息流计算机话，并对计算机话的信息进行各种操作，就是如何利用数据库管理系统、系统软件和相关硬件系统，将用户的要求转化成有效的数据结构，并使数据库结构易于实现用户新的要求的过程。确切的说，数据库设计是指对于一个给定的应用环境，提供一个确定最优数据模型与处理模式的逻辑设计，以及一个确定数据库存储结构与存取方法的物理设计，建立起既能反映现实世界信息和信息联系，满足用户数据要求和加工要求，有能被某个数据库管理系统所接受，同时能实现系统目标，并有效存取数据的数据库。3 需求分析 需求分析阶段确

17、定的系统逻辑模型是以后设计和实现目标系统的基础，因此必须准确完整地体现用户的要求。在这一章里，我将给出系统的数据流图，功能结构图，数据字典，为系统的设计奠定基础。3.1 图书管理现状随着计算机技术的飞速发展，其应用方面已渗透到社会生活的各个领域。它已经成为我们学习和工作的得力助手。在学校，尤其是在一些高校，图书是学校的一项重要资源，图书的管理也是学校的一项常规性的重要工作。而长期以来，学生图书管理都是依赖人工进行的。现今，由很多学校都已经开始使用计算机进行图书信息管理，并且起得良好的效果。近年来我校招生情况越来越好，所以图书管理工作越来越繁重，但由于种种原因，管理人员并没有增加，因此原有的人工

18、管理工作已不能适应现行的工作需要。同时，陈旧的人工管理也不利于推广计算机应用。为使图书管理工作科学化、规范化，就必须使用计算机辅助管理。3.2 可行性分析为了对问题进行研究，以最小代价在最短的时间内确定问题是否可解，经过对此项目进行详细调查研究，初拟本系统的实现报告，对软件开发中将要面临的问题及其解决方案进行初步设计及合理安排，明确开发目标。1) 技术可行性 本系统采用Visual Basic 6.0平台进行开发，它是一个集成于代码编写、运行、调试及发布等功能于一身的强大的开发环境。开发工程的效率非常高，环境也提供了自动代码生成机制，可以有效的减少代码编写量。基于VB的应用程序，对于程序的发布

19、也是十分的容易，因此，开发本系统在技术上完全可行。2) 经济可行性该系统成本主要集中在软件的开发上，当系统投入使用后可以为图书馆管理部门节约大量的人力、物力。同时该系统也实现了开放性图书馆管理的现代化管理模式，达到充分利用管理资源，进行科学和规范化管理，提高了管理人员的素质和工作质量。它所带来的效益远远大于系统软件的开发成本，在经济上完全可行。3) 操作可行性在设计系统的过程中，充分考虑到管理人员和学生的习惯。界面风格使用简单大方形式呈现。使用方便，而无需进行任何软件的安装，操作简单；按权限使用并提供多种查询手段，在操作上可行。3.3 系统的数据字典数据字典的作用是在软件分析和设计的过程中给人

20、提供关于数据的描述信息。数据流图和数据字典共同构成系统的逻辑模型，没有数据字典数据流图就不严格，然而没有数据流图数据字典也难于发挥最用。只有数据流图和数据流图的精确定义放在一起，才能共同构成系统的规格说明。系统开发时，常用卡片的形式书写描述一个数据元素。下面给出本系统的主要数据元素的数据字典卡片：名字：读者信息查询报表别名：Personal描述：读者基本情况查询结果的信息表定义：读者信息查询报表=ID+借书证号+姓名+班级+部门+职称+罚款登陆借书证名字：图书信息查询报表别名：Book描述：各种书籍查询基本信息表定义：图书信息查询报表=ID+图书编号+书名+价格+类别+出版社+借出日期+是否借

21、出3.4 数据流程图数据流程图是描述实际业务管理系统工作流程的一种图形表示法。她描绘系统的逻辑模型图，其中没有任何具体的物理元素，只是描绘信息在系统中流动和处理的情况。因为数据流图是逻辑系统的图形表示，即使不是专业的计算机技术人员也容易理解，所以是极好的通信工具。此外，设计数据流图只需考虑系统必须完成的基本逻辑功能，完全不需要考虑如何具体地实现这些功能，所以它是软件设计的很好的出发点。图书管理系统主要是为了对图书、读者基本信息等进行计算机管理。下面就是对各个功能模块的流程分析：1、图书类别管理基本信息流程：分析：图书类别基本信息的流动首先是以图书类别的编号为依据，来达到添加、修改、查询图书类别

22、记录。同时，也对数据库中的图书类别表的编号进行检查。2、图书信息管理基本信息流程：分析：图书基本信息的流动首先是以图书编号为流动方向的依据，来达到添加、修改、记录、删除图书记录。为了数据的一致性，进行这些操作的同时，也对数据库中的记录进行检查，检查是否有重复的记录。如有则不能进行添加。3、读者信息管理基本信息流程：分析：读者基本信息的流动首先是以读者的编号为依据，来达到添加、修改、查询、删除读者信息的记录。同时，也对数据库中的读者信息表的编号进行检查。4、借书管理基本信息流程：分析：借书管理基本信息的流动首先是以借阅编号为流动方向的依据，来达到添加、查询借书记录。为了数据的一致性，进行这些操作

23、的同时，也对数据库中的记录进行检查，检查是否有重复的记录。如没有则可进行添加。整个借书过程如图3-1所示：NYYN登陆借书证输入要借图书的有关信息EXIT是否借出借书成功退出借书失败图3-15、还书管理基本信息流程：分析：借阅管理部分是实现对个部分数据内容的添加和查询操作，在借阅信息中包括图书编号、价格、图书类别、书名、出版社、借出日期、今天日期、限定天数、借出天数、超出天数和罚款金额。并通过添加功能来达到借阅信息表的数据的更新，通过查询可使管理员很快的了解借阅信息，从而避免书籍的丢失现象产生。通过上面对各个模块流程的分析，那么我们就不难对整个系统的大致流程有一个全面的认识。设计时采用了常用的

24、自顶向下的瀑布式结构化设计方法。各子系统具有独立的数据库结构，同时又有关键的关键字，这样系统做起来后就便于用户操作。图书管理系统的总体流程图如图3-2所示：管理员图书信息管理读者信息管理借阅管理读者添加图书信息修改图书信息添加读者信息修改读者信息借出图书图书归还数据库登陆图3-24 系统的概念 概念设计阶段主要任务和目标是根据需求分析的结果，包括一般联系实体，画出对应的ER图。对于复杂的系统，通常首先要对它的各功能模进行分析，然后再把它的功能结构图画出来，便是设计和优化。功能分析之后，再根据各个岗位、各个用户对数据和使用权的不同要求作出局部ER图，然后再把各个局部ER图综合起来形成统一的整体E

25、R图。4.1 系统模块功能解析图书管理部分：包括图书信息管理和类别管理，其功能是实现对各部分数据内容进行添加、修改、查询等操作。各管理部分的明细如下：（1）图书信息管理：包括图书信息的添加、图书信息的修改、图书信息的查询和图书信息的删除四部分。其中，图书信息包括图书编号、书名、图书类别、作者、出版社、出版日期、登记日期以及是否已被借出。（2）图书类别管理：包括图书类别的添加、图书类别的修改、图书类别的删除三部分功能。其中，图书类别包括类别名称和列别编号俩部分。借阅管理部分：包括借书管理和还书管理，其功能是实现对各部分数据内容的添加和查询等操作。各管理部分的明细如下：（1）借书管理：包括添加借书

26、信息和查询借书信息2部分功能。其中，借阅信息包括借阅编号、读者编号、读者姓名、图书编号、图书名称、出借日期和还书日期。（2）还书管理：实现添加还书信息功能。其中，还书信息与借阅信息部分明细相同。读者管理部分：包括读者信息管理和读者类别管理，其功能是实现对各部分数据内容的添加和修改、删除等操作。各管理部分的明细如下：（1）读者信息管理：包括读者信息的添加、读者信息的修改、读者信息的查询和读者信息的删除四部分功能。其中，读者信息包括读者姓名、读者编号、性别、读者类别、工作单位、家庭住址、电话号码、登记日期和已借书数量。系统管理部分：包括修改系统用户密码、增加新用户和退出系统三项功能。系统初始设置一

27、个超级用户名和密码，操作人员可以利用这个超级用户名和密码登陆，之后，可以设置其他的超级用户名称，也可以设置权限用户，同时也设置了这个用户可以使用的权限。帮助部分：包括系统设计前台和后台简概述等功能。运行本系统程序，首先出现登陆界面，输入正确的用户民和密码后才能进入主窗体。对主窗体上各个菜单的设置采用快捷键，便于用户更方便的应用该系统。4.2 系统功能结构图图书信息管理系统的系统功能结构图如图1所示。图书管理系统管理系统工具帮助图书分类添加新书编辑图书编辑借书证还书登陆查找设置关于退出图3-1 系统功能结构图4.3 系统ER图设计软件系统本质上是信息处理系统，因此，在软件系统的整个开发过程中都必

28、须考虑俩方面的问题“数据”及对数据的“处理”。为了把用户的数据要求清晰明确的表达出来，系统分析员通常建立一个概念性的数据模型。概念性数据模型是一种面向问题的数据模型，是按照用户的观点来对数据和信息建模，它描述了从用户角度看到的数据，它反映了用户的现实环境，且与在软件系统中的实现方法无关。这里我们运用最常用的表示概念性数据模型的方法，是实体联系方法即E-R模型。通常，软件系统中有许多数据是需要长期保存的。为减少数据冗余，简化修改数据的过程，实现对数据进化规范化。系统ER图如下：mmnn读者职称罚款姓名借书证号管理员姓名密码借阅图书编号书名借出日期是否借出管理mER图5 系统逻辑和物理设计5.1

29、系统数据库的具体实现根据上面的数据库ER图，现在需要将上面的数据库概念结构转化为Access 2000数据库系统所支持的实际数据模型，也就是数据库的逻辑结构。在上面的实体以及实体之间关系的基础上，形成数据库中的表格以及各个表格之间的关系。图书管理信息系统数据库中各个表格的设计结果如下面的几个表格所示。每个表格在表示数据库中的一个表。(1) 图书类别表：用于存储图书的类别。图书类别表如表-1所示：表-1 图书类别表（2）图书信息表：用于记录图书的基本信息。图书信息表如表-2所示：表-2 图书信息表(3)借阅信息表：用于存储借阅图书的信息，如借书证号、姓名、图书编号等信息。借阅信息表如表-3所示：

30、表-3 借阅信息表(4)用户信息表：用来存储用户的信息。用户信息表如表-4：表-4 用户信息表 （5）读者信息表：用来记录和存储操作读者的基本信息。读者信息表如表-5所示：表-5 读者信息表5.2数据库的维护由于应用环境不断变化，数据库运行过程中物理存储也会不断变化，对数据库进行调整，修改等维护工作是设计工作的继续和提高。对数据库进行经常性的维护工作主要包括：1、数据库的转储和恢复 针对不同的应用要求制定不同的转储计划，保证一旦发生事故能尽快将数据库恢复到某种一致的状态，尽可能减少对数据库的破坏。2、数据库的安全性、完整性控制 在数据库运行过程中由于应运环境的变化，对安全性的要求也发生变化，如

31、原来机密的数据现在可以公开查询了，新加入的数据又可能是机密的了。系统中用户的密级改变。这需要根据实际情况修改原有的安全性控制，可以设置数据库密码及用户权限。同样，数据库的完整性的约束条件也会变化，需要DBA不断修正。3、数据库性能的监督、分析和改造 利用Microsoft Access 2000 提供的检测系统性能参数的工具，在数据库运行过程中，监督数据进行分析，找出改进系统性能的方法，并做适当调整。4、数据库的重建及重构造 数据库运行一段时间后由于记录不断增、删、该，增添、修改的数据不能为空，否则不能保存到数据库中。是数据库的物理存储情况变坏，降低了数据的存取效率，数据库性能下降，这是DBA

32、要对数据库进行重组织，或部分重组织（只对频繁增、删的表进行重组织），可以利用Microsoft Access 2000 专门提供的数据重组织实用程序操作，按原设计要求重新安排存储位置、回收垃圾、减少指针链等，提高系统性能。 有些情况，如由于数据库应用环境发生变化，增加了新的应用或实体，取消了某些应用，有的实体与实体间的联系发生变化，则需要调整数据库的模式及内模式。5.3功能模块的实现5.3.1 登陆窗体的实现系统登陆窗体界面的运行效果如图5-1所示：图5-1登陆窗体主要代码如下：Dim Asc() As IntegerDim db As DatabaseDim rst As Recordset

33、Dim Rec As IntegerPrivate Sub cmdOkCancel_Click(Index As Integer)Dim i As Integeri = 0Select Case Index Case 0 If txtPass.Text = Or comPer.Text = Then MsgBox 请选择用户名或输入密码!, 0 + 48, 提示 txtPass.SetFocus Exit Sub End If If Val(txtPass.Text) = Asc(comPer.ListIndex) Then MsgBox 正确 Mainfrm.Show Unload Me E

34、lse MsgBox 密码错误,请重试！, 0 + 16, 错误 txtPass.SetFocus Exit Sub End IfCase 1 Unload MeEnd SelectEnd SubPrivate Sub Form_Load()Set db = Workspaces(0).OpenDatabase(DatabaseData.mdb, False)Set rst = db.OpenRecordset(Pass, dbOpenTable)rst.MoveLastRec = rst.RecordCountReDim Asc(Rec - 1)rst.MoveFirstFor i = 1

35、To Rec comPer.AddItem rst.Fields(名称) Asc(i - 1) = Val(rst.Fields(密码) rst.MoveNext If rst.EOF Then Exit ForNextcomPer.Text = txtPass.Text = End Sub5.3.2 系统主界面的实现系统主控平台采用简单、直观的布局，通过菜单和工具实现对系统各个模块的调用和对各个窗体的显示。设置状态栏用来显示当前日期、时间和当前用户信息等。系统主窗体界面的运行效果如图5-2所示：图5-2主窗体主要代码如下：Private Sub cmdOkCancel_Click(Index

36、 As Integer)Select Case Index Case 1 If rst3.Fields(是否借出) = True Then MsgBox 此书已经借出！, 0 + 48, 提示 txtBookBian.Text = txtBookBian.SetFocus Frame4.Visible = False Frame7.Visible = True Exit Sub End If rst2.AddNew rst2.Fields(图书编号) = rst3.Fields(图书编号) rst2.Fields(书名) = rst3.Fields(书名) rst2.Fields(价格) =

37、rst3.Fields(价格) rst2.Fields(出版社) = rst3.Fields(出版社) rst2.Fields(借出日期) = Date rst2.Fields(借书证号) = BookId rst2.Fields(姓名) = txtName.Text rst2.Fields(类别) = rst3.Fields(类别) rst2.Update rst3.Edit rst3.Fields(是否借出) = True rst3.Fields(借出日期) = Date rst3.Update DataRef txtBookBian.Text = txtBookBian.SetFocus

38、 CmdLogin.SetFocus Frame4.Visible = False Frame7.Visible = TrueEnd SelectEnd SubPrivate Sub CmdLogin_Click()loop1: 如果没有此证，返回LentLogin.Show (1)If LoginFlag ThenLV2.ListItems.Clearrst1.Seek =, BookId 查找借书证号码If rst1.NoMatch Then MsgBox 没有此借书证号码！, 0 + 48, 错误 LoginFlag = False GoTo loop1 返回loop1End Iftxt

39、BookId.Text = BookIdtxtName.Text = rst1.Fields(姓名) & vbNullStringtxtClass.Text = rst1.Fields(班级) & vbNullStringtxtDepart.Text = rst1.Fields(部门) & vbNullStringtxtZhiCheng = rst1.Fields(职称) & vbNullStringtxtFa.Text = rst1.Fields(罚款) & EmptytxtBookBian.Text = Frame4.Visible = FalseFrame7.Visible = True

40、txtBookBian.SetFocusDataRef 输出所借图书LoginFlag = FalseIf rst1.Fields(罚款) 0 Then If MsgBox(txtBookId & & txtName & 共计欠费 _ & rst1.Fields(罚款) & 元 是否从数据库中删除？, 4 + 48, 欠费) _ = vbYes Then 从数据库中删除欠费记录 rst1.Edit rst1.Fields(罚款) = 0 rst1.Update txtFa.Text = rst1.Fields(罚款) & Empty End IfElse 把罚款复制为0 rst1.Edit rst1.Fields(罚款) = 0 rst1.UpdateEnd IfEnd IfEnd Sub5.3.3 归还图书窗体的实现归还图书界面运行效果如图5-3所示：图5-3归还图书窗体的主要代