Visual Basic - Ayuda con: BUSQUEDA EN DBGRID

Hola, como hago para buscar en un DBgrid poniendo solo una palabra clave (sin poner toda la frase) y que esta busqueda se realice en un campo y traiga como resultado todas las frases que contienen esa palabra que puse en la busqueda? he intentado con bastantes codigos y nada que me funciona! aqui uno de ellos:

Data1.Recordset.Find "titulo= " & Text1.Text
Data1.RecordSource = "SELECT * FROM documentos WHERE titulo LIKE '%'+'Val(Text2.Text)'+ '%'"
Data1.Refresh
DBGrid1.Visible = True

Por Favor necesito de su ayuda lo mas uegente posible!!! Gracias

Data1.RecordSource = "SELECT * FROM documentos WHERE titulo LIKE '%" +Text2.Text + "%' "

Duda ¿para qué usabas Val( ) ?

Que va hermano!! Nada de Nada!!!! si tienes otra por ahi! te agradezco mucho tu ayuda!!! Salu2

Private Sub Text15_Change()
Filt
End Sub

Public Sub Filt()
Dim R As String
On Error GoTo RutinaDeError
Data1.RecordSource = "SELECT * FROM tabla1 WHERE campo like '*" & Text15.Text & "*'"
Data1.Refresh
DBGrid1.Refresh
Exit Sub
RutinaDeError:
R = MsgBox(Error, vbOKOnly, "Se ha producido un error:")
End Sub