vb-sql图书管理系统报告图书管理系统--大学毕业论文.doc

图书管理系统一、需求分析当今时代是飞速发展的的信息时代。在各行各业中离不开信息处理，这正是计算机被广泛应用于信息管理系统的原因。计算机的最大好处在于利用它能够进行信息管理。使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了其安全性。尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了管理好图书馆信息而设计的。针对各大中专院校的图书管理现状，设计出适合一般学校的计算机辅助图书管理系统。实现对图书基本信息、读者基本信息进行计算机辅助管理，完成借书和还书有关信息的记录、修改、查询、删除等一系列任务的计算机管理与实现。图书管理系统能方便、快捷地管理图书，将传统的图书管理方式彻底的解脱出来，提高效率，减轻工人人员以往繁忙的工作，减小出错的概率，使读者可以花更多的时间在选择书和看书上。从而使人们有更多时间来获取信息、了解信息、掌握信息。各功能模块描述如下：1.系统管理系统管理中，能实现新的管理员的添加和现存管理员的密码修改功能。2.图书管理在图书管理模块中，主要实现对图书类别的添加和管理，并且可以添加新的图书。3.读者管理实现对读者类别的添加和管理，读者类别可包含老师学生等等，并且各读者类别所借阅的图书书目和借阅时间都存在差别。对已借阅图书的读者的信息进行添加和管理，并且日后可根据登记的读者编号进行查阅。4.借阅管理借阅管理包含对应读者所借图书的相关信息，可根据借阅编号查询相关借阅情况，并查看时候超期借阅，并进行一定金额处罚。图书管理系统借阅管理读者管理图书管理系统管理添加图书类别查询图书信息修改图书信息添加图书信息修改图书类别修改密码添加新管理员查询借书信息管理借书信息查询读者信息管理读者信息添加读者信息管理读者类别添加读者类别图 1-1 图书管理系统功能模块二、概念结构设计图书借阅读者编号名称作者出版日期登记日期nm编号性别单位地址姓名电话管理员借阅编号是否超期借出日期归还日期管理q1用户名登陆密码类别属于类别号类别名已借阅数量登记日期p1惩罚超期属于读者类别惩罚金额惩罚编号类别名称最大借阅数最长借阅时间kh11惩罚类别图 2-1 概念结构E-R图三、逻辑结构设计管理员 （用户名，密码）读者类别（类别名称，最大借阅数，最长借阅时间）读者信息（读者编号，姓名，性别，单位，地址，电话，类别名称，登记日期，已借阅数量）图书类别（类别号，类别名）图书信息（图书编号，图书名称，类别名，作者，出版日期，登记日期）借阅信息（借阅编号，读者编号，读者姓名，图书编号，图书名称，借出日期，归还日期，是否超期）四、数据库物理设计1管理员表Admin图 4-1 Admin表2.读者类别表RT图 4-2 RT表3.读者类别表RI图 4-3 RI表4.图书类别表BC图 4-4 BC表5.图书信息表BI图 4-5 BI表6.借阅信息表LI图 4-6 LI表五、数据库的实施1、读者管理模块实施： 首先使用conn.ConnectionString字符串方法进行与SQL数据库的连接， 在窗体中用commmand控件，label控件和textbox控件画出程序模型，然后建立记录集查询，然后用rs_addreader.Fields绑定各个textbox输入框到数据库。使用rs_addreader.AddNew进行数据添加，使用rs_addreader.update进行数据修改更新，使用rs_addreader.delete进行数据删除。2、借阅管理模块实施： 使用adodc控件实现程序与SQL数据库的连接，在窗体中用commmand控件，label控件和textbox控件画出程序模型，然后在窗体中添加datagrid控件，将其datasource设置成adodc1，在将其中的textbox的datasource属性也设置成adodc1，datafield设置成对应的数据项。然后用ado控件建立第二个数据连接adodc2,用来连接数据库中的读者信息表，实现对外表的查询，在需要添加读者借阅信息时，只需要添加读者号，读者姓名会自动出现在文本框中，具体实现方法，将读者姓名的text2绑定到数据源adodc2，并为读者号的text1添加一个textchange事件：Adodc2.CommandType = adCmdTextAdodc2.RecordSource = "select * from ri where ri_no= '" & Text1.Text & "'"Adodc2.Refresh借阅罚款功能的实现，当单击判断按钮时，自动用当前时间减去借阅时间，如果结果小于等于30，则弹出不超期提示，若结果大于30则将结果减去30再乘以0.1元，得出应缴罚款。具体判断是否超期的按钮代码为：Dim a As DateDim w As Datea = Format(Now, "YYYY-Mm-DD")w = Trim(Text5.Text)b = a - wIf b > 30 ThenMsgBox "借阅已超期，请缴罚款" & (b-30) * 0.1 & "元", vbOKOnly + vbExclamation, "警告"ElseMsgBox "借阅还未超期。", vbOKOnly + vbExclamation, "提示"End IfEnd Sub六、系统运行结果 1、读者管理：图6-1 读者管理菜单图6-2 添加读者类别图6-3 管理读者类别图6-4 添加读者信息图6-5 管理读者信息图6-6 查询读者信息2、借阅管理图6-7 借阅管理图6-8 管理借阅信息图6-9 查询借阅信息图6-10 查询学号为3的学生借阅信息结果七、实习总结时间过得真快，转眼间，两周的课程设计生活已悄然过去了，课程设计期间，让我学到了很多东西，不仅使我在理论上对 VB 程序和SQL 设计有了全新的认识，在实践能力上也得到了提高，真正地做到了学以致用，更学到了很多做人的道理，对我来说受益非浅。亲身感受到理论与实际的相结合，让我大开眼界。这次课程设计对于我以后学习、找工作也真是受益菲浅，在短短的两周中，相信这些宝贵的经验会成为我今后成功的重要的基石，对程序设计有了理性的认识和理解。在之前，程序设计对我来说是比较抽象的，不知道一个完整的程序要怎么完成。 这次我做的项目是图书管理系统，其中包含了登陆、读者信息管理，图书信息管理，借阅信息管理等几个部分。在刚开始的时候，做的 只是几个简单的界面，觉得其实还算比较简单的，到第三天，基本部分的代码都编写出来了，但是调试的时候出现了很多问题。而且，有时候由于考虑不周以及粗心的缘故，代码方面也存在很大的误差。老师教会了我们很多简单实用的技巧。 也让我们意识到了要想全面完整的完成一个模块，首先要经行程序设计，全面分析会用到的东西及考虑可能会出现的情况。所以出现的问题也在老师的指导下，顺利解决了。 本程序的编写，有很多不足的地方，可能有些功能不太全面也不太完善，但我觉得自己是认认真真的做了，而且从中学到了很多，以 后，我要把自己欠缺的知识点补习好，而且要学会举一反三，融会贯 通，最重要的是改掉粗心马虎、考虑不周的习惯。我想我以后会将此 程序完善好，争取能够运用到生活中去。 再次感谢老师的耐心指导！