使用相对路径App.path方法，App表示应用程序所在路径，后面跟的是数据库文件所在的文件夹名或直接和应用程序在一个文件（在一个文件夹就如按下即可），如下ToolBoardMage.mdb代表你的数据库名称，ToolBoardMage代表数据库表的名称Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\ToolBoardMage.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from ToolBoardMage"
Set DataGrid1.DataSource = Adodc1
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024