Visual Basic - Filtro múltiple

Que tal amigos, aquí va mi consulta

Tengo una tabla, y tomo sus datos a través de un recordset lo coloco en un datagrid para ver los resultados, pero como son muchos los quiero filtrar, hasta ahora he conseguido que los vaya filtrando por un campo del siguiente modo:

Private Sub TxtBuscaApellido_Change()
With RsPaciente
If .State = 1 Then .Close
.Open "Select * from PACIENTE where APELLIDO like '%" + Trim(TxtBuscaApellido.Text) + "%'"
RsPaciente.Requery
Set DtgPaciente.DataSource = RsPaciente
End With
End Sub


Esto funciona muy bien, el tema es que yo tengo los nombres en otro campo... y tan solo con el apellido el filtro me resulta muy pobre... para apellidos como "Lopez" que son muchísimos debería continuar filtrando por otro campo, el de nombres es decir... hacer un filtro del filtro, se entiende?

Acepto cualquier idea!!

Gracias!!

Claudio.