我在桌面键了个ACCESS的数据库~~在VB里弄了个代码：但调试的时候怎么说：找不到F：/VB1/data.mdb??请问程序怎么会到F盘去找？你们能帮我解释一下吗？Private Sub Command1_Click()Dim a As DatabaseSet a = OpenDatabase(App.Path & "/bata.mdb")Set rs = a.OpenRecordset("select * from users")If Not (a Is Nothing) ThenMsgBox "打开数据库文件"End IfEnd Sub
參考答案:App.Path 属性
对于 App 对象，当从开发环境运行该应用程序时 Path 指定 .VBP 工程文件的路径，或者当把应用程序当作一个可执行文件运行时 Path 指定 .exe 文件的路径。
未编译前 app.path指向工程文件.vbp所在路径,编译后指向可执行文件.exe所在路径.