Como criar um diretório usando VB.NET

'Este exemplo mostra como criar um diretório
'usando VB.NET

Imports System.IO

Module Module1
  Sub Main()
    'nome do diretório
    Dim dir As String = "c:\estudos_vb"

    'tenta criar o diretório
    Try
      Dim di As DirectoryInfo = Directory.CreateDirectory(dir)
      Console.WriteLine("Diretório criado com sucesso")
    Catch e As Exception
      Console.WriteLine("Erro: {0}.", e.ToString())
    End Try

    Console.WriteLine()
    Console.WriteLine("Pressione uma tecla para sair...")
    Console.ReadKey()
  End Sub
End Module