如果在inlistbox中有相同的字符串，如何删除相同的字符串

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所示。

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