how to find some specific words from a paragraphs and print them into a label

[ramniwas74]

i want to find some specific words from a paragraph and print them into a label as suppose i have a paragraph:"madam I am Adam" and now i want to search "madam and Adam" from this parapgraph my code is as under

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim A(1) As Char
        A(0) = " "
        A(1) = ","
        Dim B As String = RichTextBox1.Text
        Dim x As String() = Nothing
        Dim F As Array = {"SMUGGLING", "CROSSING", "INFILTRATION"}
        x = B.Split(A)
 
        For Each F In x
            Label1.Text += F.Contains(x) & ControlChars.NewLine
        Next
 
    End Sub

my parapgraph in Richtextbox1 and i want to search words given in Dim F As Array{} my paragraph contains all theses words
please help me for this