Public LinkStr As String
Sub main()
LinkStr = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source =" + App.Path + "\..\Data.mdb ; Persist Security Info=False"
End Sub
在模块里```

自己放进去测试下不能得到结果麽？

可以的