Hallo
mit unterem Code versuch ich Dateien aus einem Ordner in einer Listbox azeigen zu lassen
aber es funktioniert nicht.
für Hilfe bin ich sehr Dankbar.
Spoiler anzeigen
L.G. Willi
mit unterem Code versuch ich Dateien aus einem Ordner in einer Listbox azeigen zu lassen
aber es funktioniert nicht.
für Hilfe bin ich sehr Dankbar.
VB.NET-Quellcode
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Dim sPath As String
- Using ofd As New FolderBrowserDialog()
- If ofd.ShowDialog = DialogResult.OK Then
- Dim d As New System.IO.DirectoryInfo(ofd.SelectedPath)
- sPath = d.FullName
- ListBox1.Items.Clear()
- For Each fi As System.IO.FileInfo In d.GetFiles(CType(System.IO.SearchOption.AllDirectories, String))
- If fi.ToString.StartsWith(TextBox1.Text, StringComparison.InvariantCultureIgnoreCase) Then
- ListBox1.Items.Add(fi.Name)
- End If
- Next
- End If
- End Using
- End Sub
L.G. Willi