VB - 如何从通用列表中删除“空”项目？

Question

我有一个包含通用列表的 VB.NET (2010) 项目，我正在尝试弄清楚如何从列表中删除任何“空”项目。当我说“空”时，我的意思是任何不包含任何实际字符的项目（但它可能包含任意数量的空格，或者根本没有空格）。

例如，假设这是我的清单...

    Dim MyList As New List(Of String)

    MyList.Add("a")
    MyList.Add("")
    MyList.Add("b")
    MyList.Add(" ")
    MyList.Add("c")
    MyList.Add("      ")
    MyList.Add("d")

我需要它，以便如果我对该列表进行计数，它将返回 4 个项目，而不是 7 个。例如...

    Dim ListCount As Integer = MyList.Count
    MessageBox.Show(ListCount) ' Should show "4"

如果有类似的东西就好了……

    MyList.RemoveEmpty

无论如何...在过去的几个小时里，我一直在 Google 上寻找解决方案，但到目前为止还没有找到任何解决方案。那么...有什么想法吗？

顺便说一句，我的目标是这个项目的 .NET 2.0 框架。

提前致谢！

Answer 1

您可以使用List.RemoveAll

MyList.RemoveAll(Function(str) String.IsNullOrWhiteSpace(str))

如果您至少不使用 .NET 4，则不能使用 String.IsNullOrWhiteSpace。然后就可以自己实现方法了：

Public Shared Function IsNullOrWhiteSpace(value As String) As Boolean
    If value Is Nothing Then
        Return True
    End If
    For i As Integer = 0 To value.Length - 1
        If Not Char.IsWhiteSpace(value(i)) Then
            Return False
        End If
    Next
    Return True
End Function

请注意，Char.IsWhiteSpace 从 1.1 开始就存在。