vb我写的程序连接的数据库怎么设置成相对路径啊，具体方法，我比较菜，谢谢了，代码写在那个位置等等

一般来说数据库放在程序的同目录下，这样才好实现相对路径：
dim DataPath as string
DataPath = App.Path & iif(right(App.path,1)="\","" ,"\") & "MyData.MDB"
strSQL = "Driver={Microsoft Access Driver (*.mdb)}; Dbq=" & DataPath & "; Uid=Admin; Pwd=; "

写在连接字符串里，用app.path..