module1.bas

产品入库管理信息系统 包括功能如下： 1.产品入库管理 2.产品入库查询 3.产品入库修改 4.产品入库删除 5.系统设置

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