Zeichen in einer zeichnfolge suchen

maho15

Erfahrenes Mitglied
Ich möchte aus solchen Pfaden

C:\Programme\Bilder\IMG_324234.jpg

dies nacher herausbekommen: IMG_324234.jpg


Wie geht das?
 
einfach den string aufteilen und das letzte element auslesen. beispielsweise so:
Code:
Private Sub Command1_Click()

Dim strDateiname As String
Dim strTempName() As String
Dim strNeuerName As String

strDateiname = "C:\Programme\bla\irgendwas\programm.exe"
If InStr(strDateiname, "\") <> 0 Then
    strTempName = Split(strDateiname, "\")
    strNeuerName = strTempName(UBound(strTempName))
End If

MsgBox strNeuerName

End Sub
 
Zurück