vb.net如何循环目录列表？

Question

如何循环浏览文件夹以列出每个文件及其日期/时间？

Answer 1

使用DirectoryInfo.GetFiles（）并从FileInfo类中提取数据（Name，CreationTime等）。

我已粘贴MSDN页面here中的一些代码。

Imports System
Imports System.IO
Public Class GetFilesTest
    Public Shared Sub Main()
        ' Make a reference to a directory.
        Dim di As New DirectoryInfo("c:\")
        ' Get a reference to each file in that directory.
        Dim fiArr As FileInfo() = di.GetFiles()
        ' Display the names of the files.
        Dim fri As FileInfo
        For Each fri In fiArr
            Console.WriteLine(fri.Name)
        Next fri
    End Sub 'Main
End Class 'GetFilesTest

Answer 2

 For Each LogFile In Directory.GetFiles(Application.StartupPath & "\Txt\")

        ' do whatever wtih filename

    Next

Answer 3

我们有机会在VB.Net（不是Java）中开发，并且可以缩短某些变量的定义。

我仍然使用GetFiles（）并添加了显示DateTime信息的代码。

Imports System
Imports System.IO
...
Dim dir As New DirectoryInfo(sFolderName)
For Each f In dir.GetFiles()
    Console.WriteLine(">> FILE-NAME: [" & f.Name & "]")
    Console.WriteLine(">> UPDATE-DATE: " & f.lastWriteTime.toString("YYYY-MM-DD"))
    Console.WriteLine(">> CREATE-DATE: " & f.creationTime.toString("YYYY-MM-DD"))
Next