module1.bas

来自「产品入库管理信息系统 包括功能如下： 1.产品入库管理 2.产品入库查询 」· BAS 代码 · 共 8 行

Attribute VB_Name = "Module1"
'连接数据库的连接字符串
Public Function ConnectString() As String
    '返回一个数据库连接的字符串
    ConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + _
    App.Path + "\product.mdb;Persist Security Info=False"
End Function