借书：

借书是图书管理系统的主要流程之一，其过程是在馆藏中查找自己所需要的图书，然后进行借书、借书登记等操作。

其流程图如图3-2

还书：

借书是图书管理系统的主要流程之一，其过程是输入还书的编号或者还书的名称，然后进行还书操作，同时删除借阅记录。

其流程图如图3-3

第4章图书管理系统的功能实现

4.1登陆界面编码设计

本窗体集成了”登录”模块，因此在系统加载时，需要先启动”登录”模块的登录窗体，只有当用户输入了正确的用户名和密码，才能进入到系统主界面。

“登录”窗体运行界面，如图：

当user表没有该用户，将无法使用本程序。

user = myrs("user ")

将公共变量user设为用户的身份

此窗体的主要代码设计如下：

Dim rs_login As New ADODB.Recordset

If Trim(Combo1.Text) = "" Then

   MsgBox "没有这个用户", vbOKOnly + vbExclamation, ""

   Combo1.SetFocus

Else

   sql = "select * from 系统管理 where 用户名='" & Combo1.Text & "'"

      Else

         MsgBox "密码不正确", vbOKOnly + vbExclamation,

         txtpwd.SetFocus

   登录成功后，管理员可以进行添加和删除用户，修改密码，修改各种资料等操作。

 
若图片无法显示请联系QQ752018766,图书管理系统免费,转发请注明源于www.youerw.com

4.2读者管理界面编码设计

通过DataCombol控件连接到数据库的dbl基础数据表，用DATA GRID控件，将它的各列显示出数据库的各列，属性设为可写，连接到数据库。

用Text 控件来显示所输入的内容，单击“保存“按钮后就可以保存到数据库中，通过ADO控件来浏览记录。

实现读者资料登记的添加、删除、修改、保存功能。

读者管理界面如图：

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >>