《图书借阅管理信息系统设计与实现(共34页).doc》由会员分享,可在线阅读,更多相关《图书借阅管理信息系统设计与实现(共34页).doc(34页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、精选优质文档-倾情为你奉上 本科毕业设计(论文)题目:图书借阅管理信息系统设计与实现 学生姓名: 学号: 系(部): 数学与计算机科学系 专业:计算机科学与技术 入学时间: 年 月导师姓名: 职称/学位: 导师所在单位: 图书借阅管理信息系统设计与实现摘 要图书管理系统是一些学校或单位不可缺少的部分,书籍是人类不可缺少的精神食粮,尤其对一些学校来说,尤其重要。所以图书管理系统应该能够为用户提供充足的信息和快捷的查询手段。但传统人工管理方式存在着许多缺点,如:效率低、保密性差,另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少的困难。图书馆管理系统是典型的信息管理系统(MI
2、S),其开发主要包括后台数据库的建和维护及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强.数据安全性好的库。而对于后者则要求应用程序功能完备,易使用等特点。本文针对目前中小图书借阅管理实际,从系统的开发背景、需求分析、设计原则及开发过程等方面进行了全面的阐述,采用Visual Basic6.0和SQL Sserver2000软件为开发工具,阐述了中小型图书管理软件中所应具有的功能及其设计与实现。本系统分用户登录、图书查询、借还图书,系统管理等四大功能模块。其中图书查询功能分为直接查询、多条件查询;系统管理则包括读者管理、图书分类管理、图书管理、逾期未还图书管理、管理员权限帐
3、户管理等。关键词:图书借阅管理系统;窗体;模块;Visual Basic6.0;Microsoft Access 2003Library Management Information System Design and ImpleMentationAbstractLibrary management system is an indispensable part of some schools or units, the book is an indispensable human spiritual food, especially for some schools, is especial
4、ly important. Library management system should be able to provide users with sufficient information and the quick inquiry method. However, the traditional manual management approach, there are many shortcomings, such as: low efficiency, poor security, the other over time, will produce a large number
5、 of files and data, for finding, updating and maintenance have brought a lot of difficulties. Library management system is a typical management information system (MIS), which mainly includes two aspects of the construction and maintenance of the back-end database and front-end application developme
6、nt. The former requirement to establish data consistency and integrity, data security for good. For the latter requires that the application fully functional, easy to use features. For small and medium-sized library management actual system development background, requirements analysis, design princ
7、iples and development process and other aspects of a comprehensive exposition, the Visual Basic6.0, and SQL Sserver2000, software development tools on small and medium-sized library management software should have the function of its design and implementation. The systems user login, book search, by
8、 also books, system management, and four functional modules. Book search functions are divided into direct queries, multi-criteria query; system management including reader management, the Book category management, library management, library management overdue account with administrator privileges
9、management.Keywords: library management system; forms; module; Visual Basic6.0; Microsoft Access 2003专心-专注-专业目 录引 言随着计算机技术的飞速发展,对知识的要求逐步升高,为了适应社会,不被高科技所淘汰,提高个人水平已势在必行。不论从网上,还是其他的一些资料上补充能量也好,都没有书本来得快,为了方便对各种书籍的管理,就出现了图书借阅管理系统,该系统能满足人们对图书的借阅功能,通过系统来实现图书的和种操作,减少了人力、物力,提高了办事效率,是现代人类不可缺少的资源。图书管理是一项琐碎、复杂而
10、又十分细致的工作。如果采用人工管理则需要庞大的人力资料,而且不能避免工作中一些小错误,甚至一旦出现了失误,就会影响整个图书管理工作的进度。如果采用科学的方法来管理,则可以有效的避免这种错误的产生,管理更方便,快捷,通过该系统,用户可以随时随地的采用自己喜欢的方式对现有图书进行浏览,进而确定自己有需要的知识源泉,更具有传统方式所无法比拟的高效率,采用人力来进行管理,不仅带来诸多不便,特别是图书数量及记录的事项不断增多,工作量成倍增长。不仅管理者耗资大,而且信息准确率低,更加难以满足及时记录、随时查询的需要。因此,传统的手工管理方式已很难满足人们的图书资源需求。然而计算机具有手工管理所无法比拟的优
11、点.例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。因此,用计算机管理代替传统的手工管理是必然的,也是科技发展决定了的。 该系统采用Visual Basic语言实现,数据库采用Microsoft Access 2003,系统能保证数据的实时更新,完成图书的借还功能,能实现前后台的交互。第一章 图书借阅信息管理系统概述1.1 图书借阅管理系统简介1.1.1 图书借阅管理系统的发展历史图书借阅管理系统的发展历史可以追溯到20世纪60年代末期。由于当时计算机技术已经进入实用阶段,同时大型图书馆用手工来查找图书信息或统计借阅信息既费时费力又非常容易出差错,为了解决这个矛盾,第
12、一代的图书借阅管理系统应运而生。当时由于技术条件和需求的限制,用户非常少,它的出现为图书借阅的管理展示了美好的前景,即用计算机的高速度和自动化来代替手工的巨大工作量,用计算机的高准确性来避免手工的错误和误差。第二代的图书借阅管理系统出现于20世纪70年代末。由于计算机技术的飞速发展,无论是计算机的普及性,还是计算机系统工具和数据库技术的发展,都为图书借阅管理系统的阶段发展提供了可能。但未能系统地考虑图书借阅的需求和理念。图书借阅管理系统的革命性变革出现在20世纪90年代末。随着信息爆炸、知识经济时代的到来,使个人、单位、社会对图书借阅管理系统有了更高的需求;同时由于个人电脑的普及,数据库技术、
13、客户/服务器技术,特别是Internet/Intranet技术的发展,使得第三代图书借阅管理系统的出现成为必然。第三代图书借阅管理系统的特点是从图书借阅管理的角度出发,用集中的数据库处理几乎所有与图书借阅相关的数据。友好的用户界面,强有力的报表生成工具、分析工具和信息的共享使得图书借阅管理人员得以摆脱繁重的日常工作,集中精力从战略的角度来考虑图书借阅规划和政策。1.1.2 图书借阅管理相关软件简介近几年来,国内外与图书借阅管理有关的系统和程序的发展都非常迅速,众多的软件有如雨后春笋般地不断涌现。这些软件尽管各有特点,但从功能上来分析,大致可分为如下两种:基于web的Internet/Intra
14、net模式的图书管理程序,如各个国家的国家级的图书馆,大部分都建成了这种类型的图书管理系统,供公众使用。单位内部的图书管理系统,可以采用基于web的程序,也可采用单机程序。1.2.3 不顾实力自己开发图书借阅管理系统将现代图书借阅管理的理念和计算机技术有效地集合起来,从长远、系统和发展的眼光进行全面的系统分析和设计并不是一件轻而易举的事情。而且用于维护、文档编写、调试和排错等所花费的人力物力财力也远远超过购买商品化软件所需的成本。1.2 系统开发所用的技术准备1.2.1 系统运行环境硬件环境: 表1.1 硬件环境内容最低配置建议配置主机Intel 赛扬双核 E3200Intel 酷睿 i3内存
15、1G2G硬盘320GB500GB显示器AOC以上软件环境:操作系统:Windows XP中文版编程软件和数据库:Visual Basic6.0中文版+Access2000中文版1.2.2 开发工具1. VISUAL BASIC6.0概述VISUAL BASIC是微软公司出品的一个快速可视化程序开发工具软件。借助微软在操作系统和办公自动化软件的垄断地位,VB在短短的几年内风靡全球。VB是极具特色和功能强大的软件,主要表现:所见即所得的界面设计,基于对象的设计方法,极短的软件开发周期,教易维护的代码。同时众多的ACTIVE控件,提高了软件的使用效率。VB应用程序语言的基本特点:1)可视化界面设计:
16、VB为用户提供大量的界面元素(在VB中称为控件对象),这些控件对象对于熟悉WINDOWS应用程序的用户来说是一点也不陌生,如“窗体”,“菜单”,“命令按扭”,“工具按扭”,“检查框”等等,用户只要利用鼠标、键盘把这些控件对象拖动到合适的位置,设置其大小、形状、属性等,就可以设计出所需的应用程序界面。2)事件驱动编程在使用VB设计应用程序是,必须首先确定应用程序如何同用户进行交互。例如发生鼠标单击、键盘输入等事件是,由用户编写代码控制这些事件的响应,这就是所谓的事件驱动编程。3)与数据库的连接性VISUAL BASIC提供了与底层数据库系统紧密的连接。 VISUAL BASIC支持不同的关系数据
17、库管理系统并充分发挥每一个数据库的特长。开发人员和利用内置的高性能数据库引擎JET生成独立应用或脱离服务器运行的服务以上的应用,在开发该图书馆管理系统时,笔者就是使用该种数据库引擎。VISUAL BASIC存取数据库的方式有两种: 通过使用的ODBC接口。(ODBC(开放数据库连接)是微软公司的数据库连接标准)通过使用由VISUAL BASIC提供的专用的直接与数据库相连的接口2.Access简介数据库选用Microsoft公司的Access产品作为数据库应用程序。目前的Access 2000是Microsoft强大的桌面数据库平台的第六代产品,是3 2位Access的第三个版本。Access
18、有以下一些基本定义:数据库是一个包含各种Access “对象”(表、查询、窗体、报表、宏和模块)的文件,Access中所有工作都是建立在此基础之上的。表是存放数据的容器,被设计成行和列的格式,就像电子表中的那样。每一列叫做一个“字段”,包含特定类型的信息,如姓名或学历。每一行称为一个“记录”,包含与单个实体有关的所有信息,如某个员工的姓名、性别、所在部门、学历等。对于像Access这样的关系数据库管理程序,一个数据库通常包含几个存放相关数据的不同表。查询是一个Access对象,它询问数据库中有关数据的问题。根据设计方法的不同,查询能够在数据库中检索并组合来自不同表的数据。例如,可以设计一个查询
19、来告知在公司中工作超过1年的职员有多少。查询还可以对一组数据执行操作,如更新或删除某组记录。窗体是一个窗口,它提供一种很方便的途径来查看数据库中已有记录或向数据库中增添新记录。在Access中,可以创建一个窗体,用来同时查阅单个表或多个表中的数据,还可以打印和显示窗体。报表是一个Access对象,设计来显示数据,其作用类似于窗体,但主要是用于数据打印,不能输入数据。 页是一种特殊类型的窗体,它使用户能够利用Web浏览器查看和编辑Access的表。宏用来保存Access中的一系列操作。可自动执行一些日常的任务,以便简化在Access中的工作。 模块是用Visual Basic for Appli
20、cations(VBA) 编写的过程,VBA是Access的基础程序设计语言。利用VBA可以编写程序代码来完成Access宏所不能完成的特定任务。1.2.3 系统开发方法的选择建立一个信息系统,是一项复杂的软件工程的实施。近30年来,软件工程发展成为新科学,至今已经成为软件产业的重要支柱。多年来被人们沿用的手工作坊的软件开发方法,在软件产品的开发效率和产品质量、成本等方面都无法满足需求。20世纪60年代末期开始出现“软件危机”后,人们开始寻找新技术来指导软件的开发。1968年,首先提出了“软件工程”这一名称。80年代以来,国际社会的信息化浪潮一浪高过一浪,管理信息系统建设需求紧迫,已有的信息系
21、统建设方法不能满足日益增长的系统建设的需要。70年代以来系统建设的主流方法结构化生命周期法遇到一系列挑战,主要问题是手工操作多、工作效率低、开发周期长、应变能力弱,不能对用户需求的变更和环境的变化做出迅速反应。所以软件工程思想经过人们的归纳和整理,又提出了许多工程方法,如原型法、企业系统规划法、战略数据规划法等。结构化生命周期法简介 结构化生命周期法是一种传统的管理信息系统开发方法。其基本思路是把整个系统开发过程分成若干阶段,每个阶段进行若干活动,每项活动应用一系列标准、规范、方法和技术完成一个或者多个任务,形成符合给定规范的产品。结构化生命周期法的主要原则,归纳起来有以下四条:用户参与的原则
22、先逻辑后物理的原则自顶向下的原则工作成果描述标准化的原则其开发大致分为以下四个阶段:系统规划:主要目标是制订系统的长期发展方案,决定系统在整个生命周期内的发展方向、规模和发展进程。系统开发a、系统分析b、系统设计c、系统实现系统运行及维护系统评价原型法简介原型法的基本思路是用户与系统分析、设计人员合作,根据用户提出的最基本的问题和想法,先很快建立一个应用软件的骨架,作为应用开发的实验模型,这个实验模型叫做系统原型。用户先运行这个原型系统,熟悉它,使用它,受到启发并取得经验,然后对系统的目标和功能提出精确、具体的要求,在对系统的需求最后决定后,再用传统的方法建设系统,通常原型系统的部分程序可以在
23、后来的系统建设中直接采用。该方法是传统方法和用户开发相结合的方法。建立一个管理信息系统的原型可分四步进行:明确用户基本信息需求建立初始的原型系统使用原型系统,进一步明确用户需求修改和完善原型系统快速原型法的开发过程可分为快速分析、构造模型、运行模型、评价模型、改进模型等。本系统开发方法选择基于上述两种开发方法的优劣,本系统利用软件工程思想和方法,总体上是采用结构化生命周期法从上而下地进行系统分析和设计的,但系统实现等步骤采用了自下而上的快速原型法。第二章 图书借阅管理系统分析2.1 系统初步调查绝大多数管理人员已经认识到采用图书借阅管理系统的必要性,纷纷开发或选购适合本企业特点的图书借阅管理系
24、统。图书借阅管理系统具体有以下优点:(1)采用图书借阅管理系统,可以用集中的数据库将与图书借阅管理相关的信息全面、有机地联系起来,有效的减少了信息更新和查找中的重复劳动,保证了信息的相容性,从而大大地提高了工作效率。(2)图书借阅管理系统有着易访问、易查询的数据库。在没有采用和实施图书借阅管理系统之前,当管理人员要统计数字时,往往依赖于某个人或某些人来获取。这种依赖于人的过程往往会因为花费的时间较长或某个人不在办公室而不能及时完成。在采用和实施图书借阅管理系统之后,就会将依赖于人的过程改为依赖于计算机系统的过程。管理人员只要获取了相应的权限,就可以随时进入系统,直接查阅相应的信息。实施了图书借
25、阅管理系统之后,不仅可以得到较为全面的、详细的、未经过过滤的第一手图书借阅信息,还可以从这些信息中得到某些有用的决策信息及灵感和启发,从而改进图书馆的管理及经营效率,避免或减少经营风险。(3)采用和实施图书借阅管理系统不仅仅是为了提高工作效率。应该看到,在实施图书借阅管理系统之后,可提高单位的形象。2.2 系统可行性分析对业务系统的可行性分析可以衡量系统的好坏。可行性分析是根据各种有效的方法和程序,对拟建系统技术的适应性、先进性、经济合理性和收益率以及项目的实施进行深入分析,确定一个目标,并提出相关问题制定计划和项目评估,从而提供了科学决策依据。事实上,可行性分析的一个主要工程有任何实施前必须
26、进行的工作。确保正确使用这些资源,避免造成浪费是十分必要的,也是项目一旦上手后能顺利进行的必要保证。可行性分析实质上是要进行一次大的简化压缩系统分析和设计过程。一般来说,应该从技术可行性、运行可行性、经济可行性等研究。2.2.1技术可行性衡量一个系统的技术可行性,一般可以从软硬件性能需求、系统的开发与实施、系统的架构等方面着手。对当前时代的计算机硬件要求已不再是瓶颈,所以在硬件方面是可行的。本系统选择了成熟稳定的VB6.0和Access 2003作为开发工具,其在可用性、可靠性、安全性等方面都是不可置疑的,因此在软件开发方面是可行。而对于B/S、C/S开发模式,国内已有很多先例,所以框架方面也
27、是可行的。总的来说,计算机技术的高速发展和计算机硬件性能的快速提升,使计算机全面应用于图书借阅系统管理的各个环节不再是空想。2.2.2运行可行性随着时代的进步,信息技术的普及,人们对计算机等电子设备已经不再陌生,并且可以很好的使用计算机来进行各种社会和商业活动。伴随着市场运作的规范和相应政策法规的完善。用计算机来进行各种信息处理已经是必然的趋势。而开发图书借阅管理系统可以提高图书借阅、查询等效率,可以降低图书借阅管理运行成本以提高经济效益。经过以上分析,图书借阅管理系统在运行方面是可行的。2.2.3经济可行性一个系统的经济效益关系的系统的开发费用、运行费用以及日后的维护费用,而此系统可以使图书
28、的管理简便、快捷,与传统的手工操作相比,本系统可以减少不必要的复杂繁琐的手工操作,从而缩减不必要的开支、常年的人力开销,系统的经济效益是非常乐观的。经过以上分析,图书借阅管理系统在经济方面是可行的。第三章 系统设计3.1 软件模块结构设计3.1.1 系统方案确定通过对系统调研与分析,系统主要应完成的功能如下:书库信息管理、读者档案管理、借阅管理、还书管理、图书检索、系统维护。3.1.2 系统结构设计在系统功能分析的基础之上;得到如图3.1示的总体模块划分图:书籍类别添加书籍类别修改图书管理系统系统管理增加用户修改密码读者管理部分读者信息管理读者类别管理书籍管理部分书籍信息管理书籍类别管理书籍信
29、息添加书籍信息修改书籍信息查询书籍信息删除添加读者类别修改读者类别添加读者信息修改读者信息删除读者信息借阅管理部分借书管理还书管理查询读者信息借书信息修改借书信息添加借书信息查询还书信息查询还书信息添加还书信息修改图书类别表读者信息表书籍信息表借阅信息表图3.1 总体模块划分图3.2 数据库设计数据库(Database),是按照数据结构来组织、存储和管理数据的仓库,是用于查询的大量数据的存储区域。使用数据库可以带来许多好处:如减少了数据的冗余度,从而大大地节省了数据的存储空间,实现数据资源的充分共享等等。此外,数据库技术还为用户提供了非常简便的使用手段,使用户易于编写有关数据库应用程序。特别是
30、近年来推出的计算机关系数据库管理系统,操作直观,使用灵活,编程方便,功能强大,环境适应广泛,数据处理能力极强。数据库的设计是指对一个给定的应用环境,构造数据库模式,建立数据库及其应用系统,满足各种用户需求。作为信息资源开发、管理和服务的一种有效的手段,数据库技术的应用已越来越广泛,从小型的单项事务处理系统到大型的信息系统大都用先进的数据库技术来保持系统数据的安全性、完整性和共享性。对一个实际的系统来说,数据库表的设计在遵循数据库理论的同时,必须能用开发工具来实现用户在各方面提出的功能要求。3.2.1 概念结构设计 在系统的数据库设计中,先要对系统分析得到的数据字典中的数据存储进行分析,分析各数
31、据存储之间的关系,然后才能得出系统的关系模式。可以采用ER图的方法来进行数据结构分析。各分E-R图说明如下:(1)读者类别E-R图如图3.2所示:读者类别种类名称借书数量借书期限有效期限图3.2 读者类别E-R图(2)读者信息E-R图如图3.3所示:读者编号类别工作单位家庭住址电话号码登记日期已借书数量性别 图3.3 读者信息E-R图(3)借阅信息E-R图如图3.4所示:借阅信息借阅编号读者姓名书籍编号书籍名称借出日期还书日期读者编号图3.4 借阅信息E-R图书籍信息的E-R图如图3.5所示: 书籍信息书籍编号类别作者出版社出版日期登记日期是否被借出书名 图3.5 书籍信息的E-R图图书类别类
32、别名称类别编号图书类别的E-R图如图3.6所示:图3.6 图书类别的E-R用户表的E-R图如图3.7所示:用户表用户名密码权限 图3.7 用户表的E-R图3.2.2 本系统的实体联系(E-R)图为了使E-R图表示得更加清晰,现将分E-R图组合成实体及其属性图和实体及其联系图。如图3.8所示(实体的属性没有标出):读者书籍图书馆工作人员mn借阅借阅还书nm登记维护nmnm还书图3.8 实体及其属性图和实体及其联系图E-R图向关系模型转换的结果如下(带下划线的字段为此关系的码):读者类别表:类别名称,借书数量,借书期限,有效期限读者信息表:读者编号,性别,读者类别,工作单位,家庭住址,电话号码,登
33、记日期,已借书数量借阅信息表:借阅编号,读者编号,读者姓名,书籍编号,书籍名称,借出日期,还书日期书籍信息表:书籍编号,书名,类别,作者,出版社,出版日期,登记日期,是否被借出图书类别表:类别编号,类别名称用户表:用户名,密码,权限3.2.3 各表的物理结构如下读者类别表对于读书者类别表,字段名称、借书数量、借书期限、有限期限等。在数据库中建立一个读书者类别表,用来记录所有的借阅者的信息。在刚刚建立的数据库中建立一个表,其字段结构如图 3.1 所示,需要注意的是该表的主关键字( PrimaryKey, PK )为种类名称,唯一标志一条的主关键字( PrimaryKey, PK )为种类名称,唯
34、一标志一条记录。图3.9 读者类别读者信息表对于读者信息表,字段名称应该为读者姓名、读者编号、性别、读者类别、工作单位、家庭住址、电话号码、登记日期和已借书数量。在数据库中建立一个表,如图 3.2 所示。主要的钥匙, PK ),唯一标识了一条记录的其中读者编号为该表的主关键字。图3.10 读者信息借阅信息表对于借阅信息表,字段名称应该为借阅编号、读者编号、读者姓名、书籍编号、书籍名称、借书日期和还书日期。具体设置如图3.3所示。图3.11 借阅信息书籍信息表对于书籍信息表,字段名称应该为图书编号、书名、图书类别、作者、出版社、出版日期、登记日期及是否已被借出。具体设置如图3.4所示。图3.12
35、 书籍信息图书类别表对于图书类别表,字段名称应该为类别名称和类别编号。具体设置如图3.5图3.13 图书类别用户表结构如图3.6所示:图3.14 用户第四章 图书借阅系统的实现4.1、连接数据在Visual Basic环境下,选择“工程”“引用”命令,在随后出现的对话框中选择“Microsoft ActiveX Data Objects 2.6 Library”,然后“单击”确定按钮,如图4.1所示图4.1 引用ADO连接数据库在程序设计的公共模块中,先定义ADO连接对象。语句如下:Public conn As New ADODB.Connection 标记连接对象然后在子程序中,用如下的语句
36、即可打开数据库:Dim connectionstring As Stringconnectionstring = provider=Microsoft.Jet.oledb.4.0; & data scoure=book.mdbconn.Open connectionstring4.2、设置ODBCVB的ADO对象是通过ODBC来访问数据库,所以还要建立ODBC数据引擎接口。打开控制面板中的“管理工具”“数据源”(ODBC),出现如图4.2所示的对话框。图4.2 ODBC对话框单击“添加”按钮,出现“创建新数据源”对话框,如图4.3所示。 图4.3 创建新数据源对话框选择Microsoft Ac
37、ess Driver(*.mdb),单机“完成”按钮,出现如图4.4所示对话框。图4.4 设置连接数据源 在“数据源名”文本框中添加一个名字,单击“确定”按钮完成系统默认连接设置。然后在ODBC对话框中单机“确定”按钮完成ODBC设置。4.3 界面设计4.3.1 创建主窗体 首先创建一个工程,命名为图书借阅管理系统,选择“工程”“添加MDI窗体”命令,则在项目中添加了主窗体。该窗体的一些属性如表5.1所示。表4.1 主窗体属性值属性属性值Caption图书借阅管理系统NameMainMenuMainmenu1WindowstateMaxsizeWindowstate的值为Maxsize,即程序
38、启动之后自动最大化。登录窗体如图4.5所示:图4.5 登录窗体主窗体如图4.6所示图4.6主窗体4.3.2 创建各子窗体选择“工程”“添加窗体”命令。添加子窗体。在新建Visual Basic工程时自带的窗体中,将其属性MIDChild改成True,则这个窗体成为MID窗体的子窗体。所有子窗体系统管理子窗体图4.7 系统管理子窗体增加用户子窗体图4.8 增加用户子窗体修改密码子窗体图4.9修改密码子窗体图书类别子窗体图4.10 图书类别子窗体书籍信息子窗体图4.11 书籍信息子窗体借阅信息子窗体图4.12 借阅信息子窗体读者信息子窗体图4.13 读者信息子窗体读者类别子窗体图4.14读者类别子
39、窗体4.4 各子窗体代码4.4.1图书登记子窗体代码按钮控件要求先填写基本信息,然后与数据库信息比较。Private Sub Command1_Click()On Error GoTo adderrText1.SetFocusAdodc1.Recordset.AddNewExit Subadderr:MsgBox Err.DescriptionEnd SubPrivate Sub Command2_Click()On Error GoTo deleteerrWith Adodc1.RecordsetIf Not .EOF And Not .BOF ThenIf MsgBox(删除当前记录吗?,
40、 vbYesNo + vbQuestion) = vbYes Then.Delete.MoveNextIf .EOF Then .MoveLastEnd IfEnd IfEnd WithExit Subdeleteerr:MsgBox Err.DescriptionEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF ThenMsgBox 这是最后一条记录, vbOKCancel + vbQuestionAdodc1.Recordset.MoveLastEnd IfEnd SubP
41、rivate Sub Command4_Click()Adodc1.Recordset.MovePreviousIf Adodc1.Recordset.BOF ThenMsgBox 这是第一条记录, vbOKCancel + vbQuestionAdodc1.Recordset.MoveFirstEnd IfEnd SubPrivate Sub Command5_Click()If Adodc1.Recordset.EOF ThenMsgBox 记录空, vbOKCancel + vbQuestionEndElseAdodc1.Recordset.MoveFirstExit SubEnd Su
42、bPrivate Sub Command6_Click()If Adodc1.Recordset.RecordCount = 0 ThenMsgBox 空记录, vbOKCancel + vbQuestionEndElseAdodc1.Recordset.MoveLastEnd IfEnd SubPrivate Sub Command7_Click()MDIForm1.Showfrmdengji.HideEnd Sub4.4.2增加用户子窗体代码窗体部分代码的思路是,收集输入的表中的字符串,然后与数据库中的系统的用户数据比较,如果不存在,则允许添加。Private Sub Command1_C
43、lick()Dim sql As StringDim rs_add As New ADODB.RecordsetIf Trim(Text1.Text) = ThenMsgBox 用户名不能为空, vbOKOnly + vbExclamation, Exit SubText1.SetFocusElsesql = select * from 系统管理rs_add.Open sql, conn, adOpenKeyset, adLockPessimisticWhile (rs_add.EOF = False)If Trim(rs_add.Fields(0) = Trim(Text1.Text) ThenMsgBox 已有这个用户, vbOKOnly + vbExclamation, Text1.SetFocusText1.Text = Text2.Text = Text3.Text = Combo1.Text = Exit SubElsers_add.MoveNextEnd IfWendIf Trim(Text2.Text) Trim(Text3.Text) ThenMsgBox 两次密码不一致, vbOKOnly + vbExclamation, Text2.SetFocusText2.Text = Text3.Text =
限制150内