module1.bas

来自「简单的数据库图书管理系统四」· BAS 代码 · 共 17 行

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