0

我有“dictionary.txt”文件,其中包含我试图在拼写错误的单词的richtextbox(vb.net)中语法突出显示的所有字典单词

有没有办法使用dictionary.txt文件检查richtextbox中拼写错误的单词

我正在使用 for 循环并检查每个单词,但它花费了太多时间

Dim p As Integer = 0
    For i = 0 To aryTextFile.Length - 1
        aryTextFile(i) = aryTextFile(i).Replace(",", "").Replace(".", "")

        If wordslistD.Contains(LCase(aryTextFile(i))) Then

        Else

            MisSpelledList.Add(aryTextFile(i))
        End If

            ProgressBar1.Value = p
            p = p + 1


    Next
4

1 回答 1

0

您是否尝试过除外方法?就像是:

dim output = aryTextFile.Select(Function(x) x.Replace(",", "").Replace(".", "").ToUpper()).Except(wordsListD)
于 2013-08-23T06:41:58.790 回答