VB.NET 文件夾瀏覽器對話框

Question

我在這里做錯了什么？ 我無法獲得我選擇的文件夾中的文件列表。

    If ListViewMain.Items.Count > 0 Then
        ListViewMain.Items.Clear()
    End If

    If FolderBrowserDialogMain.ShowDialog = DialogResult.OK Then
        Dim fiFileInfo As New FileInfo(FolderBrowserDialogMain.SelectedPath)
        If fiFileInfo.Extension = ".mp3" Then
            Dim lviListViewItem As New ListViewItem
            lviListViewItem.Text = fiFileInfo.Name
            ListViewMain.Items.Add(lviListViewItem)
        End If
    End If

Answer 1

您正在使用帶有目錄路徑的FileInfo 。 您必須改用DirectoryInfo 。 通過使用DirectoryInfo.GetFiles ，您可以獲得具有特定擴展名的目錄的所有文件：

If ListViewMain.Items.Count > 0 Then
    ListViewMain.Items.Clear()
End If

If FolderBrowserDialogMain.ShowDialog = DialogResult.OK Then
    Dim dirInfo As New DirectoryInfo(FolderBrowserDialogMain.SelectedPath)

    For Each fiInfo As FileInfo In dirInfo.GetFiles("*.mp3")
        Dim lviListViewItem As New ListViewItem
        lviListViewItem.Text = fiInfo.Name
        ListViewMain.Items.Add(lviListViewItem)
    Next
End If