图书馆管理系统毕业论文

1、西安文理学院学院毕业论文图书馆系统毕业设计（论文）专 业: 班 级: 姓 名: 学 号: 指导教师: 站 点: 摘 要本文有的地方借鉴了其他一些优秀的教材或专著图书管理工作规范化，系统化，程序化，避免图书管理的随意性，提高信息处理的速度和准确性，能够及时、准确、有效的查询和修改图书情况。关键词：VB、Access 、客户端模块设计等。 目 录引  言1第一章、诸论21.1开发目的、背景与意义21.2可行性分析21.3系统概述31.4开发工具简介31.5 Visual Basic 系统在程序应用中不常用的名词4第二章、系统概要设计52.1系统设计分析52.2权限分析6第三章、系统数据结

2、构设计63.1各表的物理结构7第四章、系统详细设计及实现84.1主页面84.2登陆界面114.3注册页面 124.4借书页面 154.5还书页面164.6琐碎收录17第五章、实施概况185.1系统测试 195.2 系统运行与维护19结 论20参考文献21引言人类有几千年的历史，计算机从产生到现在只不过50多年，而网络的迅速发展也不过10年的时间。但是，计算机和网络对社会的影响已经迅速扩大，甚至在改变人们的生活。特别是90年代以来，多媒体和网络技术的飞速发展正在以惊人的速度改变着人们的工作方式、交往方式和生活方式。正像著名的未来学家尼葛洛庞帝（1997）所说的：“数字不再只和计算有关，它决定我们

3、的生存。”科学技术是第一生产力，是最先进的生产力。尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息而设计的。图书馆作为一种信息资源的集散地，图书和用户借阅资料繁多，包含很多的信息数据的管理，现今，有很多的图书馆都是初步开始使用，甚至尚未使用计算机进行信息管理。根据调查得知，他们以前对信息管理的主要方式是基于文本、表格等纸介质的手工处理，对于图书借阅情况（如借书天数、超过限定借书时间的天数）的统计和核实等往往采用对借书卡的人工检查进行，对借阅者的借阅权限、以及借阅天数等用人工计算、手抄

4、进行。数据信息处理工作量大，容易出错；由于数据繁多，容易丢失，且不易查找。总的来说，缺乏系统，规范的信息管理手段。尽管有的图书馆有计算机，但是尚未用于信息管理，没有发挥它的效力，资源闲置比较突出，这就是管理信息系统的开发的基本环境。 第一章 绪 论1.1 开发目的、背景与意义图书馆数据处理手工操作，工作量大，出错率高，出错后不易更改。图书馆采取手工方式对图书借阅情况进行人工管理，由于信息比较多，图书借阅信息的管理工作混乱而又复杂；一般借阅情况是记录在借书证上，图书的数目和内容记录在文件中，图书馆的工作人员和管理员也只是当时对它比较清楚，时间一长，如再要进行查询，就得在众多的资料中翻阅、查找了，

5、造成查询费时、费力。如要对很长时间以前的图书进行更改就更加困难了。基于这些问题，我认为有必要建立一个图书管理系统，使图书管理工作规范化，系统化，程序化，避免图书管理的随意性，提高信息处理的速度和准确性，能够及时、准确、有效的查询和修改图书情况。1.2 可行性分析可行性分析是在进行初步调查后所进行的对系统开发必要性和可能性的研究，所以也称为可行性研究。信息系统也应从技术可行性，经济可行性和社会可行性三方面来论证。通过长时间的观察与实践，我认为图书馆管理系统的可行性分析如下： 经济可行性分析作为图书馆这样的商业性质较小的场所，其经济成分比重相对较少，主要是支出的费用：其中包括设备购置费、软件开发费

6、用、管理和维护费、人员工资和培训费等。由于各个图书馆实行统一操作，系统共享，其设备购置，人员工资，维护费用相对较少，前期的资金投入主要集中于购置图书上。建立信息中心，可将来自各方面的信息集中管理，提高图书管理的计划性和预见性，快速地反馈市场信息。 技术可行性分析技术上的可行性分析主要分析现有技术条件能否顺利完成开发工作，硬件、软件配置能否满足开发者的需要，各类技术人员的数量，水平，来源等。图书馆管理系统的工作主要是在读者和图书馆之间架起一座桥梁，能相互沟通信息和处理信息。这一特点非常适合计算机特点，通过网络internet技术，发挥计算机的信息传输速度快、准确度高的优势。计算机硬件和软件技术的

7、飞速发展，为系统的建设提供了技术条件。 社会可行性分析社会可行性有时也称为操作可行性，主要论证新系统在企业或机构开发和运行的可能性以及运行后可能一起的对企业或机构的影响，即组织内外是否具备接受和使用新系统的条件。在当前信息技术飞速发展的大环境下，计算机技术和软件技术的更新是图书馆完全有可能也有能力采用这样先进的管理技术。它对图书馆带来的影响可以看到：（a）对传统管理理念的冲击，可能引起管理层的变动和人员的调整。（b）对图书馆工作人员的要求提高，使图书馆在一定的可能下进行机构精简，迫使工作人员继续学习新知识，拓宽图书馆在市场环境下的生存空间。对图书馆与读者之间业务方式的转变和扩充。1.3 系统概

8、述根据图书馆系统的特点，本图书馆管理系统的用户应该分为两类，即学生和管理员。 学生登录后可进行在线书籍查询、借阅历史查询、修改密码；管理员则主要负责用户及角色的管理、书籍信息修改、新书加入等。 根据初步的需求分析，系统功能应该主要包括在线查询、借换书登记、用户管理等。以下将按照不同的角色权限对功能进行具体描述： 对于学生身份而言，主要包括在线查询、借阅历史查询、超期催还、密码修改四大功能。 （1）在线查询：学生可以任选时间进行在线查询，找到自己需求的书籍信息。（2）借阅历史查询：学生可以在线查询以前借阅过的书籍。（3）超期催还：学生可以看到自己的借阅书籍是否超期。 （4）密码修改：学生可以自己

9、修改登录的密码。对于管理员而言，主要包括用户管理、书籍管理、新书添加、密码修改四大功能。 （1）用户管理：管理员可以添加、删除用户；对用户信息进行修改。（2）书籍管理：对已有的书籍进行信息修改。 （3）新书添加：添加新书。 （4）密码修改：对管理员的密码进行修改具体内容将在需求分析里详细介绍经过分析，我们使用MICROSOFT公司的VISUAL BASIC开发工具，利用其提供的各种面向对象的开发工具，尤其是数据窗口这一能方便而简洁操纵数据库的智能化对象，首先在短时间内建立系统应用原型，然后，对初始原型系统进行需求迭代，不断修正和改进，直到形成用户满意的可行系统。1.4 开发工具简介本系统的设计

10、是在Windows XP简体中文版操作系统环境下，使用Visual Basic 6.0中文版开发成功的。系统选用的数据库语言是Access相关介绍如下：Visual Basic是一种可视化的、面对对象和条用事件驱动方式的结构化高级程序设计，可用于开发Windows环境下的种类应用程序。它简单易学、效率高，且功能强大，可以与Windows的专业开发工具SDK相媲美，而且程序开发人员不必具有C/C+编程基础。在Visual Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的应用程序接口(API)函数，以及动态链接库(DLL)、动态数据交换(DDE)、对象的

11、链接与嵌入(OLE)、开放式数据访问(ODBC)等技术，可以高效、快速地开发出Windows环境下功能强大、图形界面丰富的应用软件系统。Access 的特点 新颖的、个性化的数据库界面设计 存储文件单一，一个数据库就一个.MDB文件存储文件单一，一个数据库就一个.MDB文件 不同版本的数据库共享 数据库对象设计简捷方便 关闭时压缩数据库 名称自动更正 示范数据库 子数据表 数据访问页 与Office Word、Excel的数据传递 Word、Excel的数据传递 与SQL Server协同工作 Server协同工作 很好的帮助功能 Access的启动 Access的启动启动Access 启动A

12、ccess ： 1）“开始”“所有程序” ）“开始” Microsoft Office 2）桌面快捷图标 Access的退出 Access的退出 四种方法： 单击Access右上角的“关闭”按钮； 单击Access右上角的“关闭”按钮； 选择“文件”菜单中的“退出”命令； 使用组合键AltF4； 使用组合键AltF4； 单击Access左上角的 图标，在弹出的菜单 单击Access左上角的 中执行“ 关闭”命令。 Access系统界面 Access系统界面 标题栏 菜单栏 工具栏 任务窗格 数据库窗口 菜单栏和工具栏： 菜单栏：7个菜单，包含了所有操作命令。 菜单栏：7个菜单，包含了所有操作命

13、令。 菜单栏最右侧是应答帮助的文本框； 工具栏：用竖线将不同主题的工具栏分隔开；当鼠标移 动到相应的工具按钮， 动到相应的工具按钮， 会有功能的提示；工具栏依数据 库窗口对象不同而变化。 通过 “ 视图 ” 库窗口对象不同而变化 。 通过“ 视图” ->“ 工具栏 ” ->“ 工具栏” 自定义” 用户可以决定显示哪些工具栏。 任务窗格： 三个按钮 单击可看 到下拉菜 单选择任 务，显示 也自动更 新 帮助搜索 数据库窗口：数据库窗口。由三部分组成：工具栏，对象、组 窗格和右侧页面 区域。有效使用Access帮助。有三个方法实现： 1 求助Office助手 选“帮助” | “显示Of

14、fice助手”打开Office助 手。 2 使用帮助文件 选择“帮助” 选择“帮助” | “Microsoft Office Access帮助” Access帮助” 命令，查看帮助文件。 命令，查看帮助文件。 或打开“帮助任务”窗格。或打开“帮助任务”窗格。 或按“ 或按“F1”键。 3 利用应答帮助 用“应答帮助”文本框。 应答帮助”文本框。Access的基本对象 Access的基本对象 Access通过各种对象管理信息，数据库对象有 Access通过各种对象管理信息，数据库对象有 七种：1、表（Table） 、表（Table） 2、查询（Query） 、查询（Query） 3、窗体1.5

15、Visual Basic 系统在程序应用中的几个常用名词Visual Basic 系统除了一般高级语言所具有的一些名词术语外，还有几个系统常用的名词。其基本含义如下：1）视窗（Form）视窗是进行人机交互的界面或接口，也叫窗体。VB系统的人机交互界面或接口，无论是在设计时或是在运行时，都是Windows 系统的标准视窗。2）对象 (Object)对象是VB系统内部提供给设计者可以直接使用的处理输出的控制工具。本程序所应用到的对象类型有标签框 (Label Box)，文本框 (Text Box)，命令按扭 (Command Button)，网格 (Data Grid)，ADO控件 (Adodc1

16、)等。当把这些工具放置到用户界面对应的窗体上时，被称为对象或控件。用户可以通过设置对象的“属性”和“方法”，便于对象适应自己所设计应用程序的输入输出内容，对象的生成过程及结构都被封装起来。正确使用对象可以减少程序和开发时间，提高程序设计者的工作效率。3）属性 (Properties)属性是VB系统提供的有关对象的参数或数据接口。用户通过适当地设置或改变对象的属性来确定对象的外观及性能特征，从而有效地使用系统提供的对象。比如，对象的名称、在屏幕上显示的位置、大小、颜色、接收或容纳的数据内容及数据的表现格式等。4）事件 (Events)事件是指用户或操作者对计算机进行的某一操作（如击键、单击或移动

17、鼠标等）的行为或系统状态发生的变化。VB系统常用事件来引导计算机执行一段程序。程序所用的键盘事件有KeyPress（按键）事件，KeyDown事件和KeyUp事件；鼠标事件有Click（单击鼠标）事件，DbDlicd（双击鼠标）。5）方法 (Method)方法主要是指对一个对象使用某种作用的过程。它是在程序执行的过程中要计算机执行的某种操作。其程序的方法有Show（显示）方法，Hide（隐藏）方法，Refresh（刷新）方法。6）过程 (Procedure)过程是指经过定义或说明的，或基于某一对象对应的事件所引发的程序段。7）模块 (Module)模块是指一些运算量或过程进行声明或定义的一个集

18、合。系统程序大体可分成三个模块：数据输入、根据查询和帮助。第二章 系统概要设计2.1 系统设计分析 根据系统的需求进行分析，本系统将包含三大板块：管理员板块、用户板块和特殊板块。管理员板块有：添加删除用户、增删书籍、查看用户使用情况，借还书管理；用户板块包括：申请账户、完善信息、看书记录、修改密码、搜书；特殊版块又包括：帮助、图书馆规则等。结构图如下：注册页面图书馆系统管理员管理辅助管理管理书籍账户管理修改信用看书记录填写信息查看用户使用情况修改密码图书馆股则用户管理帮助添加书籍删除书籍添加账户删除账户图2.2 权限分析权限有两种权限，管理员权限和用户权限，他们的账户申请上如果只是在登陆页面进

19、行设置的话会有很大的局限性，所以我一开始就把他们分开了，账户申请上只可以申请到普通用户，权限也就是可以修改密码、添加信息、查看看书记录、搜书；管理员账户是通过管理员开户的，同等级开户，只可以开管理员账户，（我预想的是管理员只要几个人就可以，如果再要划分的话还可以划分为初级管理和高级管理，高级可以实现所有的都开放，初级只是简单地借还书登记，书籍增删因为时间有限，功能暂未实现）他的权限是添加删除用户、增删书籍、查看用户使用情况，借还书管理。第三章 系统数据结构设计3.1各表的物理结构如下数据库链接如图所示： 图gly 管理员表字段名称字段长度类型备注yhm50文本用户名mm10文本密码xh20数字

20、学号qx2数字权限sjxxb书籍信息表字段名称字段长度类型备注bh50文本编号fl50文本分类shmc50文本书籍名称cbs50文本出版社jj50文本简介rksj12时间入库时间pscd50文本破损程度xsxxb学生信息表字段名称字段长度类型备注hszh50数字借书证号xh50数字学号xm10文本姓名bj50文本班级bzr10文本班主任jg50文本籍贯lxfs20数字联系方式bz50文本备注yhm50文本用户名jyjl借阅记录表字段字段长度类型备注bh50文本编号sjmc50文本书籍名称jszh50文本借书证号ydr50文本预订人jssj50日期/时间借阅时间hssc50日期/时间还书时间wg

21、qk50文本违规情况cfjl50文本处罚记录xyz信誉值表字段字段长度类型备注yhm50文本用户名xm50文本姓名xyd50文本信誉度第四章 系统详细设计及实现4.1 主页面主页面要先做一个菜单，菜单的基本作用有两个：一是提供人机对话的界面，以便让使用者选择应用系统的各个功能：二是管理应用系统，控制各种功能模块的运行。一个高质量的菜单程序，不仅能使系统美观，而且能使操作者使用方便，并可避免由于误操作而带来的严重后果。菜单可分为弹出式菜单和下拉式菜单，因为本系统不完善只做了下拉式菜单。Visusl Basic中菜单通过菜单编辑器，即菜单设计窗口建立。可以通过一下4种方式进入菜单编辑器：（1） 执

22、行“工具”菜单中的“菜单编辑器命令”。（2） 使用热键ctrl+E建（3） 单击工具中的“菜单编辑器”按钮。（4） 再要建立菜单的窗体上单击右键，将弹出一个菜单，单击“菜单编辑器”命令Private Sub bz_Click() 单击“帮助”时打开Form14即帮助界面Form14.ShowEnd SubPrivate Sub ckyh_Click()单击“查看用户”时打开Form14即管理员查看用户界面Form12.ShowEnd SubPrivate Sub Form_Initialize() 检测权限，如果权限等于1 打不开glygl和If 权限 = 1 Then tjsjglygl.E

23、nabled = Falsetjsj.Enabled = FalseEnd IfIf 权限 = 0 Then 如果权限=0打不开yhgl下拉列表yhgl.Enabled = FalseEnd IfEnd SubPrivate Sub ggxy_Click()单击“更改信用”时打开Form2即管理员更改信用界面Form2.ShowEnd SubPrivate Sub hsym_Click()单击“还书页面”时打开Form15即还书界面Form15.ShowEnd SubPrivate Sub jsjm_Click()单击“借书页面”时打开Form10即借书界面Form10.ShowEnd Sub

24、Private Sub ksjl_Click()单击“看书记录”时打开Form8即用户情况界面form8.ShowEnd SubPrivate Sub qhzh_Click()单击“切换账户”时打开登陆页面登陆页面.ShowEnd SubPrivate Sub sczh_Click()单击“删除账户”时打开Form14即删除账户界面Form18.ShowEnd SubPrivate Sub sjxxck_Click()单击“书籍信息查看”时打开Form5即书籍信息查看界面Form5.ShowEnd SubPrivate Sub ss_Click()单击“搜书”时打开Form11即搜书界面For

25、m11.ShowEnd SubPrivate Sub tjsj_Click()单击“添加书籍”时打开Form17即添加书籍界面Form17.ShowEnd SubPrivate Sub tjzh_Click()单击“添加账户”时打开Form14即管理员添加用户界面Form4.ShowEnd SubPrivate Sub tsggzgl_Click()单击“规则”时打开Form13即规则界面Form13.ShowEnd SubPrivate Sub wsxx_Click()单击“用户信息完善”时打开Form9即用户信息完善界面Form9.ShowEnd SubPrivate Sub xgmm_C

26、lick()单击“修改密码”时打开Form7即修改密码界面Form7.ShowEnd SubPrivate Sub xstj_Click()单击“新书推荐”时打开Form6即新书推荐界面Form6.ShowEnd Sub如图： 图菜单编辑如图所示： 图4.2 登陆界面本界面的主要功能是为了对系统进行安全性管理，本系统的用户名和密码保存在gly表中，本系统根据不同的用户而设置了不同的权限。Private Sub Command1_Click()Set cn = New ADODB.ConnectionSet rs = New ADODB.Recordsetcn.Open "Provid

27、er=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db1.mdb;Persist Security Info=False"sql = "select * from gly where yhm='" & Text1.Text & "' and mm='" & Text2.Text & "'" 登图 录rs.Open sql, cn, 1, 1If rs.EOF = Tr

28、ue Then MsgBox "用户名错误，请重新输入"ElseIf rs.Fields(1) = Trim(Text2.Text) Then 权限 = rs.Fields(3) If 权限 = 0 Then MsgBox "您的账户是管理员权限" End If If 权限 = 1 Then MsgBox "您的账户是普通用户" End If Form1.Show Unload Me Else MsgBox "密码输入错误，请重新输入" End IfEnd Ifyhm = Text1.TextEnd SubPriv

29、ate Sub Command2_Click()注册页面.ShowEnd SubPrivate Sub Command3_Click()EndEnd Sub单击“登陆”按钮，先连接到数据库db1，找到表gly，检测文本框中的text1.text（第一个文本框），text2.text（第二个文本框）和数据库中的表gly的第一个字段和第二个字段是不是一致，如果不一致提示用户名/密码输入错误，检测权限，如果权限等于1提示“你的账户是普通用户”如果权限等于0提示“您的账户是管理员账户”如果通过， Form1.Show（打开主页面）。单机“注册按钮”显示注册页面，单击“取消”退出登陆页面。4.3 注册页

30、面注册页面我直接做了权限设置，在本页面注册的所有的都是普通用户（rs.Fields(3) = 1 '设置表中第四字段值为零），同理的链接数据库，打开表，先检测第一个文本框，如果第一个文本框的值为空，弹出对话框"用户名不能为空"当第一个文本框输入数值时，再检测数据库管理员表中是否存在与文本框一的数值，如果存在，弹出对话框"已有这个用户"。如果不存在进行下一步工作，执行If Trim(Text2.Text) <> Trim(Text3.Text) ThenMsgBox "两次密码不一致", vbOKOnly + vbE

31、xclamation, "" '如果文本框二不等于文本框三提示"两次密码不一致"。如果所有都通过证明这个账户是独一无二的，可以存入数据库中。Private Sub Command1_Click()Dim sql As StringDim sql1 As StringDim rs As New ADODB.Recordset '设置“rs”是一个新的记录集对象Dim cn As New ADODB.Connection '设置“cn”是一个连接对象cn.Open "Provider=Microsoft.Jet.OLEDB.

32、4.0;Data Source=" & App.Path & "db1.mdb;Persist Security Info=False" '打开数据库“db1”If Trim(Text1.Text) = "" Then '如果文本框一为空值MsgBox "用户名不能为空", vbOKOnly + vbExclamation, "" '弹出对话框"用户名不能为空"Exit SubText1.SetFocus '文本框获得焦点Elsesql

33、= "select * from gly"rs.Open sql, cn, adOpenKeyset, adLockPessimistic '打开数据库中的管理员表“gly”While (rs.EOF = False) '当记录不在库底If Trim(rs.Fields(0) = Trim(Text1.Text) ThenMsgBox "已有这个用户", vbOKOnly + vbExclamation, ""Text1.SetFocus '管理员表中第一个字段值等于文本框1中输的内容时提示"已有这个

34、用户"Text1.Text = "" '清空文本框Text2.Text = ""Text3.Text = ""Exit SubElsers.MoveNext '记录下移一条End IfWendIf Trim(Text2.Text) <> Trim(Text3.Text) ThenMsgBox "两次密码不一致", vbOKOnly + vbExclamation, "" '如果文本框二不等于文本框三提示"两次密码不一致"Text2

35、.SetFocusText2.Text = ""Text3.Text = ""Exit SubElsers.AddNew '数据库添加记录rs.Fields(0) = Text1.Textrs.Fields(1) = Text2.Textrs.Fields(3) = 1 '设置表中第四字段值为一rs.Update '数据库更新rs.Close '关闭数据库Dim rs1 As New ADODB.Recordsetsql1 = "select * from xsxx"rs1.Open sql1, cn,

36、 adOpenKeyset, adLockPessimisticrs1.AddNew '数据库添加记录rs1.Fields(8) = Text1.Text 'rs1.Updaters1.CloseMsgBox "添加用户成功", vbOKOnly + vbExclamation, ""Unload Me '卸载本窗体End IfEnd IfEnd Sub如下图： 图4.4 借书页面通过检测数据库中某个字段显示其他信息，例如通过书名查找，检测数据库db1中的书籍信息表，找到书名等于文本框中输入的书名的数据库中所的书籍，显示在下面的列

37、表中。Private Sub Command1_Click()Dim sql As StringDim rs As New ADODB.Recordset '设置“rs”是一个新的记录集对象Dim cn As New ADODB.Connection '设置“cn”是一个连接对象cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db1.mdb;Persist Security Info=False" '打开数据库“db1”sq

38、l = "select * from sjxxb"rs.Open sql, cn, adOpenKeyset, adLockPessimisticIf Trim(rs.Fields(0) <> Trim(Text2.Text) ThenMsgBox "这本书不存在", vbOKOnly + vbExclamation, ""Text1.SetFocusText1.Text = "" '清空文本框Text2.Text = ""Text3.Text = ""T

39、ext4.Text = ""Exit Subrs.MoveNextText1.SetFocus '文本框获得焦点Elsesql = "select * from jyjl"rs.Open sql, cn, adOpenKeyset, adLockPessimisticrs.AddNew '数据库添加记录rs.Fields(2) = Text1.Textrs.Fields(0) = Text2.Textrs.Fields(1) = Text4.Textrs.Fields(4) = Text4.Textrs.Update '数据库更新

40、rs.Close '关闭数据库MsgBox "添加信息成功", vbOKOnly + vbExclamation, ""Unload MeEnd IfEnd Sub如图所示： 图示：4.5 还书页面通过还书页面检测借书页面数据库中的书名，检测数据库db1中的书籍信息表，找到书名等于文本框中输入的书名的数据库中所的书籍， 如果信息没有问题的话，单击还书按钮就可以将书归还了。Private Sub Command1_Click()Dim sql As StringDim rs As New ADODB.Recordset '设置“rs”是一个

41、新的记录集对象Dim cn As New ADODB.Connection '设置“cn”是一个连接对象cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "db1.mdb;Persist Security Info=False" '打开数据库“db1”sql = "select * from jyjl "rs.Open sql, cn, adOpenKeyset, adLockPessimisticIf Trim(r

42、s.Fields(0) <> Trim(Text2.Text) ThenMsgBox "这本书不存在", vbOKOnly + vbExclamation, ""Text1.SetFocusText1.Text = "" '清空文本框Text2.Text = ""Text3.Text = ""Text4.Text = ""Text5.Text = ""Text6.Text = ""Text7.Text = "

43、;"Exit Subrs.MoveNextText1.SetFocus '文本框获得焦点Elsers.Fields(5) = DateText4.Text = Daters.Fields(6) = Text5.Textrs.Fields(7) = Text6.Textrs.Update '数据库更新rs.Close '关闭数据库MsgBox "添加信息成功", vbOKOnly + vbExclamation, ""Unload MeEnd IfEnd Sub如图所示： 图示：4.6 琐碎收录（1）链接数据库。 工程|部

44、件| microsogft ADO Data Control 6.0（sp6） （OLEDB） 选择Adodc工具画图，单机右键属性，点击生成 ，选择Microsoft Jet 4.0 OLE DB Provider，下一步选择你要连接的表，单击测试连接，单击记录源，在命令文本中输入 select * from 表（表是你要连接的表名称）（2）添加部件。 工程|部件|microsogft windows common controls 6.0| toolbar |ImageList2|属性|图像|插图片|toolbar的属性|添加按钮|通用|图像列表|imagelist1|索引（）|图形（）

45、（3）label 设置透明属性 backstyle 0（4）设置字体的移动Label1.Left = Label1.Left - 20 /一次移动20If Label1.Left < -300 Then /如果小于300Label1.Left = Form1.Width /设置窗体宽ElseLabel1.Left = Label1.Left - 20End If（5）隐藏控件用 visible 选择false（6）设置文本框*密码： 设置 passwordchar 为*建立公共模块Global 权限 As IntegerGlobal cn As ADODB.ConnectionGloba

46、l rs As ADODB.RecordsetGlobal sql As StringGlobal sql1 As StringGlobal sql2 As StringGlobal rs1 As ADODB.RecordsetGlobal rs2 As ADODB.RecordsetGlobal yhm As String建立公共模块可以提高代码的效率，同时使得修改和维护代码都很方便。创建公共模块的步骤如下: (1) 在菜单中选择“工程”“添加模块”命令，则出现模块对话框，如图32所示。(2) 选择模块图标后，单击“打开”按钮，则模块已经添加到项目中了。默认情况下名为Module1。 模块对

47、话框(3) 在模块中定义整个项目的公共变量。第五章 实施概况5.1系统测试在开发本系统时，为了使系统能够稳定运行，对本系统进行了有针对性的全面测试，采取的方式是：1、菜单项测试：为了保证每一项下拉菜单能够正确实现系统设计的功能，我把该图书馆有关图书的所有基础数据，基本上全部输入到本系统中，并对每一个菜单项反复进行了增加、删除、修改等操作，从而保证了菜单级功能的正确实现。2、数据跟踪：完成菜单项测试后，我又对系统内的每一个数据进行了跟踪。例如：例如对最多可借书数的管理，我首先在借书证管理模块中对某个读者的可借书数进行设定，然后在借书模块进行数据操作，随时观察这两个数值之间是否有冲突产生，经过对可

48、借书数的数值多次不同大小的设置并进行验证，说明该功能完全正常。3、综合测试：在以上测试的基础上对系统功能进行了整体的测试，依次来检验系统功能是否符合系统设计的要求。5.2 系统运行与维护、系统的运行：1初始数据的输入本系统的的输入采用鼠标和键盘相结合的输入方法。2、怎样进入系统有账户的直接进入，没有的可以申请（系统是无重复注册），通过登录页面进入。3、怎样使用本系统：点击鼠标左键即可进行相应功能的选择。、系统的维护：本系统是个较复杂的人-机系统，由于系统外部环境与内部因素的变化，不断影响系统的运行，同时需要系统不断地适应这些变化，不断地完善系统，以提高系统运行的效率与服务水平，这就需要自始至终进行系统的维护工作。系统的维护主要包括四个方面：（1）程序的