图书馆信息管理系统 大数据库课程设计VB SQL

word摘 要在计算机日益普与的今天，图书作为教学和学习必不可少的工具，采用一套行之有效的图书管理系统来管理书籍就显得尤为重要。而图书资料的管理需要有效的图书管理软件，减轻工作人员的工作量，方便工作人员对它的操作，提高管理的质量和水平，做到高效、智能化管理，达到提高图书借阅信息管理效率的目的。 本文运用Visual Basic 6.0和SQL Server 2005软件，进展图书馆管理系统的课程设计。首先对系统进展需求分析，根据系统功能设计E-R模型，再进展逻辑结构设计实现E-R图向关系模型的转换，并优化数据模型，使其拥有一般系统拥有的功能，它可以增加读者信息，可以对新书进展入库，删除旧书，可以查询所有的读者信息，还可以对图书进展修改校正，以与解决自己登录安全性的问题，最重要的是可以进展对图书的借阅和归还，并对超过还书期限的读者进展处罚，同时改变图书库存和被借阅次数的信息。具体功能有图书馆图书信息浏览、读者信息浏览、图书信息查询、图书入库管理、图书出库管理、读者借书超期罚款管理和读者信息维护等。本图书馆信息管理系统具有可运行，功能较完整，界面美观，操作方便等特点，它可以更加人性化的满足小型图书馆的日常借阅问题，达到一个很理想的智能管理的目的。关键词 图书馆信息管理系统；VB；SQL；数据库目 录1 系统功能概述11.1 系统的功能11.2 系统结构总图22 数据库设计32.1 需求分析32.2 E-R模型32.3 关系模型32.4 表结构设计63 系统各功能模块的详细设计103.1 封面103.2 登录113.3 主菜单123.4 注册新用户143.5 读者信息管理153.6 图书库存信息查询17总结20参考文献20文案大全1 系统功能概述1.1 系统的功能图书馆信息管理的主要任务是用计算机对图书交换过程进展日常管理,如图书馆图书信息浏览、读者信息浏览、图书信息查询、借还书等，迅速准确地完成各种信息的统计计算和汇总工作,并快速打印信息报表。针对系统服务对象的具体要求,设计了图书馆信息管理系统。图书馆信息管理系统主要包含以下功能:(1)图书管理：对图书中图书的信息，如图书编号、书名等根本信息进展维护和管理。能够完成各种信息的新增、确认、删除、取消操作，也可按照一定的条件查询这些信息。(2)读者管理：系统可以完成读者根本信息的新增、确认、删除、取消操作，并可按照一定的条件查询与图书相关的信息。(3)库存管理：在系统中可以完成图书入库信息的管理，完成图书相关信息的新增、确认、删除、取消操作，可以按一定得条件查询这些信息。数据库包含以下实体与其属性：(1) 图书信息 (图书编号、书名、作者、版次、出版日期、类别、借阅次数、借阅状态(2) 读者信息 (借书证号、某某、性别、年龄、单位、联系、读者类别、是否超期)(3) 图书入库信息 (图书编号、库存量、单价、入库日期)(4)图书出库信息借书证号、书名、借阅日期、还书日期(5) 图书库存信息 (图书编号、书名、库存量、单价)(6) 读者罚款信息借书证号、书名、处罚日期、超期天数、罚款金额(7)系统信息用户名、密码1.2 系统结构总图根据功能画出图书馆信息管理系统结构图，如图1.1所示。图1.1图书馆信息管理系统的总体结构2数据库设计2.1 需求分析面对大量繁杂的图书信息管理、分类、查询与借还工作，迫切需要通过计算机来帮助解决，减少图书馆管理人员的工作量。随着办公自动化的深入与普与和网络技术的不断开展，图书馆信息管理系统越来越被社会所需要，本图书馆信息管理系统具有界面友好、使用方便等优点。 1、图书信息查询。当需要从数据库中查找满足查询条件的图书时，可以使用该功能。选择查询条件填入对应的功能，点击“查询完成查询操作。 2、借阅管理。借阅管理分为借阅和归还两局部。点击“借阅单项选择按钮，这时扫入图书相关信息就可以借阅了。 3、注册新用户。注册新用户是用来注册能使用该软件的用户名和密码。当注册完用户之后，退出该软件重新进入，会要求选择用户名和密码，此时如果不能正确输入密码，如此不能进入该软件。2.2 E-R模型图书馆信息管理系统E-R图，如图2.1所示。图2.1 图书馆信息管理系统E-R图2.3 关系模型一个实体型转换为一个关系模式1。实体的属性就是关系的属性，实体的码就是关系的码。根据E-R图向关系模型转换的原如此，E-R图转换为关系模型。1图书信息 (图书编号、书名、作者、版次、出版日期、类别、借阅次数、借阅状态图2.2 图书信息关系模型图2读者信息 (借书证号、某某、性别、年龄、单位、联系、读者类别、是否超期)图2.3 读者信息关系模型图3图书入库信息 (图书编号、库存量、单价、入库日期图2.4 图书入库信息关系模型图4图书出库信息借书证号、书名、借阅日期、还书日期图2.5 图书出库信息关系模型图(5)图书库存信息 (图书编号、书名、库存量、单价)图2.6 图书库存信息关系模型图6读者罚款信息借书证号、书名、处罚日期、超期天数、罚款金额图2.7 读者罚款信息关系模型图2.4 表结构设计本系统需在SQL Server中建立七个表，分别为图书信息，读者信息，图书入库信息、图书出库信息、图书库存信息、读者借书信息和系统信息。（1） 图书信息表的结构与根本数据：表结构：图2.8图书信息表结构 根本数据如下：图2.9 图书信息数据（2） 读者信息表的结构与根本数据：表结构：图2.10 读者信息表结构根本数据如下：图2.11 读者信息根底数据（3） 图书入库信息表的结构与根本数据：表结构：图2.12 图书入库表结构根本数据如下：图2.13 图书入库根底数据（4） 图书出库信息表的结构与根本数据：表结构：图2.14 图书出库表结构根本数据如下：图2.15 图书出库根底数据（5） 图书库存信息表的结构与根本数据：表结构：图2.16 图书库存表结构根本数据如下：图2.17 图书库存根底数据（6） 读者借书信息表的结构与根本数据：表结构：图2.18 读者借书表结构根本数据如下：图2.19 读者借书根底数据（7） 系统信息表的结构与根本数据：表结构：图2.20 系统信息表结构根本数据如下：3系统各功能模块的详细设计本图书馆信息管理系统共包括11个窗体，分别为欢迎，登录，注册新用户，图书信息浏览，读者信息浏览，图书出库信息，图书入库信息，图书信息查询，读者信息查询，图书库存信息查询和主窗体。其中主窗体为MDI窗体2。下面介绍各个窗体的设计语句与实现功能。3.1 封面封面，如图3.1所示，标题为“欢迎进入图书馆管理系统，点击“进入系统按钮，就可以关闭本窗体并打开登录窗体。图3.1 封面封面代码如下：Private Sub mand1_Click()Unload MeEnd SubPrivate Sub Timer1_Timer()Static n As Integer n = n + 1If n 15 Then n = 0End IfLabel1.ForeColor = QBColor(n)End Sub3.2 登录登录，如图3.2所示，假如已经有账号，只需输入正确的用户名和密码，点击“登陆按钮就可以打开MDI主窗体，如图3.4所示；假如没有账号，点击“注册按钮，就可以打开注册新用户窗体，如图3.5所示。图3.2 登录登录代码如下：Private Sub mand1_Click()End SubPrivate Sub mand2_Click()Dim micount As IntegerDim str As Stringstr = select 密码 from 系统信息 where 用户名 = & Text1.Text & Adodc1.RecordSource = strIf Adodc1.Recordset.EOF = True ThenMsgBox 用户名错误,请重新输入, vbExlamation, 警告Text1.Text = Text2.Text = ElseIf Trim(Adodc1.Recordset.Fields(密码) = Trim(Text2.Text) ThenUnload MeElse MsgBox 密码错误，请重新输入, vbExlamation, 警告Text2.Text = End IfEnd Ifmicount = micount + 1If micount = 3 Then Unload MeEnd SubPrivate Sub mand3_Click()Unload MeEnd Sub3.3 主菜单主窗体，如图3.3所示，设计为MDI窗体，含有主菜单：系统管理、数据管理、数据查询。系统管理菜单包含注册新用户菜单和退出菜单。数据管理包含图书出库管理菜单，图书入库管理菜单， 读者罚款管理菜单和读者信息管理菜单。数据查询包含查询图书信息菜单，查询图书库存信息菜单和查询读者信息菜单。图3.3 主窗体主菜单代码如下：Private Sub 图书信息浏览_Click()End SubPrivate Sub mFExit_Click()Unload MeEnd SubPrivate Sub 查询读者信息_Click()End SubPrivate Sub 查询图书库存信息_Click()End SubPrivate Sub 查询图书信息_Click()End SubPrivate Sub 读者罚款管理_Click()End SubPrivate Sub 图书出库信息_Click()End SubPrivate Sub 读者信息管理_Click()End SubPrivate Sub 新用户注册_Click()End SubPrivate Sub 图书信息查询_Click()End SubPrivate Sub 读者信息查询_Click()End SubPrivate Sub 图书入库信息_Click()End Sub3.4 注册新用户注册新用户窗体可用于添加新的用户名和密码。可以通过单击“注册新用户菜单，打开对话框；也可以在登录窗体，点击“注册按钮，进展注册。假如输入正确，如此将新的用户名和密码保存到“系统信息表中，并提示“注册完成，关闭本窗体，如图3.4所示。图3.4 注册成功注册新用户代码如下：Private Sub mand1_Click()Dim str1 As Stringstr1 = select * from 系统信息Adodc1.RecordSource = str1If Text3.Text Text2.Text ThenMsgBox 密码不一样，请重新输入！Text2.Text = Text3.Text = ElseAdodc1.Recordset.Fields(用户名) = Text1Adodc1.Recordset.Fields(密码) = Text2MsgBox 注册完成！End IfUnload MeEnd SubPrivate Sub mand2_Click()Unload MeEnd Sub3.5 读者信息管理读者信息管理窗体用于浏览和录入读者信息4。该窗体以文本框显示当前记录，用按钮首记录、末记录、前移、后移，控制记录指针的移动；用一个标签Label显示：当前记录号/记录总数；单击返回按钮，可以关闭本窗体，返回主窗体。可以对记录进展添加、确认、删除、取消操作，如图3.5所示。其余信息管理窗体与代码均与此类似，不作说明。图3.5 读者信息浏览窗体读者信息代码如下：Private Sub cmdadd_Click()cmdadd.Enabled = Falsecmddel.Enabled = Falsecmdok.Enabled = TruecmdCancel.Enabled = TrueEnd SubPrivate Sub cmdCancel_Click()Unload MeEnd SubPrivate Sub cmddel_Click()x = MsgBox(确实要删除当前记录吗？, vbYesNo + vbQuestion)If x = vbYes ThenIf Adodc1.Recordset.EOF = True ThenEnd IfElseEnd IfEnd SubPrivate Sub cmdfirst_Click()cmdfirst.Enabled = Falsecmdpre.Enabled = Falsecmdnext.Enabled = Truecmdlast.Enabled = TrueEnd SubPrivate Sub cmdlast_Click()cmdfirst.Enabled = Truecmdpre.Enabled = Truecmdnext.Enabled = Falsecmdlast.Enabled = FalseEnd SubPrivate Sub cmdnext_Click()cmdfirst.Enabled = Truecmdpre.Enabled = TrueIf Adodc1.Recordset.EOF = True Thencmdlast.Enabled = Falsecmdnext.Enabled = FalseEnd IfEnd SubPrivate Sub cmdok_Click()cmdadd.Enabled = Truecmddel.Enabled = Truecmdok.Enabled = FalsecmdCancel.Enabled = FalseEnd SubPrivate Sub cmdpre_Click()cmdnext.Enabled = Truecmdlast.Enabled = TrueIf Adodc1.Recordset.BOF = True Thencmdfirst.Enabled = Falsecmdpre.Enabled = FalseEnd IfEnd SubPrivate Sub mand1_Click()Unload MeEnd SubPrivate Sub Form_Load()cmdfirst.Enabled = Falsecmdpre.Enabled = Falsecmdnext.Enabled = Truecmdlast.Enabled = Truecmdadd.Enabled = Truecmddel.Enabled = Truecmdok.Enabled = FalsecmdCancel.Enabled = TrueEnd Sub3.6 图书库存信息查询图书库存信息查询窗体可以满足按各种条件的查找5，这些条件放在组合列表框bo中,供用户选择。在文本框中输入要查询的内容，如图3.6所示，单击查询按钮，查询结果用网格控件显示如3.7所示。其余查询窗体与代码均与此类似，不作另行说明。图3.6 图书库存信息查询窗体图3.7 查询结果图书库存信息查询代码如下：Private Sub mand1_Click()Dim str As Stringstr = Select * From 图书库存 str = str & Where 图书库存. & bo1.Text & Like & Text1 & % Adodc1.RecordSource = strEnd SubPrivate Sub mand2_Click()Unload MeEnd SubPrivate Sub mand3_Click()Unload MeEnd SubPrivate Sub Form_Load()bo1.AddItem 图书编号bo1.AddItem 书名bo1.AddItem 库存量bo1.AddItem 单价Text1.Text = bo1.Text = End SubPrivate Sub DataGrid1_Click()Unload MeEnd SubPrivate Sub Form_Load()bo1.AddItem 图书编号bo1.AddItem 图书名bo1.AddItem 库存量bo1.AddItem 单价Text6.Text = End Sub总结通过这次数据库课程设计，我学会了如何利用Microsoft SQL Server2005软件建立相关信息的数据库，并通过Microsoft Visual Basic 6.0实现对相关信息的查询，将所学知识都运用到实践中去，增加了我对数据库的兴趣，让我能更清楚地了解到数据库在现实生活中为我们带来的极大便利，方便我们将所需要的信息进展规划和管理，将信息集中管理也为我们查询我们所需要的信息带来了简易的途经。但是，这个图书馆信息管理系统并不是很完善，还有需改良之处。最后，感谢数据库课程设计教师对我耐心的教诲和帮助，为我解决了许多在课堂上没弄懂的问题，让我对数据库有了更进一步的认识和了解。今后我会更加努力学习数据库的相关知识，相信能为我以后带来很大的帮助。参考文献1 王珊.数据库系统简明教程.：高等教育.2004,92 赛奎春.Visual Basic信息系统开发实例精选. ：高等教育.2004，93 X韬,何旭洪.Visual BASIC数据库系统开发实例导航.：人民邮电.2002，104 X海潘.软件工程导论.：清华大学.1999,19(2);1381435 闫宏印.VB程序设计.：电子工业.2002;120文案大全