evento change en un cuadro de texto

Lo utilizo para filtrar un SubForm.
Mi código es:
Dim sql As String

sql = "SELECT MisPeliculas.* FROM MisPeliculas " _
      & "WHERE MisPeliculas.titulo LIKE '*" & Me.txtBusq & "*';"

Me.SbfrmMisPelis.Form.RecordSource = sql

El problema es que cuando se produce el evento, el valor pasado a me.txtBusq resulta que no es el tecleado.

Si tecleo p.e "a", se produce el evento, pero me.txtBusq = Null.

Que estoy haciendo mal?
Grcs anticipadas
Rafa

Eso era. Muchas Grcs!!