webbrowserの単語をrichtextboxから

Question

ここに私の問題があります 私はtextbox1と2つのrichtextboxを持っています。 私はテキストボックス内の単語を検索したいと思っています。 私のリッチテキストボックスには、600語が1行ずつあります。 2番目の部分では、textbox1にrichtextbox1に含まれる単語が含まれている場合、これらの単語をrichtextbox2に表示したいとします。

は、ここに私の（noobの）コードです：

Public Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click 
     If TextBox1.Text.Contains(RichTextBox1.Text) Then 
      richtextbox2.text = (words found) 
     End If 
    End Sub 

しかし、それは条件が常に真であることをapppears。それはトンの仕事をdoesnの... は、誰かが私がTextBox1テキストボックスに

敬具

Answer 1

スプリット各単語をpleaaseとRichTextBox1は、それが含まれているかどうかを確認することができます。その場合は、リストに追加し、そのリストをRichTextBox2に追加します。

RichTextBox2.Text = String.Empty 

    Dim lstMatches As New List(Of String)() 

    TextBox1.Text.Split(" ").ToList().ForEach(Sub(strWord) 
               If RichTextBox1.Text.Contains(strWord) Then 
                lstMatches.Add(strWord) 
               End If 
               End Sub) 

    lstMatches.ForEach(Sub(strMatch) 
          RichTextBox2.Text += strMatch & " " 
         End Sub) 

    'A way to trim that last space if necessary. 
    RichTextBox2.Text = RichTextBox2.Text.Trim()