vb.net rechercher des mots dans webbrowser à partir de richtextbox

Question

Voici mon problème J'ai un textbox1, et deux richtextbox. Je veux rechercher dans la zone de texte, les mots contenus dans ma zone de texte1. Dans ma riche texttext, j'ai 600 mots, un par ligne. dans une deuxième partie, si textbox1 contient un mot contenu dans richtextbox1, je veux afficher ces mots dans mon richtextbox2.

ici est mon (Noob) Code:

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 

Mais il apppears que la condition est toujours vrai. Il doesn travail t ... quelqu'un peut me aider pleaase

Meilleures salutations

Answer 1

Fendez chaque mot dans TextBox1 et voir si RichTextBox1 contient. Si c'est le cas, ajoutez-le à une liste et ajoutez-la à 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()