Originariamente inviato da eziogsv
Il fatto è che premendo il pulsante "togli" il fuoco alla TextBox5.

Prova ad aggiungere del codice che la forzi a riprendersi il Focus:
codice:
        TextBox5.Select()  
        Dim Text As String = TextBox5.Text
        TextBox5.Select(Text.IndexOf(TextBox6.Text), _
                       TextBox6.Text.Length)
Esatto perché se lo metto nell'evento TextBox5_Enter funge senza il Select

Ora però non saprei come fare se vi si presenta una parola ripetuta, tipo:
TextBox5.Text = "a b c d b"
TextBox6.Text = "b"