分享
三行代码  ›  专栏  ›  技术社区  ›  Venu GoPal

如何从For Each循环中获取最大值

  •  0
  • Venu GoPal  · 技术社区  · 6 月前

    下面的代码将给出指定文件夹中的所有数字目录名。如何从生成的列表中获取最大值和总计数?

        Dim DirInfo = New DirectoryInfo(Environment.CurrentDirectory + "\Data")
        For Each FolderInfo In DirInfo.EnumerateFileSystemInfos()
            If IsNumeric(FolderInfo.Name) Then
                 '
                 '
                 '
            End If
        Next
    
    1 回复  |  直到 6 月前
        1
  •  1
  •   Magnus    6 月前

    使用linq:

    Dim DirInfo = New DirectoryInfo(Environment.CurrentDirectory + "\Data")
    Dim list = DirInfo.EnumerateFileSystemInfos().Where(Function(x) IsNumeric(x.Name)).Select(Function(x) Double.Parse(x.Name)).ToList()
    Dim max = list.Max()
    Dim count = list.Count()