'获取路径信息 Dim dirInfo As New DirectoryInfo(bufferDataPath) '获取文件信息 Dim files = dirInfo.GetFiles 'Linq Dim csvFiles= From item In files Where item.Extension = ".csv" Select item 'Lambda Dim csvFiles = files.Where(Function(item) item.Extension = ".csv").ToList原文链接:https://www.f2er.com/vb/258191.html