System IO VB.Net by API

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