如何 - 详细的文件夹浏览器 - VS 2010

Question

我知道如何使用对话框浏览文件夹。但是当我使用波纹管代码时：

Dim FBrowserDialog As New FolderBrowserDialog()
FBrowserDialog.Description = "Get Folder"
FBrowserDialog.RootFolder = Environment.SpecialFolder.MyComputer
FBrowserDialog.ShowNewFolderButton = True
If FBrowserDialog.ShowDialog() = DialogResult.OK Then
    'bla bla bla            
End If

我得到这样的对话：

但我想这样：

我不知道如何做到这一点。 任何形式的帮助将不胜感激。

我正在使用Visual Studio 2010。

Answer 1

使用Nuget添加对Windows 7 API Code Pack - Shell的引用。

以下代码段提供了您想要的对话框主题：

Dim dialog As New Microsoft.WindowsAPICodePack.Dialogs.CommonOpenFileDialog()    
dialog.IsFolderPicker = True
dialog.ShowDialog()