module1.bas

本程序制作的是一个比较简单的图书管理系统,它能实现大部分的基本功能.在VB环境下运行,程序中初始登陆帐号超级用户和密码均为2008

Attribute VB_Name = "module"
Public BookId As String  '借书证号码
Public BookNum As Integer  '可以借书的册数
Public BookDay As Integer  '可以借书的天数
Public FaCost As Single  '超出一天的罚款
Public LoginFlag As Boolean '是否登录
Public BookBianHao As String '图书编号
Public SearchFlag As Boolean '是否查找

Public mAddEditId As String
Public mAddEditIdName As String
Public mAddEditIdClass As String
Public mAddEditIdDepart As String
Public mAddEditIdZhi As String
Public mSave As Boolean