怎么取路径的当前目录名？

Question

比如路径为：I:\软件\test\调试\1级目录\
得到文件夹名：1级目录
语句要越简单越好，有什么语句？

Answer 1

Dim FPath() As String
Dim Path As String
    Path = "I:\软件\test\调试\1级目录\"
    FPath = Split(Path,"\")
    Print FPath(UBound(Split(Path, "\")) - 1)不知道有没有更简单的？

Answer 2

Right(Path, InStr(2, StrReverse(Path), "\"))

Answer 3

如果你是每次要用到那路径的话，直接调用 Application.StartupPath 
用法就是data source=Application.StartupPath & "\文件"
就是你所运行程序的当前目录下的文件

Answer 4

如果你是在“I:\软件\test\调试\1级目录\”下测试的话用
MessageBox.Show(Application.StartupPath, "是否是你的路径？", MessageBoxButtons.YesNo)
直接就弹出你当前目录的对话框

Answer 5

我是用来做Treeview的，获得目录名做为一个节点。

Answer 6

这个还带有前后的“\”，还要加上Replace语句才行。