关于获得文件的当前路径
建立一个工程Project1.vbp
在该工程目录下有个文件result.txt
当读取该文件时
Open "lianjieganset.txt " For Input As #1
存在两种情况
（1）如果直接运行Project1.vbp程序正常
（2）如果先运行VB再以打开文件形式打开Project1.vbp则读取文件出现错误
调试发现第二种方式会以VB.exe所在目录为当前目录
我的是“C:\Program Files\Microsoft Visual Studio\VB98\”
在这个目录下找不到result.txt文件因此出现错误。
怎么样能使第二种打开方式仍然能正确获得result.txt的目录
我试过以下几个函数，
（1）DWORD GetCurrentDirectory(
DWORD nBufferLength, //接收目录的字符串的长度
LPTSTR lpBuffer //接收目录的字符串的地址
);
（2）GetModuleFileName
(ByVal hModule As Long, '需要查找文件名模块句柄
ByVal lpFileName As String, '//接收目录的字符串的地址
ByVal nSize As Long '//接收目录的字符串的长度
)
（3）GetFullPathName
(ByVal lpFileName As String, '包含文件名字符串的指针
ByVal nBufferLength As Long, '路径缓冲区大小
ByVal lpBuffer As String, '路径缓冲区的指针
ByVal lpFilePart As String '指向文件名在路径中的地址
)
结果获得的都是
“C:\Program Files\Microsoft Visual Studio\VB98\”
不知道大家有没有好办法
[解决办法]
app.path
