1

我在目录中获取所需扩展名的文件:

Dim files As FileInfo()
files = New DirectoryInfo(myPath).GetFiles("*." & dExt).Where(Function(x) _
x.CreationTime >= (st_date) AndAlso x.CreationTime <= (end_date)).ToArray()

这个工作还可以。
但我不知道在这个表达式中加入“OrderByDescending”。

请如果有人可以告诉我如何在显示的代码中添加“OrderByDescending”子句。
其次,我想知道是否可以为两个表达式定义 GetFiles。
例如,在定义的路径中一次获取扩展名为“ .7z”和“ .arj”的文件。

4

1 回答 1

1

我为所有可能感兴趣的人找到了解决方案......

    Dim files As FileInfo()
    files = New DirectoryInfo(myPath).GetFiles("*." & dExt, SearchOption.TopDirectoryOnly) _
           .OrderByDescending(Function(x) x.FullName) _
           .Where(Function(x) x.CreationTime >= (st_date) AndAlso x.CreationTime <= (end_date)) _
           .ToArray()

此外,还有浏览多个扩展的解决方案,但没有一个像我希望的那样优雅。

于 2012-12-08T14:44:49.377 回答