Same as @DaRKoN_ on vb.net:
Module Module1 Sub Main() Dim orderedFiles = New System.IO.DirectoryInfo("c:\\").GetFiles().OrderBy(Function(x) x.CreationTime) For Each f As System.IO.FileInfo In orderedFiles Console.WriteLine(String.Format("{0,-15} {1,12}", f.Name, f.CreationTime.ToString)) Next End Sub End Module
apros source share