Visual Basic - Buscar en base de datos

hola necesito ayuda en busqueda de campos en base de datos de acces con ayuda de options, tengo este codigo y quiero saber si es correcto o le falta algo o si tienen alguno mejor

Dim dato As String
Dim vboomark As Variant
Dim SADOBUSCAR As String
On Error Resume Next

If Option1.Value Then
dato = "Nombre del Libro Like"" & Text9.Text"""
Debug.Print "Entro al op1 " & dato
End If

If Option2.Value Then
dato = "Autor/es Like"" & Text9.Text&"""
Debug.Print dato
End If

vbookmark = Adodc1.Recordset.Bookmark
Debug.Print vbookmark
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find dato, 1
If Err.Number Or Adodc1.Recordset.BOF Then
Err.Clear
MsgBox "NO HAY NINGUN DATO "
End If

Lo único que yo veo incongruente es en las líneas..:

dato = "Nombre del Libro Like"" & Text9.Text"""
dato = "Autor/es Like"" & Text9.Text&"""

"Nombre del Libro" y "Autor/es Like" deben de ser campos en una tabla, que yo sepa en los nombres de los campos no acepta espacios en blanco ni el caracter "/"..... si acaso los acepta entonces estoy equivocado....

Cuando se usan variables tipo texto hay que ante poner el caracter " ' " antes y después de la variable tipo texto, como por ejemplo...:

dato = "Autor Like" & "'" & Text9.Text & "'"

Espero te sirva de ayuda. SALUDOS