如何列出文件）今天在使用 VB.Net 的目录中创建

【问题标题】：How to list file(s) created today in a directory using VB.Net如何列出文件）今天在使用 VB.Net 的目录中创建
【发布时间】：2015-11-17 06:19:42
【问题描述】：

我正在使用以下代码按降序对目录中的所有文件进行排序，然后检查文件创建日期是否为今天。

是否可以改进以在末尾包含 .Where() 条件以仅包含今天创建的文件？

代码

Dim orderedFiles = New System.IO.DirectoryInfo("C:\\MyFolder").GetFiles().OrderByDescending(Function(p) p.LastWriteTime)

【问题讨论】：

在我的情况下，系统日期总是正确的。

标签： vb.net sorting io .net-2.0

【解决方案1】：

根据您的代码，只需使用 Where(Function(p) p.CreationTime.Date = Now.Date) 代替 OrderByDescending(Function(p) p.LastWriteTime)

 Dim orderedFiles = New System.IO.DirectoryInfo("C:\MyFolder") _
                              .GetFiles() _
                              .Where(Function(p) p.CreationTime.Date = Now.Date)

或

Dim Dir As New DirectoryInfo("C:\MyFolder")
Dim FilesInDir As FileSystemInfo()
FilesInDir = Dir.GetFileSystemInfos
Dim my_file = FilesInDir.Where(Function(p) p.CreationTime.Date = Now.Date)

my_file 存储今天创建的文件集合

Dim file_name As String
file_name = my_file(0).FullName ' file in 0th position or you can loop thorough my_file

这将显示带有绝对路径的文件名，即C:\MyFolder\file.txt

【讨论】：