1、图书管理系统的设计与实现摘 要 Visual Basic 作为一种非常简单实用的可视化编程语言非常适合高职高专学生学习。本文利用 Visual Basic 6.0、ADO 和 Access 2003 开发了一个图书管理系统，在高职高专计算机专业 Visual Basic 程序设计课程的教学中取得了良好的教学效果。 关键词 Visual Basic 6.0；Access 2003；ADO；图书管理系统；设计 doi ： 10 . 3969 / j . issn . 1673 - 0194 . 2013 . 15. 032 中图分类号 TP315 文献标识码 A 文章编号 1673 - 0194（
2、2013）15- 0049- 03 Visual Basic（简称 VB）是微软公司于 1991 年推出的可视化编程语言。ADO（ActiveX Data Objects，ActiveX 数据对象）是目前应用范围最广的数据访问接口，在 VB 中可以非常方便地使用 ADO 技术访问各种类型的数据库。Access 是常用的桌面数据库系统，VB+Access 被人们称作创建桌面数据库应用系统的“黄金搭档”1。本文采用 VB 6.0+ADO +Access 2003 设计并实现了一个图书管理系统，系统难易程度适中，非常适合高职高专计算机专业学生 Visual Basic 程序设计课的教学，在笔者的实际
3、教学中取得了良好的教学效果。 1 系统设计 系统主要包括以下模块：“系统登录”模块、 “读者管理”模块、“图书管理”模块、 “图书借阅管理”模块、 “读者天地”模块等。系统功能模块如图 1 所示。 2 数据库设计 本系统采用的数据库是 Office 2003 中的 Access 2003 数据库。新建“图书信息数据库.mdb”数据库，其中包括 4 张表：“管理员表” ，用来记录系统管理员的用户名和密码；“普通用户表” ，用来记录普通读者的相关信息；“图书借阅信息表” ，记录图书借阅的相关信息；“图书信息表” ，记录图书的相关信息。在 VB 中提供了利用 ADO 访问数据库的两种主要形式：ADO
4、 数据控件（ADODC）和 ADO 对象编程模型（ADO 代码） 。本系统中连接数据库时使用的均是 ADO 数据控件的方式。 3 系统各功能模块的设计与实现 系统运行的第一个界面即主界面如图 2 所示。初始运行时，除“系统登录” 、 “系统使用说明” 、 “退出系统”外，其他模块都是禁用的。用户可以查看“系统使用说明”来使用该系统。 3.1 “系统登录”模块 “系统登录”是用户进入到程序系统的门户，只有通过登录模块，才能对登录用户进行身份验证2，只有系统的合法用户才可以使用系统的几大功能模块。本系统中有管理员和普通读者两种合法用户。管理员登录系统时，系统会将输入的用户名和密码与数据库中“管理员
5、表”中的记录进行匹配，如果符合则系统主界面中禁用的几个模块都变为可用，否则报错。普通读者用户登录与管理员登录类似。核心代码如下： sql = “SELECT*FROM 管理员表 where 用户名=“ & Text1.Text & “and 密码=“ & Text2.Text & “ “ Adodc1.RecordSource = sql 以 SQL 查询作为 ADODC 的记录源 Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then frmmain.jie.Enabled = True 系统各功能模块可用 3.2 “读者管理”与“图书管理
6、”模块 在“图书管理”模块中管理员可以对图书进行新增入库、图书信息修改、删除、查询等一系列操作。在实现上述功能时分别使用 ADODC 控件的 Recordset 对象的 AddNew 方法、Update 方法、Delete 方法。在“读者管理”模块中，管理员可以对读者信息进行增加、修改、删除等操作。在实现上述功能时也是使用 ADODC 控件的 Recordset 对象的AddNew 方法、Update 方法、Delete 方法。 （1）图书新增入库/读者信息增加的核心代码如下： Adodc1.Recordset.AddNew 使用 ADODC 控件的 Recordset 对象的AddNew 方
7、法增加一条空记录 Adodc1.Recordset！借书证号 = Trim￥（Combo1.Text） 注册读者信息的“借书证号”字段，其他字段与之类似 Adodc1.Recordset.Update 调用 Update 方法更新 （2）删除图书信息/删除读者信息的核心代码如下： If MsgBox（“确定要删除该记录吗？“， vbOKCancel， “删除记录“） = vbOK Then 弹出询问是否删除的对话框 Adodc1.Recordset.delete 调用 delete 方法删除 （3）查询图书信息的核心代码如下3： sql1 = sql1 & “ AND “ & sqlA（i）
8、用 AND 运算符加入多个查询条件。 sql = “SELECT* FROM 图书信息表 WHERE “ & sql1 & “ “ Adodc1.RecordSource = sql 刷新 Adodc1，以 SQL 查询作为 ADODC的记录源 Set DataGrid1.DataSource = Adodc1 重新绑定数据网格控件 3.3 “图书借阅管理”模块 “图书借阅管理”模块是本系统的核心模块，完成图书借阅和借出图书的归还两项功能。在“图书借阅模块”中，管理员通过图 3 中上方的查询界面查询到读者想要借阅的图书，在下方输入借书证号，选择要借阅的图书，点击“借阅”按钮实现图书借阅。借阅图
9、书时，系统会向“图书借阅信息表”中添加一条借阅记录，同时该书所在的“图书信息表”中的“图书数量”值会减 1，核心代码如下： sql = “select*from 图书信息表 where 书名=“ & DataGrid1.Columns（“书名“）.Text & “ “ Adodc1.RecordSource = sql Adodc1.Refresh If Adodc1.Recordset（“图书数量“） = 1 Then Adodc1.Recordset！图书数量 = Adodc1.Recordset！图书数量 -1 在“还书管理”中，输入借书证号，点击“确定”按钮可以查询到该借书证所借的所有
10、图书记录，选择要归还的图书，点击“还书”按钮，实现还书。实现还书时系统会将“图书借阅信息表”中的该条借阅记录删除，同时，该书对应的“图书信息表”中的“图书数量”值增加 1。界面图及核心代码略。 3.4 “读者天地”模块 普通读者登录后可以使用系统的“读者天地”模块。在该模块中实现“图书信息查询” 、 “读者信息修改”和“读者续借图书”3 项功能。“读者续借图书”可以让读者对所借图书续借指定天数，输入借书证号，点击“确定”按钮可以查询该借书证所借图书目录，在列出的目录中选择要续借的图书，点击“续借”按钮实现续借。续借后，在“图书借阅信息表”中该条借阅记录的还书日期会增加指定天数。界面图及核心代码
11、略。 4 结 语 对于高职高专学生来说，大型图书管理系统代码复杂，难以理解。本文利用 Visual Basic 6.0+ADO+Access 2003 设计并实现了一个简易图书管理系统，主要用于高职高专计算机专业 Visual Basic 程序设计的教学案例。通过此系统的学习，学生可以掌握简单管理信息系统的开发流程，后续工作可以扩展此系统的功能，如进一步完善界面设计、在连接数据库时采用 ADO 对象模型编程，实现更复杂的功能。 主要参考文献 1郑有增，孙洪峰. Visual Basic 6.0 程序设计与实训教程M.北京：中国水利水电出版社，2008. 2高春艳，安剑，巩建华. 学通 Visual Basic 的 24 堂课M.北京：清华大学出版社，2011. 3杨小影. Visual Basic 程序设计基础M.北京：中国水利水电出版社，2006.
