Innanzitutto, ovviamente, devi gestire gli errori con un Try... Catch... altrimenti se la stringa non contiene la sottostringa il programma si blocca con errore.

Poi: ...(Text.IndexOf(TextBox6.Text)...

Come hai definito Text??? Avresti dovuto scrivere TextBox5.Text.IndexOf....