vb+sql毕业论文参考[图书管理系统]

xxxxxxxxxxxxxx学院图书管理系统学生姓名：xxx指导教师：xxxx系别：xxxxxxxx专业：xxxxxxxxx年级：xxxxxxx论文提交时间：___________________评阅人：___________________年月日：___________________摘要页脚内容1二十一世纪是信息的社会，信息作为社会最主要的资源，将成为战略资源引起人们广泛的关注。

如何获取信息？图书是我们最好的获取信息的方式，但由于图书馆图书收藏量大大增加，使传统的图书管理员的工作日益繁重起来。

迫使人们起用新的管理方法来管理图书即图书管理系统。

图书管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。

经过分析,使用Microsoft公司的Visual Basic6.0为开发工具,利用其提供的各种面向对象的可视化开发平台作为开发工具，采用面向对象技术，图形化的应用开发环境，尤其是它有一个功能极其强大的集成环境提供级开发人员，使得开发人员可通过菜单、界面、图形浏览工具、对话框以及嵌入的各种生成器来轻松地完成各种复杂的操作。

开发过程中不断修正和改进,直到形成用户满意的可行系统。

关键字：图书管理数据库Visual Basic6.0 面向对象（Object）页脚内容2目录第一章需求分析 (1)§1-1系统目标设计 (1)§1-2本系统的开发设计思想 (1)§1-3开发和运行环境选择 (1)§1-4系统功能分析 (1)1-4-1读者信息的输入、修改、查询 (1)1-4-2图书信息的输入、修改、查询 (1)1-4-3用户信息的输入、修改、查询 (2)1-4-4借书、还书办理手续 (2)1-4-5全部信息的统计 (2)第二章系统功能设计模块 (2)§2-1 系统模块图 (2)第三章数据库分析与设计 (3)§3-1数据库系统 (3)§3-2数据库系统的简介 (4)页脚内容3§3-3数据库的设计思想 (4)§3-4利用Access创建数据库 (6)§3-5连接数据及数据库 (7)§3-6数据库公共模块 (9)第四章详细设计 (15)§4-1用户进入模块 (15)§4-2系统主界面管理模块 (17)§4-3 图书管理模块 (18)4-3-1图书的添加功能模块 (18)4-3-2图书修改的功能模块 (21)4-3-3图书的删除功能模块 (27)§4-4借还书管理模块 (29)4-4-1借书管理模块 (29)4-4-2还书管理模块 (33)§4-5 读者资料管理模块 (33)4-5-1添加读者信息 (33)4-5-2修改读者信息 (33)页脚内容44-5-3删除读者信息 (33)§4-6用户信息管理模块 (33)4-6-1用户添加管理模块 (33)4-6-2用户修改管理模块 (34)4-6-3用户删除管理模块 (34)§4-7统计办理业务信息 (34)第五章设计结论 (35)参考资料 (36)页脚内容5第一章需求分析§1-1系统目标设计通过一个图书馆管理信息系统，使图书馆的信息管理工作系统化、规范化、自动化，从而达到提高学校管理效率的目的。

§1-2本系统的开发设计思想系统应符合图书馆信息管理的规定，满足图书馆日常管理的工作需要，并达到操作过程中的直观、方便、实用、安全等要求；系统采用模块化程序设计方法，既便于各种数据的查询，又便于系统功能的修改，及时根据用户需求进行数据的添加、删除、修改、查询等操作。

§1-3开发和运行环境选择开发工具：Visual Basic6.0、Access数据库运行环境：Windows 98、Windows NT或Windows 2000。

§1-4系统功能分析1-4-1读者信息的输入、修改、查询包括：读者编号、读者姓名、家庭住址、电话号码。

1-4-2图书信息的输入、修改、查询包括：图书编号、图书名称、作者姓名、出版社名称、图书价格、图书类别。

页脚内容11-4-3用户信息的输入、修改、查询包括：用户编号、用户名、密码。

1-4-4借书、还书办理手续包括：借书、还书信息的办理：包括读者编号、图书编号。

1-4-5全部信息的统计统计的内容包括：未还图书、已还图书和所有业务。

并按照读者姓名、图书书名、图书作者、图书出版社、图书分类、图书价格进行统计。

第二章系统功能设计模块§2-1 系统模块图在系统功能分析的基础上，考虑Visual Basic6.0程序编制的特点，得到如图2.1系统功能模块如下：页脚内容2第三章数据库分析与设计§3-1数据库系统数据库系统本质上是一个用计算机存储记录的系统。

数据库本身可被看作为一种电子文件柜：也就是说，它是收集计算机数据文件的仓库或容器。

系统用户页脚内容3可以对这些文件执行插入数据、检索数据、更改数据、删除数据等一系列操作。

总之，数据库系统是一个计算机存储记录的系统，即它是一个计算机系统，该系统的目标存储信息并支持用户检索和更新所需要的信息。

图3.1数据库系统简图§3-2数据库系统的简介通过图书馆图书管理系统管理员可以简捷、方便的对图书记录查阅、增加、删除等功能，而用户也可以通过这个系统对进行图书查询、借阅、归还等功能。

该数据库应用程序按照用户权限和实现功能的不同分为两部分：外部学生对数据库的查询访问和内部管理人员对数据记录的管理维护。

每一部分中包含各自实现的各项功能,对每一项功能的实现,将按照窗体设计以及运行情况的顺序逐一进行设计。

本系统采用Microsoft access技术建立数据库，使用VB技术建立数据源的链接,并且生成图书管理的数据库应用程序从而实现数据库的管理功能。

§3-3数据库的设计思想（1）规划阶段页脚内容4确定开发的总目标，给出计划开发的软件系统的功能、性能、可靠性以及接等方面的设想。

（2）需求分析阶段认真细致地了解用户对数据的加工要求，确定系统的功能与边界。

本阶段的最终结果，提供一个可作为设计基础的系统说明书，包括对软硬件环境的要求和一整套完善的数据流程图。

（3）设计阶段把需求分析阶段所确定的功能细化，主要工作是概念设计阶段、逻辑设计阶段、物理设计阶段，然后，对每个阶段内部设计详细的流程。

（4）程序编制阶段以一种或几种特定的程序设计语言表达上一阶段确定的各模块控制流程。

程序编制时应遵循结构化程序设计方法。

（5）调试阶段对已编好的程序进行单元调试（分调），整体调试（联调）和系统测试（验收）。

（6）运行和维护阶段这是整个设计周期最长的阶段，其工作重点是收集和记录系统实际运行的数据。

在运行中，必须保持数据库的完整性，必须有效的处理数据故障和进行数据库恢复。

同时解决开发过程的遗留问题，改正错误进行功能完善。

页脚内容5§3-4利用Access创建数据库图3.1：读者包括读者编号、读者姓名、读者类别、家庭住址、电话号码等。

图3.1读者数据库图3.2：图书包括书籍编号、书籍名称、书籍类别、作者姓名、出版社名称、出版日期、登记日期、备注信息等。

图3.2图书数据库图3.3：业务包括图书信息和借书及还书的详细信息图3.3业务数据库页脚内容6图3.4：用户包括编号、用户名、密码等。

图3.4用户数据库§3-5连接数据及数据库在Visual Basic环境下，选择“工程”→“引用”命令来连接数据，在随后出现的对话框中选择“Microsoft ActiveX Data Objects 2.0 Library”，然后单击“确定”按钮，如图3.5所示。

图3.5引用对话框在Visual Basic环境下，ADO对象是通过ODBC来访问数据库，所以还要建立ODBC数据引擎接口。

开控制面板中的“管理工具”→“数据源”(ODBC)，出现如图3.6所示对话框。

页脚内容7图3.6ODBC对话框图单击“添加”按钮，出现“建新数据源”话框，如图3.7所示。

3.7建新数据源对话框在”创建新数据源”对话框选择Microsoft Access Driver(*.mdb)，单击“完成”按钮，出现如图3.8所示对话框。

页脚内容8图3.8创建新数据源对话框设置连接数据源: 在“数据源名”文本框中添加一个名字，单击“确定”按钮完成系统默认连接设置。

然后在ODBC对话框中单击“确定”按钮完成ODBC设置。

§3-6数据库公共模块模块（MODADO）代码:Global DBCon As New ADODB.ConnectionGlobal DBRec As New ADODB.Recordset'错误处理Public Function Errs(Err As ErrObject, Title As String) As BooleanIf Err.Number <> 0 ThenErrs = FalseMsgBox Title & vbCrLf & vbCrLf & "错误代码:" & Err.Number & vbCrLf & "错误描述:" & Err.Description, vbCritical + vbOKOnly, "错误信息"页脚内容9Err.ClearElseErrs = TrueEnd IfEnd Function'连接数据库Public Function Con2Srv() As BooleanOn Error Resume Next'常规方法打开数据库文件'DBCon.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=BM.mdb;P ersist Security Info=False"DBCon.OpenCon2Srv = Errs(Err, "数据库连接失败!")End Function'查询数据库Public Function query(SQL As String) As BooleanOn Error Resume Next页脚内容10Set DBRec = New RecordsetCall DBRec.Open(SQL, DBCon, adOpenDynamic, adLockOptimistic, -1) query = Errs(Err, "数据库查询失败!")End Function'关闭数据库Public Function DisCon() As BooleanOn Error Resume NextIf DBCon.State = adStateOpen Then DBCon.CloseDisCon = TrueEnd Function模块（MODBM）部分代码:'选中文本框的内容Public Function TextFocus(Text As TextBox)Text.SelStart = 0Text.SelLength = Len(Text.Text)End Function页脚内容11'向列表框添加项目Public Function CboList(Cbo As ComboBox, SQL As String)On Error Resume NextDim DBRecList As New RecordsetCbo.ClearCall DBRecList.Open(SQL, DBCon, adOpenDynamic, adLockOptimistic, -1)If Errs(Err, "数据库查询失败!") = True ThenWhile Not DBRecList.EOFCbo.AddItem DBRecList.Fields(0).ValueDBRecList.MoveNextWendEnd IfDBRecList.CloseEnd Function'向网格添加信息Public Function MsgList(MSG As MSFlexGrid, DBRec As ADODB.Recordset) As Integer On Error Resume Next页脚内容12MSG.Rows = 1MSG.Cols = DBRec.Fields.CountMSG.Row = 0For i = 0 To DBRec.Fields.Count - 1MSG.Col = iMSG.Text = DBRec.Fields(i).NameMSG.CellAlignment = 4MSG.ColWidth(i) = DBRec.Fields(i).DefinedSize * 100If MSG.ColWidth(i) < 1000 Then MSG.ColWidth(i) = 1000 Next iDBRec.MoveFirstWhile Not DBRec.EOFMSG.AddItem EmptyMSG.Row = MSG.Rows - 1MSG.RowData(MSG.Row) = DBRec.Fields(0).ValueFor i = 0 To DBRec.Fields.Count - 1MSG.Col = i页脚内容13MSG.Text = DBRec.Fields(i).ValueIf MSG.Text Like "True" ThenMSG.Text = "已借"ElseIf MSG.Text Like "False" ThenMSG.Text = "未借"End IfMSG.CellAlignment = 4Next iDBRec.MoveNextMsgList = MsgList + 1WendEnd Function页脚内容14第四章详细设计§4-1用户进入模块通过输入用户名和密码进行登陆。