关于VB的一些小问题~~~大家帮忙看看~~
我在桌面键了个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所在路径.