《2022年VBSQL图管理完整实习.docx》由会员分享，可在线阅读，更多相关《2022年VBSQL图管理完整实习.docx（5页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、*学院课程设计报告课程名称 : 数据库原理课程设计专业: 运算机科学与技术姓名: *班级: *学号: *图书治理系统一、需求分析指导老师 : *2021 年 6 月 17 日当今时代是飞速进展的的信息时代；在各行各业中离不开信息处理，这正是运算机被广泛应用于信息治理系统的缘由；运算机的最大好处在于利用它能够进行信息治理；使用运算机进行信息掌握，不仅提高了工作效率，而且大大的提高了其安全性；特别对于复杂的信息治理，运算机能够充分发挥它的优越性；运算机进行信息治理与信息治理系统的开发亲密相关，系统的开发是系统治理的前提；本系统就是为了治理好图书馆信息而设计的；针对各大中专院校的图书治理现状，设计出
2、适合一般学校的运算机帮助图书治理系统；实现对图书基本信息、读者基本信息进行运算机帮助治理，完成借书和仍书有关信息的记录、修改、查询、删除等一系列任务的运算机治理与实现；图书治理系统能便利、快捷地治理图书，将传统的图书治理方式完全的解脱出来，提高效率，减轻工人人员以往繁忙的工作，减小出错的概率，使读者可以花更多的时间在挑选书和看书上；从而使人们有更多时间来猎取信息、明白信息、把握信息；图书治理系统添加新治理员修改添加修改添加修查添管图 改1-1 图书询治理系统加功能模块理二密 、概图念结构图 设计图码书类别书类别书信息图书信名称息图书信息读者 作者类别类别名编号三、规律结构设计治理员（用户名，密
3、码）读者出类版日期别图 2-1 概念结构 E-R 图添加读者信息登记日期管理读者信息查询读者信息管理借书信息登陆密码查询借书信息管类别读1者类别 （类别名称，最大借阅数p，最长借阅时间q）属于图书治理读者信息 （读者编号，姓名，性别，单位，地n址，电话， 期，已借阅数量）类别名称，登记日员1理类别名图书类别 （类别名，借阅类编别名名）图书信息 （图书编号，图书名称，借出日期类别借名阅，作者，出版日期，登记日期）用户名借阅信息 （借阅编号是否，超期读者编号， 读者姓名， 图书编归仍号日，期图书名称，借出日期，归仍日期，是否超期）四、数据库编号物理设计登记日期m电话读者已借阅数量姓名k1地址性别单
4、位各功能模块描述如下：1. 系统治理系统治理中，能实现新的治理员的添加和现存治理员的密码修改功能；2. 图书治理在图书治理模块中，主要实现对图书类别的添加和治理，并且可以添加新的图书；3. 读者治理实现对读者类别的添加和治理，读者类别可包含老师同学等等，并且各读者类别所借阅的图书书目和借阅时间都存在差别；对已借阅图书的读者的信息进行添加和治理，并且日后可依据登记的读者编号进行查阅；4. 借阅治理借阅治理包含对应读者所借图书的相关信息，可依据借阅编号查询相关借阅情形，并查看时候超期借阅，并进行肯定金额惩罚；系图读借统书者阅管管管管理理理理1. 治理员表 Admin2. 读者类别表 RT图 4-1
5、 Admin 表3. 读者类别表 RI图 4-2RT 表4. 图书类别表 BC图 4-3RI 表5. 图书信息表 BI图 4-4BC 表6. 借阅信息表 LI图 4-5BI 表图 4-6 LI 表五、数据库的实施1、读者治理模块实施：第一使用 conn.ConnectionString字符串方法进行与 SQL 数据库的连接， 在窗体中用 commmand 控件， label 控件和 textbox 控件画出程序模型，然后建立记录集查询，然后用 rs_addreader.Fields绑定各个 textbox 输入框到数据库；使用 rs_addreader.AddNew进行数据添加，使用 rs_a
6、ddreader.update进行数据修改更新，使用 rs_addreader.delete进行数据删除；2、借阅治理模块实施：使用 adodc 控件实现程序与 SQL 数据库的连接，在窗体中用 commmand 控件， label 控件和 textbox 控件画出程序模型，然后在窗体中添加datagrid 控件，将其 datasource设置成 adodc1，在将其中的 textbox 的 datasource属性也设置成 adodc1， datafield 设置成对应的数据项；然后用ado 控件建立其次个数据连接 adodc2,用来连接数据库中的读者信息表，实现对外表的查询，在需要添加读者
7、借阅信息时，只需要添加读者号，读者姓名会自动显现在文本框中，详细实现方法，将读者姓名的 text2 绑定到数据源 adodc2，并为读者号的 text1 添加一个 textchange大事：Adodc2.CommandType = adCmdTextAdodc2.RecordSource = select * from ri where ri_no= & Text1.Text & Adodc2.Refresh借阅罚款功能的实现，当单击判定按钮时，自动用当前时间减去借阅时间，如果结果小于等于 30，就弹出不超期提示，如结果大于30 就将结果减去 30 再乘以 0.1 元，得出应缴罚款；详细判定是
8、否超期的按钮代码为：Dim a As Date Dim w As Datea = FormatNow, YYYY-Mm-DDw = TrimText5.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-
9、5 治理读者信息图 6-6 查询读者信息2、借阅治理图 6-7 借阅治理图 6-8 治理借阅信息图 6-9 查询借阅信息七、实习总结图 6-10 查询学号为 3 的同学借阅信息结果时间过得真快，转瞬间，两周的课程设计生活已悄然过去了，课程设计期间，让我学到了许多东西，不仅使我在理论上对VB 程序和 SQL 设计有了全新的熟悉，在实践才能上也得到了提高，真正地做到了学以致用，更学到了许多做人的道理，对我来说受益非浅；亲身感受到理论与实际的相结合，让我大开眼界；这次课程设计对于我以后学习、找工作也真是受益菲浅，在短短的两周 中，信任这些珍贵的体会会成为我今后胜利的重要的基石，对程序设计有了理 性的
10、熟悉和懂得；在之前，程序设计对我来说是比较抽象的，不知道一个完整 的程序要怎么完成； 这次我做的工程是图书治理系统，其中包含了登陆、读者信息治理，图书信息治理，借阅信息治理等几个部分；在刚开头的时候，做的只是几个简洁的界面，觉得其实仍算比较简洁的，到第三天，基本部分的代码 都编写出来了，但是调试的时候显现了许多问题；而且，有时候由于考虑不周 以及马虎的缘故，代码方面也存在很大的误差；老师教会了我们许多简洁有用 的技巧； 也让我们意识到了要想全面完整的完成一个模块，第一要经行程序设计，全面分析会用到的东西及考虑可能会显现的情形；所以显现的问题也在老 师的指导下，顺当解决了；本程序的编写，有许多不足的地方，可能有些功能不太全面也不太完善，但我觉得自己是认仔细真的做了，而且从中学到了很多，以 后，我要把自己欠缺的学问点补习好，而且要学会举一反三，融会贯通，最重要的是改掉马虎马虎、考虑不周的习惯；我想我以后会将此程序完善好，争取能够运用到生活中去；再次感谢老师的耐心指导！