有关VB6.0中 App.path的问题

1、App.path 表示的是当前程序运行的路径

2、若该路径为根目录时则该路径右边为 \

3、例程：

Dim fullpath As String

　　If Right(App.Path, 1) = "\" Then             ' 若 App.Path 为根目录 即App.Path 为 c:\

　　 fullpath = App.Path + "文件名称"           ‘获取文件的全路径  例如 c:\abc.txt

　　Else

　　 fullpath = App.Path + "\" + " 文件名称"    ’不是根目录文件的全路径  若为 c:\download  ↔ c:\download\ abc.txt

　　End If

　　 ' fullpath 等于 "文件名称" 的完整路径名称