VB中怎样取文件相对路径？

[jjdelphi]

当前路径是c:\aaa，文件为c:\aaa\bbb\ccc\d.txt
怎样把相对路径\bbb\ccc取出来？

[daviddivad]

app.path & "\bbb\ccc\d.txt"

[56xue]

看你写的exe文件在什么地方了

[lzj34]

你写的exe文件放什么地方?
如exe放在c:\则为app.path & "aaaa\bbb\ccc\d.txt"

[lihonggen0]

Dim str, str1 As String
str = "c:\aaa\bbb\ccc\d.txt"
str1 = "c:\aaa"
MsgBox Mid(str, Len(str1) + 1, InStrRev(str, "\") - Len(str1) - 1)

[blueice2002]

app.path & "\bbb\ccc\d.txt"

[China200878]

用FileSystemObject对象。来判断