const.bas

图书管理系统,用VB做的,可以使用,用于课程设计

Attribute VB_Name = "Const"
'版本号
Public Const VerNum As String = "版本 1.0"
'生成日期
Public Const GenDate As String = "日期 2005-11-25"
'定义数据库连接字符串
Public Const Conn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=House.mdb;"    '设置连接字符串ConnectionString属性
 '一次执行connect操作可以访问数据库的次数
Public Const CONNECT_LOOP_MAX = 10