vb遍历文件夹中的所有文件的指定数据

您可以使用 `Directory.GetFiles` 方法来指定文件夹中的所有文件，并使用 `StreamReader` 类来逐行读取文件内容，查找指定数据。以下是一个示例代码：

Imports System.IO

Sub Main()
    Dim folderPath As String = "C:\FolderPath"
    Dim targetData As String = "YourTargetData"

    Dim files As String() = Directory.GetFiles(folderPath)

    For Each file As String In files
        Using reader As New StreamReader(file)
            Dim line As String
            While Not reader.EndOfStream
                line = reader.ReadLine()
                If line.Contains(targetData) Then
                    Console.WriteLine("Found in file: " & file)
                    Console.WriteLine("Line content: " & line)
                End If
            End While
        End Using
    Next

    Console.ReadLine()
End Sub

您需要将 `YourFolderPath` 替换为您要遍历的文件夹路径，将 `YourTargetData` 替换为您要查找的目标数据。此代码将遍历指定文件夹中的所有文件，逐行读取文件内容，并在找到包含目标数据的行时输出文件名和行内容。

请注意，此示例仅适用于文本文件。如果要处理其他类型的文件（例如 Word 文档或 Excel 文件），您可能需要使用相应的库或 API 进行处理。