Thomas Risi Softwareentwicklung

GetFileName

In dieser Funktion wird der Dateiname aus einem vorgegebenen Dateipfad ermittelt. Beachten Sie die Rekursion ...

Option Explicit Public Function GetFileName(Path As String) As String If Right(Path, 1) = "\" Then Exit Function GetFileName = GetFileName(Left(Path, Len(Path) - 1)) & Right(Path, 1) End Function

Bewerten Sie bitte dieses Programm.
1 2 3 4 5
Weniger nützlich Sehr nützlich
Bitte teilen Sie uns mit, warum Sie das Programm so bewertet haben. (optional)