I made a stupid mistake

Code:
Where Not r.IsNewRow AndAlso r.Cells("szName").Value.ToString = TextBox1.Text _
The part where the searchterm is in isn't called TextBox1.Text but sSearchTerms...

Thanks for the help paul