modconst.bas

来自「在VB中开发的连接SQL的图书管理系统。」· BAS 代码 · 共 12 行

Attribute VB_Name = "modConst"
'数据源信息常量
Public Const DATASOURCE As String = "127.0.0.1"   '数据源
Public Const DBNAME As String = "BookManage"      '数据库
Public Const DBUSER As String = "sa"              '用户
Public Const CONSTR As String = "Provider=SQLOLEDB.1;Trusted_Connection=Yes;Data Source=" _
                              + DATASOURCE + ";User ID=" + DBUSER + ";Password=;Initial Catalog=" _
                              + DBNAME + ";"
'定义树结点常量
Public Const TREENAME As String = "tvw"