1、个人收集整理 勿做商业用途图书管理系统的设计与实现二级学院: 华建软件学院 学生姓名: 专业班级: 学 号: 指导教师: 年 月 日摘 要随着人类社会的发展,人类对知识的需求也不断地增长。本课题针对当今发展趋势学校、政府、图书管、事业单位等图书管理多数采用人工管理的现状以及即使采用了计算机图书管理系统却不能完全满足本单位图书管理的需要的实际情况出发,对图书管理业务经过详细的系统调查,开发出的操作简单而且方便实用的一个图书管理系统。关键词:图书管理;借阅;浏览;Visual basic6.0;ACCESS目 录一、引言1二、需求分析11、所需功能12、结构图2三、系统设计21、前台设计22、后台
2、数据库设计3四、设计流程51、设计各窗体52、编辑代码6五、详细代码61、主窗体代码62、各子窗体代码8六、结束语10七、谢辞11参考文献11一、引言当今时代是飞速发展的的信息时代。在各行各业中离不开信息处理,这正是计算机被广泛应用于信息管理系统的原因。计算机的最大好处在于利用它能够进行信息管理.使用计算机进行信息控制,不仅提高了工作效率,而且大大的提高了其安全性。尤其对于复杂的信息管理,计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关,系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息而设计的.作为一个功能较完备的Windows软件开发平台,Visual
3、Basic专业版提供了对数据库应用的强大支持。尤其提供了使用数据控件和绑定控制项,使用数据库存取对象变量(Data Access Object Variable),直接调用ODBC 2.0 API接口函数等三种访问数据库的方法。对其标准内置的Ms Access数据库,它可以提供不弱于专业数据库软件的支持,可以进行完整的数据库维护、操作及其事务处理。VB数据库的核心结构是所谓的MicroSoft JET数据库引擎,JET引擎的作用就像是一块“面板”,在其上可以插入多种ISAM(Indexed Sequential Access Method,即索引顺序存取方法)数据驱动程序。JET引擎为Acce
4、ss格式数据库提供了直接的内部(buildin)支持,这就是VB对Access数据库具有丰富支持的真正原因.VB专业版中提供了FoxPro、dBASE(或Xbase)、Paradox、Btrieve等数据库的ISAM驱动程序,这就使得VB能支持这些数据库格式。二、需求分析1、所需功能图书管理系统要完成借书还书、图书的新增和删除、读者的管理、资料打印和统计以及管理员对图书管理七大功能,为了使用户能直接、明朗地完成这些操作程序,我们就把这些操作分别用不同的模块来完成,这里就引入了功能模块的设计:借书根据您提供的图书条形码和图书编号确认图书,再根据读者的编号确认读者后把此书借给这位读者。还书根据您提
5、供的图书条形码和图书编号确认图书,再根据读者的编号确认读者后把此书归还.图书管理-对所有图书的资料进行添加,修改和删除等操作.读者管理对所有读者的资料进行添加,修改和删除等操作。打印针对用户需求来设定的,用户可以直接通过“打印”功能模块来直接打印自己所需要的资料.统计图书基础状况统计排名。管理员-在这里修改管理员的登录密码2、结构图三、系统设计1、前台设计根据不同需求,开发应用程序可以考虑的窗体的系统,总的可以分为5大类,如下:系统管理模块:实现管理员登陆与系统退出图书管理模块:实现图书分类,添加新书,编辑图书借书证管理模块:编辑借书证,借书设置操作模块:登陆借书证号,查找,还书报表模块:图书
6、信息报表打印,读者信息报表打印,借出书籍信息报表打印图书管理系统主窗体截图如下:2、后台数据库设计本系统采用Access,用ADO作为连接数据对象。(1)建立Access数据库启动Access,建立数据库BookMIS。mdb。如下图:具体有如下表: (2)数据连接在Visual Basic环境下,选择“工程”“引用”命令,在随后出现的对话框中选择“Microsoft ActiveX Data Objects 2.0 Library”,然后单击“确定按钮。引用ADO连接数据库在程序设计的公共模块中,先定义ADO连接对象.语句如下:Public conn As New ADODB.Connect
7、ion 标记连接对象然后在子程序中,用如下的语句即可打开数据库:Dim connectionstring As Stringconnectionstring = provider=Microsoft。Jet。oledb。4。0;” _”data source=book.mdb”conn。Open connectionstring(3)设置ODBCVB的ADO对象是通过ODBC来访问数据库,所以还要建立ODBC数据引擎接口。打开控制面板中的“管理工具”“数据源(ODBC).单击“添加”按钮,出现“创建新数据源对话框。选择Microsoft Access Driver(。mdb),单击“完成按钮。
8、在“数据源名”文本框中添加一个名字,单击“确定按钮完成系统默认连接设置.然后在ODBC对话框中单击“确定”按钮完成ODBC设置.四、设计流程1、设计各窗体a 首先创建一个主窗体,命名为图书管理系统,选择“工程“添加MDI窗体”命令,则在项目中添加了主窗体。将“菜单”组件从“工具箱”拖到窗体上.创建一个 Text 属性设置为“文件的顶级菜单项,且带有名为“关闭”的子菜单项。并类似地创建一些菜单项。 在主窗体上设计一些常用功能的快捷按钮,基本信息查询和需借图书查询。并显示已借图书。b 再继续创建一些实现各种功能的子窗体:图书分类,添加新书,编辑图书;登陆借书证号,查找,还书等等。部分子窗体截图如下
9、:2、编辑代码根据所要实现的功能编写代码。有主窗体代码,各子窗体代码。五、详细代码1、主窗体代码部分主窗体代码如下:Dim db1 As DatabaseDim db2 As DatabaseDim db3 As DatabaseDim rst As RecordsetDim rst1 As Recordset 打开表PersonalDim rst2 As Recordset 打开表BookFlagDim rst3 As Recordset 打开表BookDim ws1 As WorkspaceDim ws2 As WorkspaceDim qry2 As QueryDefDim RecNum
10、BookFf As Integer 表BookFf的记录个数Dim SFlag As StringPrivate Type MSet BookNum As Integer BookCost As SingleEnd TypeDim SetFlag As MSetOption ExplicitPrivate Sub AboutMnu_Click() Aboutfrm。Show (1)End SubPrivate Sub AddMnu_Click() Sb。Panels(1).Text = 添加新书” AddNewBook。Show (1) Sb。Panels(1).Text = SFlagEnd
11、 SubPrivate Sub BackMnu_Click() cmdBackBook_ClickEnd SubPrivate Sub cmdBackBook_Click() 打开还书对话框 cmdKong_Click Lentfrm.Show (1) cmdKong_ClickEnd SubPrivate Sub cmdKong_Click() 清空所有文本 txtBookId.Text = ” txtName。Text = txtClass.Text = ” txtDepart.Text = ” txtBookHao。Text = ” txtBookName = ” txtZhiCheng
12、 = ” txtFa.Text = ” txtBookBian。Text = ” Frame4.Visible = False Frame7。Visible = True LV2.ListItems.Clear CmdLogin.SetFocusEnd SubPrivate Sub cmdOkCancel_Click(Index As Integer) Select Case Index Case 1 If rst3.Fields(是否借出) = True Then MsgBox 此书已经借出!”, 0 + 48, ”提示” txtBookBian.Text = ” txtBookBian.S
13、etFocus Frame4.Visible = False Frame7。Visible = True Exit Sub End If rst2.AddNew rst2.Fields(图书编号) = rst3。Fields(”图书编号”) rst2.Fields(书名”) = rst3。Fields(书名) rst2。Fields(价格) = rst3.Fields(”价格) rst2。Fields(”出版社) = rst3.Fields(出版社) rst2.Fields(借出日期) = rst3.Fields(”借出日期) rst2.Fields(借书证号) = BookId rst2.F
14、ields(姓名”) = txtName.Text rst2。Fields(”类别”) = rst3。Fields(”类别”) rst2。Update rst3。Edit rst3.Fields(”是否借出”) = True rst3.Fields(借出日期) = rst3。Fields(”借出日期) rst3。Update DataRef txtBookBian。Text = txtBookBian.SetFocus CmdLogin。SetFocus Frame4.Visible = False Frame7。Visible = True End SelectEnd Sub2、各子窗体代码
15、(1)子窗体主要功能代码:下面是响应“修改密码”子菜单Click事件,调出修改密码窗体代码。Private Sub changepwd_Click()frmchangepwd.ShowEnd Sub下面是响应“图书借阅子菜单Click事件,调出图书借阅窗体代码.Private Sub borrow_Click()frmjieyue。ShowEnd Sub下面是响应“图书赔偿”子菜单Click事件,调出图书赔偿窗体代码。Private Sub tushupeichang_Click()frmpeichang.Show 1End Sub下面是响应“图书登记”子菜单Click事件,调出图书登记窗体代
16、码.Private Sub checkin_Click()frmdengji。ShowEnd Sub(2)登陆窗体代码:Dim Asc() As IntegerDim db As DatabaseDim rst As RecordsetDim 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
17、, ”提示” txtPass.SetFocus Exit Sub End If If Val(txtPass.Text) = Asc(comPer.ListIndex) Then MsgBox ”正确 Libadmin = comPer.Text Mainfrm.Show Unload Me Else MsgBox 密码错误,请重试!”, 0 + 16, ”错误” txtPass.SetFocus Exit Sub End IfCase 1 Unload MeEnd SelectEnd SubPrivate Sub Form_Load()Dim i As IntegerSet db = Wor
18、kspaces(0).OpenDatabase(App。Path & DataBaseBookMIS。mdb, False)Set rst = db.OpenRecordset(Pass, dbOpenTable)rst。MoveLastRec = rst.RecordCountReDim Asc(Rec - 1)rst。MoveFirstFor i = 1 To Rec comPer。AddItem rst。Fields(名称) Asc(i - 1) = Val(rst。Fields(密码”)) rst。MoveNext If rst.EOF Then Exit ForNextcomPer。
19、Text = ”txtPass.Text = ”End Sub六、结束语统软件的功能主要由图书管理、流通作业、信息查询与系统维护四大模块组成。本软件针对图书馆的业务范围及工作特点,设计了借还管理、图书管理、读者管理和用户管理等4个子系统,这四个子系统包括了图书馆的主要业务,可以全面实现对图书馆的采购、编目、检索、统计和流通等业务的计算机管理,大大减轻了图书馆工作人员的工作量,全面提高了图书馆的管理效率及服务质量,使图书馆管理水平和业务水平跃上一个新的台阶。应用图书管理系统软件可以在计算机上灵活、方便地管理图书,从而大大的提高了处理效率,使管理更加现代化。图书管理软件是根据实际情况和具体内容,按
20、一定的要求、科学、合理进行系统分析,设计,具体包括菜单设计、数据输入、查询、删除、修改等各种设计。从而使图书管理系统软件完全能满足经济性、灵活性、系统性及可靠性的要求。七、谢辞本次毕业设计完成了,我忠心的感谢校领导和计算机系的老师们授于我很多的专业知识,让我能够有一门专业技术,能够基本独立完成软件的开发,感谢老师对我的指导,感谢同学们对我的帮助与支持,感谢我的班主任老师,给了我很多专业知识和生活上的指导和支持,在此由衷的感谢。参考文献1 萨师煊、王珊.数据库系统概论 第三版.高等教育出版社,2002.2 丁宝康。数据库原理。经济科学出版社,2000。3 陈戈止。信息系统与管理.西南财经大学出版
21、社,2001。4 刘韬等编著Visual Basic6。0数据库系统开发导航人民邮电出版社,20025 恒扬科等编著Visual Basic6.0程序设计学与用教程机械工业出版社,20036 王永毅等编著管理信息系统设计与实现清华大学出版社,20037 汤俊。高校图书馆网上借阅系统开发研究.武汉工业大学学报,2000。8 陈松桥等著。现代软件工程。北方交通大学出版社,2002.9 郑刚.基于C/S结构的图书馆事物管理系统设计.标准化报道,2000。10 萨师煊、王珊。数据库系统概论。高等教育出版社。11 郑人杰、陶永雷。实用软件工程。清华大学出版社,1997。12 郭志等。ASP及其在基于WEB的图书馆咨询系统中的应用.黄金学报,2000。第 11 页 共 11 页