VBNET如何调用出附件1中图片示例的文件夹控件，

默认调用FolderBrowserDialog出现的下图附件2的界面

VB转NET，新手学习中，希望大侠们帮忙！

我也想知道，下面的文件夹控件不好用

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        With New FolderBrowserDialog()
            .SelectedPath = "C:\Program Files"
            .RootFolder = Environment.SpecialFolder.MyComputer
            .ShowDialog()
            MessageBox.Show(.SelectedPath)
        End With
    End Sub