如何取程序的路径

Question

如何取程序的路径

Answer 1

" & app.path & \你的文件"

Answer 2

App.Path
返回值是string类型的
用时请自行加入尾部是否有"\"判断,如:
dim PathString as string
if left(App.Path,1)<>"\" then
    PathString=App.Path & "\"
   else
    PathString=App.Path
end if
其中PathString是程序执行路径,要引用该路径下的文件或目录直接加在后面就可以了