Trabalhando com diretórios no VB.Net!

Monte o form como na imagem abaixo:

Vamos a codificação no botão Criar diretório:

If TextBox1.Text <> "" Then
            Directory.CreateDirectory(TextBox1.Text)
            MessageBox.Show("O diretório <<" & TextBox1.Text & ">> foi cria com sucesso !!", "VB.NET - Criando Diretórios", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Informe o caminho e nome do diretorio que deseja Criar !", "VB.NET - Criando Diretórios", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
        End If

Vamos a codificação no botão Excluir diretório:


If TextBox1.Text <> "" Then
            If Directory.Exists(TextBox1.Text) Then
                Directory.Delete(TextBox1.Text)
                MessageBox.Show("O diretório <<" & TextBox1.Text & ">> foi excluida com sucesso !!", "VB.NET - Criando Diretórios", MessageBoxButtons.OK, MessageBoxIcon.Information)
            Else
                MessageBox.Show("O diretório <<" & TextBox1.Text & ">> não existe, Verifique !!", "VB.NET - Criando Diretórios", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End If
        Else
            MessageBox.Show("Informe o caminho e nome do diretorio que deseja Excluir !", "VB.NET - Criando Diretórios", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
        End if

Vamos a codificação no botão sair:


If MessageBox.Show("Deseja realmente sair ? ", "Encerrar", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.Yes Then
            End
 End If

Não esqueça de colocar a biblioteca:

Imports System.IO