無法使用richtextbox和documenttext函數在網頁上找到多個單詞

Question

我有這段代碼。有時它會在網頁中找到這個詞，有時它不會。我不確定這個問題會是什麼。此外，輸入到richtextbox2.text中的單詞只能找到第一個單詞，因此如果我將第一個單詞設置爲「Cookies」，然後在該「Milk」下，則只會查找「Cookies」。有沒有辦法讓它查找richtextbox中的所有單詞？

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click 
    If WebBrowser1.DocumentText.ToLower.Contains(RichTextBox2.Text.ToLower) Then 
     MsgBox("its there") 
    Else 
     MsgBox("NOT THERE") 
    End If 
End Sub 

Answer 1

當RichTextBox中存在多個單詞時，它會同時搜索兩個單詞，因爲它們都在RichTextBox2.Text中。您可以一次搜索RichTextBox中的每個單詞或短語，如果它們位於單獨的行上，如下所示：

for each s in RichTextBox2.lines 
    If WebBrowser1.DocumentText.ToLower.Contains(s.ToLower) Then 
    MsgBox(s & " is there") 
    Else 
    MsgBox(s & " IS NOT THERE") 
    End If 
next s