基于vb下的高校图书管理系统.docVIP

基于vb下的高校图书管理系统[多图] 1、概述　　 为适应教育现代化的迫切要求，提高高校图书馆的现代化管理水平，提高图书馆使用效率，更好的配置图书资源，降低工作人员劳动强度；结合本人实际兴趣及知识，开发了此软件。　　2、详细设计　　2．1.系统功能模块图　　2．2. 数据流图：　　图片看不清楚？请点击这里查看原图（大图）。　　3.数据库设计　　3.1 数据库概念结构设计：　　3.2数据库逻辑结构的设计　　包括有系统用户表yonghu、读者表duzhe、图书表tushu、借阅表jieshu、设置表shez。　　图书表tushu　　字段名称　　类型　　说明　　图书编号　　文本　　书名　　文本　　作者　　 文本出版社　　文本　 　单价　　文本　　 本数　　文本　　 已借出数　　文本　　 借出次数　　文本 　　读者表duzhe　字段名称类型　　说明　　读者编号　　文本　　姓名　　文本　　班级　　文本　　电话号码　　文本　借阅次数　　文本　　已借本数　　文本　　已交罚款　　文本　　借阅表jieshu　　字段名称　　类型　　说明　　读者编号　　文本　　图书编号　　文本　　借书日期　　日期/时间　　还书日期　　日期/时间　应还日期　　日期/时间　　续借　　文本　　设置表shez　　字段名称　　类型　　说明　　还书期限　　整型　　续借期限　　整型　　最大借书数　　整型　　4、主要功能模块设计　　4.1.系统登陆界面设计　　功能介绍：　　 用户选择用户名并输入密码，系统按用户名查看yonghu表，若密码正确，则按权限进入图书管理系统的主界面；若用户密码输入不正确，则系统提示出错,要求重新输入密码否则不得进入本系统。（注：还定义了一个模块名为module1.bas ,pubyh和quanxian都是全局变量，一个保存用户名，一个保存权限、还有hsqx 、xjqx 、zdjss用于保存还书期限、续借期限、最大借书数。）代码实现：Private Sub Command1_Click()　　　 Adodc1.RecordSource = select * from yonghu where 用户名= DataCombo1.Text and 密码= Text1.Text 　　　 Adodc1.Refresh　　　 If Adodc1.Recordset.EOF = False Then　　　　　　 pubyh = DataCombo1.Text　　　　　　 quanxian = Adodc1.Recordset.Fields(权限)　　　　　　 Me.Hide　　　　　　 MDIForm1.Show　　　 Else　　　　　　 MsgBox 密码错误，请重新输入！, vbOKOnly + vbExclamation, 图书馆　　　　　　 Text1.Text = 　　　　　　 Call Form_Load　　　 End IfEnd SubPrivate Sub Form_Load()　　　 Adodc1.ConnectionString = Provider=Microsoft.Jet. OLEDB.4.0;Data Source= App.Path kcsj.mdb;Persist Security Info=False　数据库的连接，使用相对路径　　　 Adodc1.RecordSource = select * from yonghu　　　 Adodc1.Refresh　　　 Label5.Caption = 日期: Date　　　 End Sub4.2图书管理系统的主界面设计　　(a)界面设计：　　（b）功能介绍：　　 主界面的功能有系统管理模块：系统设置、用户管理、注销、退出。数据管理模块：借书管理、续借管理、还书管理、图书管理、读者管理。数据查询模块：借阅查询、图书查询、读者查询。统计排行模块：读者统计排行、图书统计排行。今日盘点模块：今日借出图书、今日归还图书、今日到期图书。使用了菜单、工具栏和状态栏。　　（c）代码实现：Private Sub MDIForm_Activate()Unload frmloginAdodc1.ConnectionString = Provider=Microsoft.Jet. OLEDB.4.0;Data Source= App.Path kcsj.mdb;Persist Security Info=False　　　 Adodc1.RecordSource =