Imports System.IO Module Module1 Sub Main() Try Directory.Delete("C:\Sample01", True) Catch E As Exception Console.WriteLine("Error deleting directory C:\Sample01") Console.WriteLine("Error {0}", E.Message) End Try End Sub End Module