Working with FolderBrowserDialog in VB.NET

First create a window application in VB.Net and add a FolderBrowserDialog controll to it. Also add a textbox(txtFolder) and button( btnBrowseFolders).

The button's work here is to open the FolderBrowserDialog and user can select any folder or file to be displayed in the text box. Now double click on the button and add the following code in it.

Private Sub btnBrowseFolders_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBrowseFolders.Click
        Try
            With fldlgList
                'set the RootFolder
                .RootFolder = Environment.SpecialFolder.Personal
                ' optional Description to provide additional instructions. 
                 Description = "Select the directory you want to use as the default."
                 ShowNewFolderButton = True
                'Showing the selected folder in the textbox
                If ShowDialog = Windows.Forms.DialogResult.OK Then
                    txtFolder.Text = .SelectedPath
                End If

            End With

        Catch ex As Exception

            MsgBox(ex.Message, MsgBoxStyle.Exclamation, Me.Text)

        End Try

    End Sub

DESCRIPTION:-

RootFolder = Environment.SpecialFolder.Personal

Description = "Select the directory you want to use as the default."

ShowNewFolderButton = True