vb.net - 如果列表框中有相同的字符串，如何删除相同的字符串

Question

我想问列表框中的项目。我在列表框中拆分了字符串。因此，如果我输入了 file.txt，它会被分成每个单词。

我的问题是，如果file.text中有相同的字符串，如何删除相同的字符串？以及如何计算file.text中的每个单词（一个单词在file.text中出现多少次）？

这是我的完整代码

     Dim s() As String = ListBox1.Items.Cast(Of String).ToArray()

    For Each item As String In s
        item = item.Replace(".", String.Empty)
        item = item.Replace(Microsoft.VisualBasic.ControlChars.Quote, String.Empty)
        item = item.Replace("(", String.Empty)
        item = item.Replace(")", String.Empty)
        item = item.Replace("-", String.Empty)
        item = item.Replace(",", String.Empty)

        ListBox2.Items.AddRange(item.Split(" "c))
    Next

Answer 1

为什么不使用 LINQ 来获取一个不同的项目列表，如此处所示unique-list。

这将为您带来最快的结果。