目錄中的文件按文件名升序排序 - 對於每個

Question

如何更新我的代碼，以便按照創建的日期/時間順序處理所有文件？

Private Sub StartupFindExistingFiles(Path As String, SearchPattern As String) 
    Dim fileEntries As String() = Directory.GetFiles(Path, SearchPattern) 
    For Each fileName As String In fileEntries 
     PrintJOBFile(fileName) 
    Next 
End Sub 

Answer 1

您可以用File.GetCreationTime使用LINQ：

Dim orderedByCreation = From file In Directory.EnumerateFiles(Path, SearchPattern) 
         Let createdAt = System.IO.File.GetCreationTime(file) 
         Order By createdAt Ascending 
         Select file 

For Each filePath As String In orderedByCreation 
    PrintJOBFile(filePath) 
Next 

注意，你也可以使用GetFiles代替EnumerateFiles。後者可以更高效。