如何获知exe文件所在的路径？

Question

如题

Answer 1

app.path 返回EXE所在的文件夹。如果这个文件夹中的个论据file.txt
如果要得到这个文件的路径：app.path & "/file.txt"。注意加个“/”.

Answer 2

App.Path & "\" & App.EXEName & ".exe"

Answer 3

再给补充个建议，除非你肯定你的exe文件不在根文件夹下，否则你还需要检测app.path 生是否真的要加上一个"\"。因为，如果exe在根目录中，如c:\、d:\，此时app.path会直接返回c:\，若再加上一个"\"就出错了。

Answer 4

Private Sub Command1_Click()
    If Right(App.Path) <> "\" Then
        MsgBox App.Path & "\" & App.EXEName
    Else
        MsgBox App.Path & App.EXEName
    End If
End Sub

Answer 5

就是楼上说的
If Right(App.Path) <> "\" Then
        MsgBox App.Path & "\" & App.EXEName
    Else
        MsgBox App.Path & App.EXEName
End If

Answer 6

http://community.csdn.net/Expert/FAQ/FAQ_Index.asp?id=196541