obtener el nombre del directorio de un archivo

ejemplo:

c:\tareas\archivo.xml --->tareas

return Path.GetFileName(Path.GetDirectoryName(c:\tareas\archivo.xml))

fuente

Obtener el nombre del último directorio

For Each d As String In empresas
Dim dname As String = New DirectoryInfo(d).Name
Next


Dim dirfolder As String = "D:\bin\Debug\empresas\789-K"
Dim namefolder As String = Path.GetFileName(dirfolder)

Extraer archivo de una ruta

Imports System.IO

'Obtener el nombre del archivo
Dim NombreDelArchivo As String = Path.GetFileName(ruta)

'Obtener el nombre del archivo sin extesión
Dim Archivo As String = Path.GetFileNameWithoutExtension(ruta)