如何获取按时间戳排序的目录文件列表？

Question

我被困在这个排序问题上。

Private Sub ... 
     Dim oDirInfo As DirectoryInfo 
     Dim aoFSInfo() As FileSystemInfo 
     Dim asFiles() As String 

FQPN是以“\ *。*”结尾的标准路径名。

 oDirInfo = New DirectoryInfo(FQPN) 

现在进入asFiles我想要文件的名称，按文件的时间戳按升序排序。我猜想，oDirInfo.CreationTime在这里扮演一个角色，但无法弄清楚如何正确使用OrderBy。

 aoFSInfo = oDirInfo.GetFileSystemInfos() '? 
     asFiles = aoFSInfo.OrderBy(...) 
    End Sub 

Answer 1

是的，这就是LINQ，你可以使用这个（方法 - ）语法：

asFiles = oFSInfo. 
    OrderBy(Function(fsi) fsi.CreationTime). 
    Select(Function(fsi) fsi.FullName). 
    ToArray() 

如果你不喜欢ugly Function keyword您可以使用查询语法：

Dim orderedFiles = From fsi In oFSInfo 
        Order by fsi.iCreationTime Ascending 
        Select fsi.FullName 
asFiles = orderedFiles.ToArray() 

即使这些是两个语句，由于延迟执行，它也不会慢于方法语法。