Jak pobrać nazwę podfolderów do stringa

[korzan222]

 

        For Each folder As String In My.Computer.FileSystem.GetDirectories("C:\Program Files\")

            MsgBox(folder)

        Next

 

kod pokazuje ścieżki do podfolderów a ja chce aby dawał tylko nazwy.

 

Edit

sam sobie prodaziłem jak by ktoś potrzebował to kod:

 

        For Each folder In My.Computer.FileSystem.GetDirectories(appData & " \.LauncherMC\versions\")

            Dim name As String = My.Computer.FileSystem.GetName(folder)

            MsgBox(name)

        Next

[korzan222]

@ref

[BremLOL]

Temat do zamknięcia.

[matixd3]

Temat do zamknięcia.

A ty co autor? A moze moderator?