const.bas

来自「vb与access数据库的操作实例」· BAS 代码 · 共 11 行

Attribute VB_Name = "Const"
'版本号
Public Const VerNum As String = "版本 1.0"
'生成日期
Public Const GenDate As String = "日期 2004-09-08"
'数据源信息常量
Public Const DBName As String = "Device.mdb"
 '一次执行connect操作可以访问数据库的次数
Public Const CONNECT_LOOP_MAX = 10