SQL doesn't run in vba

Hi,
I have a Sql code that works. I need to implement this code with a filter based in a variable. When I tried to import the sql in vba, I couldn't make it run. Could you help, please?

SELECT CLIENTI.IDCliente, CLIENTI.CodCliente, CLIENTI.NomeCliente, CLIENTI.RagioneSociale, CLIENTI.SettoreClienteID, CLIENTI.ClienteAttivo, CLIENTI.DataInizioRapporto, CLIENTI.Città, CLIENTI.Telefono
FROM CLIENTI
WHERE (((CLIENTI.CodCliente) Like "*" & forms!Risultati!SearchText & "*")) Or (((CLIENTI.NomeCliente) Like "*" & forms!Risultati!SearchText & "*"));

In vba I tried these measures:
to trasform " in chr(34) since it's used to enclode the code
however it doesn't work as it should

Code:

---

Dim SQL As String

SQL = "SELECT CLIENTI.IDCliente, CLIENTI.CodCliente, CLIENTI.NomeCliente, " & _
      "CLIENTI.RagioneSociale, CLIENTI.SettoreClienteID, CLIENTI.ClienteAttivo, " & _
      "CLIENTI.DataInizioRapporto, CLIENTI.Città, CLIENTI.Telefono " & _
      "FROM CLIENTI " & _
      "WHERE (((CLIENTI.CodCliente) Like & chr(34) & chr(42) & chr(34) & [forms]![Risultati]![SearchText] & chr(34) & chr(42) & chr(34)))"
     
Me.SearchResults.RowSource = SQL

---

SQL doesn't run in vba