图书管理系统详细设计说明书及图书管理系统-SQL课程设计说明书

图书管理系统详细设计说明书目录TOC\o"2-3"\t"标题1,1"1 引言 21.1 编写目的 21.2 项目背景 21.3 定义 21.4 参考资料 22 总体设计 22.1 需求概述 22.2 软件结构 23 程序描述 23.1 01登陆模块 23.2 02管理模块 23.3 031图书信息查询模块 23.4 032学生信息查询模块 23.5 021入库管理模块 23.6 022学生借书模块 23.7 023学生还书模块 23.8 024图书注销模块 23.9 接口设计 23.10 测试要点 2PAGE引言编写目的图书管理系统详细设计是设计的第二个阶段，这个阶段的主要任务是在图书管理系统概要设计书基础上，对概要设计中产生的功能模块进行过程描述，设计功能模块的内部细节，包括算法和详细数据结构，为编写源代码提供必要的说明。概要设计解决了软件系统总体结构设计的问题，包括整个软件系统的结构、模块划分、模块功能和模块间的联系等。详细设计则要解决如何实现各个模块的内部功能，即模块设计。具体的说，模块设计就是要为已经产生的图书管理各子系统设计详细的算法。但这并不等同于系统实现阶段用具体的语言编码，它只是对实现细节作精确的描述，这样编码阶段就可以将详细设计中对功能实现的描述，直接翻译、转化为用某种程序设计语言书写的程序。项目背景根据XX学校希望能够充分利用现代科技来提高图书管理的效率，在原有的办公系统基础上进行扩展，将一些可以用计算机来管理的都进行计算机化，使得图书馆管理人员工作更加方便，工作效率也更加的高。定义•ACCESS：数据库管理软件•DBMS：数据库管理系统•Windows2000/2003/XP：运行环境•VisualBasic：软件开发语言总体设计需求概述按照需求分析文档中的规格要求，使用条形码扫描器进书、借书、还书，使得信息传递准确、流畅。同时，系统最大限度地实现易安装，易维护性，易操作性，运行稳定，安全可靠。2.2软件结构系统由3大模块，6小模块组成：序号 编号 名称01登陆模块02管理模块031 图书信息查询模块032 学生信息查询模块021 入库管理模块022 学生借书模块023 学生还书模块024 图书注销模块040 基础信息设置程序描述01登陆模块具体格式见下表：功能编号01功能名称登陆模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-26页码第5页功能流程图功能流程图如下图所示。需要说明的问题：录入项检测使用javascript实现（各项必须非空）登陆.jsp页面也包含查询按钮，在此的登陆.jsp提交的数据只是用户名和密码。功能描述功能类型：查询数据功能描述：提高系统的安全性前提业务：无后继业务：02（管理模块）功能约束：权限约束约束描述：操作权限：图书馆管理员界面设计基础信息处理动作说明：动作编号动作名称动作描述A01登陆点击登陆按钮提交数据到登陆数据处理.jsp页面A02重至点击退重至按钮将当前信息恢复原先状态A03图书信息查询点击将页面转至到图书信息查询.jsp页面A04学生信息查询点击将页面转至学生信息查询.jsp页面A05基础信息点击将显示基础信息数据要求功能类型：数据查询数据描述：页面显示录入字段如下：字段名称长度录入方式是否非空项数据检验默认显示管理员ID10文本框YN管理员密码15passwordYN登陆数据处理.jsp的内部逻辑登陆数据处理： 关键点两点：1，数据库连接；2，记录登陆信息及信息处理；数据库连接：记录登陆信息及信息处理：当用户点击“登陆”按钮之后，数据将提交到登陆数据处理.jsp页面。取得帐号密码这两个从页面传入的值，然后跟数据库当中管理员表中的账号和密码比较。如果正确的话，在JSP的SESSION中存入一个标记属性，表示当前已经有管理员登陆了。处理完毕后，跳转到管理页面，如果失败，则提示登陆失败，并重新进入到登陆页面。存储分配管理员表：（admin）序号字段名类型长度精度小数位数默认值允许空主键说明1(admin_ID)管理员IDInt10√2(admin_password)管理员密码Char153(admin_quanxian)权限Nvarchar1502管理模块具体格式见下表功能编号02功能名称管理模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-26页码第8页功能流程图功能流程图如下所示：需要说明的问题：在选择相应的业务时，需要在当前的页面显示；并且在管理页面内，默认显示图书查询页面。功能描述功能类型：其他功能概述：总体归纳图书馆管理功能前提业务：登陆模块（01）后续业务：021，022，023，024，03功能约束：权限约束约束描述：操作权限：图书馆管理人员界面设计基本信息处理动作说明如下：动作编号动作名称动作描述A01入库管理点击按钮将页面转至入库管理.jsp页面A02学生借书点击按钮将页面转至学生借书.jsp页面A03学生还书点击按钮将页面转至学生还书.jsp页面A04图书注销点击按钮将页面转至图书注销.jsp页面A05图书查询点击按钮将页面转至图书查询.jsp页面数据要求功能类型：其他031图书信息查询模块具体格式如下：功能编号031功能名称图书信息查询模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-26页码第10页功能流程图功能流程图如下图：需要说明的问题：录入项检测使用javascript来实现（各项非空）；操作权限：面向所有用户功能描述功能类型：查询数据功能概述：显示查询结果前提业务：无后继业务：功能约束：没有约束；约束描述：操作权限：面向所有用户界面设计基础信息处理下表是动作说明：动作编号动作名称动作描述A01确定点击按钮提交数据到图书查询数据处理.jsp页面A02学生信息查询点击按钮将页面转至学生信息查询.jsp页面数据要求功能类型：数据查询数据描述：页面显示字段见下表：字段名称长度录入方式是否非空项数据检验默认显示请选择查询类型20下拉列表YN请输入查询内容200文本框YN图书信息查询的输出项书名图书类型作者译者ISBN出版社价格书架名称现存量简介书名图书类型模块内部逻辑存储分配图书目录文件（Book）：序号字段名类型长度精度小数位数默认值允许空主键说明1(BookID)图书编号Int101√自动编号2(TXM)条形码nvarchar203(Title)书名nvarchar2004(TSLX)图书类型Nvarchar50√5(Author)作者Nvarchar20√6(Translator)译者Nvarchar20√7(ISBN)ISBNNvarchar208(CBS)出版社Nvarchar30√10(SJMC)书架名称Nvarchar20√11(XCL)现存量Smallint2√12(KCZL)库存总量Smallint2√13(RKSJ)入库时间Datatime√14(CZY)操作员Nvarchar10√15(JJ)简介Nvarchar200√16(JCCS)借出次数Smallint2√17(SFzhuxiao)是否注销Nvarchar2√18(BookZT)图书状态nvarchar50√借书文件表(JSWJB)：序号字段名类型长度精度小数位数默认值允许空主键外键说明1（JYID）借阅编号Int101√自动编号2(BookID)图书编号Int10√3(StuID)学生编号Int10√4(JYSJ)借阅时间Datatime8√5(DQSJ)到期时间Datatime8√6(XJCS)续借次数Smallint2√7(CZY)操作员Nvarchar10√8(ZT)状态navarchar50√032学生信息查询模块具体格式如下：功能编号032功能名称学生信息查询模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-26页码第12页功能流程图功能流程图如下图：需要说明的问题：录入项检测使用javascript来实现（各项非空）；操作权限：面向所有用户功能描述功能类型：查询数据功能概述：显示查询结果前提业务：无后继业务：功能约束：没有约束；约束描述：操作权限：面向所有用户界面设计基础信息处理下表是动作说明：动作编号动作名称动作描述A01确定点击按钮提交数据到图书查询数据处理.jsp页面A02图书信息查询点击按钮将页面转至图书信息查询.jsp页面数据要求功能类型：数据查询数据描述：页面显示字段见下表：字段名称长度录入方式是否非空项数据检验默认显示请输入学号10文本框YN学生信息查询的输出项学生学号姓名性别生日证件号码联系电话登记日期有效期至已借书数模块内部逻辑存储分配学生文件：序号字段字段名类型长度精度小数位数默认值允许空主键说明1XSID学生编号Int101√自动编号2Name姓名nvarchar103Sex性别nvarchar2√4ZJH证件号码nvarchar25√5LXDH联系电话nvarchar40√6DJRQ登记日期datetime8√7YXQZ有效期至datetime8√8YJSS已借书数smallint2√9RuleID学生规则IDint1010ZT是否挂失nvarchar2√借书文件：序号字段名类型长度精度小数位数默认值允许空主键外键说明1借阅编号Int101√自动编号2图书编号Int10√3学生编号Int10√4借阅时间Datatime8√5到期时间Datatime8√6续借次数Smallint2√7操作员Nvarchar10√8状态navarchar50√021入库管理具体格式如下：功能编号021功能名称入库管理模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-27页码第16页功能流程图执行数据库操作的时候要验证权限录入项检验用javascript来实现（选项非空）功能描述功能类型：添加数据功能描述：增加图书目录文件中的图书信息。前提业务：管理模块后继业务：无功能约束：权限约束约束描述：无操作权限：图书馆管理人员界面设计基础信息处理动作说明如下表：动作编号动作名称动作描述A01保存点击按钮提交数据到入库数据处理.jsp页面A02退出点击按钮将当前页面关闭数据描述功能类型：数据增加。数据描述：页面录入字段见下表：字段名称长度录入方式是否非空项数据检验默认显示书号30文本框YN条形码20文本框YN书名200文本框YN作者20文本框YN出版社30文本框YN版次50文本框YN图书类别20文本框YN单价8文本框YN录入时间默认系统时间，格式：年月日只需程序记录显示在入库界面录入人默认系统登陆人员只需程序记录显示在入库界面入库数据处理内部逻辑：存储分配图书目录文件：序号字段名类型长度精度小数位数默认值允许空主键说明1图书编号Int101√自动编号2条形码nvarchar203书名nvarchar2004图书类型Nvarchar50√5作者Nvarchar20√6译者Nvarchar20√7ISBNNvarchar208出版社Nvarchar30√9价格Money8√10书架名称Nvarchar20√11现存量Smallint2√12库存总量Smallint2√13入库时间Datatime8√14操作员Nvarchar10√15简介Nvarchar200√16借出次数Smallint2√17是否注销Nvarchar2√18图书状态nvarchar50√入库表：序号字段名类型长度精度小数位数默认值允许空主键外键说明1书号Nvarchar301√自动编号2条形码Nvarchar20√3书名Nvarchar200√4作者Nvarchar20√5出版社Nvarchar30√6版次Nvarchar50√7图书类别Nvarchar20√8存放位置Nvarchar20√9单价Money8√10入库数量Smallint2√11金额Money8√12经手人Nvarchar10√13票号Nvarchar30√14操作员Nvarchar10√15日期Datatime8√注：022学生借书模块具体格式如下：功能编号022功能名称学生借书模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-27页码第21页功能流程图需要说明的问题：在进行借书，修改数据信息时，应先查询学生的欠款信息，如欠款超额，则利用javascript实现信息提示，拒绝借书，如无超额，则接受借书。为便于以后的恢复操作，此修改操作只在表中做一个标志，并不是真正的对其修改；功能描述功能类型：修改数据和查询数据功能描述：更新学生借书文件，图书目录文件等中的信息；前提业务：管理模块后继业务：无功能约束：权限约束约束描述：操作权限：图书馆管理人员界面设计基础信息处理动作说明如下：动作编号动作名称动作描述A01重置点击按钮将文本框内的所有数据清空A02提交点击按钮将数据提交到处理学生超额信息页面A03取消将当前页面关闭，并取消借阅数据描述功能类型：修改数据和查询数据界面设计：数据字段描述：字段名称长度录入方式是否非空项数据检验默认显示学生证件号码10文本框YN书籍条形码号10文本框YN图书借阅数据处理内部逻辑存储分配借书文件：序号字段名类型长度精度小数位数默认值允许空主键外键说明1借阅编号Int101√自动编号2图书编号Int10√3学生编号Int10√4借阅时间Datatime8√5到期时间Datatime8√6续借次数Smallint2√7操作员Nvarchar10√8状态navarchar50√罚款单：序号字段名类型长度精度小数位数默认值允许空主键外键说明1借阅编号Int101√自动编号2图书编号Int10√3学生编号Int10√4应罚金额Smallint3√5实收金额Smallint3√6状态Nvarchar1√7备注Nvarchar200√学生文件：序号字段字段名类型长度精度小数位数默认值允许空主键说明1XSID学生编号Int101√自动编号2Name姓名nvarchar103Sex性别nvarchar2√4ZJH证件号码nvarchar25√5LXDH联系电话nvarchar40√6DJRQ登记日期datetime8√7YXQZ有效期至datetime8√8YJSS已借书数smallint2√9RuleID学生规则IDint1010ZT是否挂失nvarchar2√023学生还书具体格式如下：功能编号023功能名称学生还模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-27页码第27页功能流程图需要说明的问题：显示结果可直接在处理结果.jsp中利用javascript来实现显示功能！处理要包含：对图书状态和借书文件表中信息的修改以及学生的欠款金额的计算，并更新Publish表。功能描述功能类型：修改数据功能概述：完成学生的还书业务并计算学生的欠款信息前提业务：管理模块后继业务：无功能约束：权限约束约束描述：操作权限：图书馆管理人员界面设计基础信息处理动作编号动作名称动作描述A01重置点击按钮将文本框内的所有数据清空A02提交点击按钮将数据提交到处理还书信息页面界面描述：数据描述字段名称长度录入方式是否非空项数据检验默认显示书籍条形码号10文本框YN 存储分配借书文件：序号字段名类型长度精度小数位数默认值允许空主键外键说明1借阅编号Int101√自动编号2图书编号Int10√3学生编号Int10√4借阅时间Datatime8√5到期时间Datatime8√6续借次数Smallint2√7操作员Nvarchar10√8状态navarchar50√学生文件：序号字段字段名类型长度精度小数位数默认值允许空主键说明1XSID学生编号Int101√自动编号2Name姓名nvarchar103Sex性别nvarchar2√4ZJH证件号码nvarchar25√5LXDH联系电话nvarchar40√6DJRQ登记日期datetime8√7YXQZ有效期至datetime8√8YJSS已借书数smallint2√9RuleID学生规则IDint1010ZT是否挂失nvarchar2√图书目录文件：序号字段名类型长度精度小数位数默认值允许空主键说明1图书编号Int101√自动编号2条形码nvarchar203书名nvarchar2004图书类型Nvarchar50√5作者Nvarchar20√6译者Nvarchar20√7ISBNNvarchar208出版社Nvarchar30√9价格Money8√10书架名称Nvarchar20√11现存量Smallint2√12库存总量Smallint2√13入库时间Datatime8√14操作员Nvarchar10√15简介Nvarchar200√16借出次数Smallint2√17是否注销Nvarchar2√18图书状态nvarchar50√罚款单; 序号字段名类型长度精度小数位数默认值允许空主键外键说明1借阅编号Int101√自动编号2图书编号Int10√3学生编号Int10√4应罚金额Smallint3√5实收金额Smallint3√6状态Nvarchar1√7备注Nvarchar200√024图书注销具体格式如下：功能编号024功能名称图书注销模块内容功能流程图所属业务图书馆管理所属项目图书馆管理系统编写人陈新光完成时间2007-11-27页码第31页功能流程图需要说明的问题：显示结果可直接在处理结果.jsp中利用javascript来实现显示功能！在处理图书注销的时候，为了便于以后的恢复操作，此删除操作只在表中做一标志，并不是真正的删除。功能描述功能描述：删除数据功能概述：注销图书前提业务：管理模块后继业务：无约束描述：操作权限：图书馆管理人员界面设计基础信息处理动作说明如下：动作编号动作名称动作描述A01重置点击按钮将文本框内的所有数据清空A02提交点击按钮将数据提交到处理还书信息页面界面描述：数据描述：字段名称长度录入方式是否非空项数据检验默认显示书籍条形码号10文本框YN对于图书注销业务的处理存储分配图书目录文件：序号字段名类型长度精度小数位数默认值允许空主键说明1图书编号Int101√自动编号2条形码nvarchar203书名nvarchar2004图书类型Nvarchar50√5作者Nvarchar20√6译者Nvarchar20√7ISBNNvarchar208出版社Nvarchar30√9价格Money8√10书架名称Nvarchar20√11现存量Smallint2√12库存总量Smallint2√13入库时间Datatime8√14操作员Nvarchar10√15简介Nvarchar200√16借出次数Smallint2√17是否注销Nvarchar2√18图书状态nvarchar50√基础信息设置接口设计测试要点测试范围测试范围主要内容简要说明系统登陆验证验证用户身份，进行权限控制功能性测试信息检索功能测试测试数据库检索代码的健壮性功能性测试测试方法功能性测试：黑盒测试SQLServer网络数据库课程设计说明书系别：专业：班级：学号：姓名：时间：目录项目说明…………….1总体设计…………….1数据库设计………….3详细设计与功能体现……………….4系统运行结果分析………………...11项目说明项目名称：图书管理系统功能：实现对图信息书、读者信息以及图书借阅情况等内容的管理与查询。运行环境：图形界面在VisualBasic.NET2005中运行，数据库在SQLserver2005中运行。开发环境：VisualBasic.NET2005、SQLserver2005总体设计图书管理界面包括：初始界面、登录界面、图书管理主界面、图书入库界面、图书注销界面、图书借阅与归还界面、用户注册界面、用户注销界面、用户密码修改界面、图书信息查询界面、读者信息查询界面、借阅信息查询界面、关于系统界面、关于主题界面。图书注销图书入库功能层次说明图图书注销图书入库图书借阅与归还退出系统登录界面图书借阅与归还退出系统登录界面主界面图书管理用户管理信息查询帮助用户注销用户注册用户密码修改读者信息查询图书信息查询借阅信息查询关于主题关于系统登录数据库设计数据表包括：登录用户信息表、图书信息表、读者信息表、借阅信息表登录用户信息表用户名126liu用户密码126man图书信息表图书编号图书名图书类别作者译者出版社出版时间价格01网络数据库必修李岩清华大学出版社29.0002VB课程设计必修刘怀亮人民大学出版社25.0003JAVA开发必修王卫生北京大学出版社29.8004数据结构必修吴伟民清华大学出版社30.0005公共英语必修李氏分北京大学出版社26.9806毛泽东思想选修郝文丽人民大学出版社28.9608计算机基础选修梁宁青年出版社21.0909管理心理学选修10信息检索选修12股票投资必修读者信息表读者编号读者姓名性别年龄系别专业电话0801时守传男21电气与电子工程系计算机应用技术152265937110802张三男20建工系工程造价0803李四男20信息系网络技术0804王五女21经贸系国际贸易0805周六女21电气与电子工程系电气自动化0810李丽女20软件学院软件开发刁俊龙男20电气与电子工程系计算机应用技阅信息表图书名网络数据库毛泽东思想股票投资公共英语借阅情况以借阅以借阅以借阅以借阅以借阅以借阅详细设计与功能体现界面设计登录界主窗体图书添加图书注销图书借阅与归还用户注册用户注销用户密码修改图书信息查询读者信息查询借阅信息查询关于系统关于主题系统运行结果分析： 根据管理和查询情况输入要查询的信息，根据提示完成对信息的管理和查询等各项任务，各项功能结果例图：图书信息查询核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimda1AsNewSqlDataAdapter("select*frombookwhere图书名='"&TextBox1.Text.Trim&"'",cn)Dimda2AsNewSqlDataAdapter("select*frombookwhere图书编号='"&TextBox1.Text.Trim&"'",cn)Dimtal1AsNewDataTableDimtal2AsNewDataTableDimda11AsNewSqlCommand("select*frombookwhere图书名='"&TextBox1.Text.Trim&"'",cn)Dimda21AsNewSqlCommand("select*frombookwhere图书编号='"&TextBox1.Text.Trim&"'",cn)cn.Open()DimrsAsSqlDataReaderIfComboBox1.Text="书名"Thenrs=da11.ExecuteReaderIfNotrs.ReadThenMsgBox("此书不存在，请重新输入",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""Elsers.Close()da1.Fill(tal1)cn.Close()DataGridView1.DataSource=tal1TextBox1.Text=""EndIfElsers=da21.ExecuteReaderIfNotrs.ReadThenMsgBox("此编号不存在，请重新输入",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""Elsers.Close()da2.Fill(tal2)cn.Close()DataGridView1.DataSource=tal2TextBox1.Text=""EndIfEndIfEndSubPrivateSubButton3_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton3.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimtb2AsNewDataTableDimdaAsNewSqlDataAdapter("select*frombook",cn)da.Fill(tb2)DataGridView1.DataSource=tb2cn.Close()EndSub读者信息查询核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickIfComboBox1.Text="编号"ThenDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimda1AsNewSqlCommand("select*fromreaderwhere读者编号='"&TextBox1.Text.Trim&"'",cn)Dimda11AsNewSqlDataAdapter("select*fromreaderwhere读者编号='"&TextBox1.Text.Trim&"'",cn)DimtalAsNewDataTablecn.Open()DimrsAsSqlDataReader=da1.ExecuteReaderIfNotrs.ReadThenMsgBox("此编号不存在，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""Elsers.Close()da11.Fill(tal)cn.Close()DataGridView1.DataSource=talTextBox1.Text=""EndIfElseDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimda21AsNewSqlDataAdapter("select*fromreaderwhere读者姓名='"&TextBox1.Text.Trim&"'",cn)Dimda2AsNewSqlCommand("select*fromreaderwhere读者姓名='"&TextBox1.Text.Trim&"'",cn)Dimtal1AsNewDataTablecn.Open()Dimrs1AsSqlDataReader=da2.ExecuteReaderIfNotrs1.ReadThenMsgBox("此读者不存在，请重新输入",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""Elsers1.Close()da21.Fill(tal1)cn.Close()DataGridView1.DataSource=tal1TextBox1.Text=""EndIfEndIfEndSubPrivateSubReaderCheck_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadEndSubPrivateSubButton3_Click_1(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton3.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimtb2AsNewDataTableDimdaAsNewSqlDataAdapter("select*fromreader",cn)da.Fill(tb2)DataGridView1.DataSource=tb2cn.Close()EndSub用户注册核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)DimcmdAsNewSqlCommand("insertintouser1values('"&TextBox1.Text.Trim&"','"&TextBox2.Text.Trim&"')",cn)Dimda1AsNewSqlDataAdapter("select*fromuser1wherename='"&TextBox1.Text.Trim&"'",cn)Dimdr1AsNewSqlCommand("select*fromuser1wherename='"&TextBox1.Text.Trim&"'",cn)DimrsAsSqlDataReadercn.Open()rs=dr1.ExecuteReaderIfTextBox1.Text=""OrTextBox2.Text=""OrTextBox3.Text=""ThenMsgBox("登录名或密码不能为空！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""ElseIfrs.ReadThenMsgBox("此用户名已存在，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""ElseIfTextBox2.Text<>TextBox3.TextThenMsgBox("两次输入的密码不相同，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""Elsers.Close()cmd.ExecuteNonQuery()cn.Close()MsgBox("恭喜您，添加成功！",MsgBoxStyle.OkOnly,"系统提示")Me.Close()EndIfEndIfEndSub用户密码修改失败用户密码修改成功核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)DimcmdAsNewSqlCommand("selectpwdfromuser1wherename='"&TextBox1.Text.Trim&"'",cn)Dimname1AsNewSqlCommand("select*fromuser1wherename='"&TextBox1.Text.Trim&"'",cn)Dimpwd1AsStringcn.Open()DimrsAsSqlDataReader=name1.ExecuteReaderIfNotrs.ReadThenMsgBox("用户名错误，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""TextBox4.Text=""Elsers.Close()pwd1=cmd.ExecuteScalarIfpwd1<>TextBox2.TextThenMsgBox("原密码错误，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""TextBox4.Text=""ElseIfTextBox3.Text=""ThenMsgBox("密码不能为空，请重新输入",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""TextBox4.Text=""ElseIfTextBox3.Text<>TextBox4.TextThenMsgBox("两次输入的密码不能为空，请重新输入！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""TextBox4.Text=""ElseIfTextBox3.Text=TextBox4.TextThencmd.CommandText="updateuser1setpwd='"&TextBox3.Text&"'wherename='"&TextBox1.Text&"'"cmd.ExecuteNonQuery()MsgBox("恭喜您，密码修改成功！",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""TextBox2.Text=""TextBox3.Text=""TextBox4.Text=""Me.Close()cn.Close()EndIfEndIfEndIfEndIfEndSub图书借阅与归还功能核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimda1AsNewSqlDataAdapter("select*frombookwhere图书名='"&TextBox1.Text.Trim&"'",cn)Dimtal1AsNewDataTableDimda11AsNewSqlCommand("select*frombookwhere图书名='"&TextBox1.Text.Trim&"'",cn)cn.Open()DimrsAsSqlDataReaderrs=da11.ExecuteReaderIfNotrs.ReadThenMsgBox("对不起，此书不存在，请重新输入",MsgBoxStyle.OkOnly,"系统提示")TextBox1.Text=""Elsers.Close()da1.Fill(tal1)cn.Close()DataGridView1.DataSource=tal1EndIfEndSub图书借阅信息查询核心代码：PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimcnAsNewSqlConnection(My.Settings.LibrarySystem)Dimda2AsNewSqlDataAdapter("select*fromborrowwhere图书名='"&TextBox1.Text.Trim&"'",cn)Dimdr2AsNewSqlCommand("select*fromborrowwhere图书名='"&TextBox1.