Hola chicos.
Necesito originar búsquedas o filtros de registros mediante cadena de texto introducida en un cuadro de texto, de tal forma que me devuelva los registros filtrados conforme presione una tecla cada vez. Para ello en el evento KeyPress de dicho cuadro de texto creo una variable donde almacenar el texto escrito y la concateno para el filtro siguiente. El filtrado lo realiza correctamente, pero me encuentro con el problema de que los caracteres no se mantienen todos visibles en el cuadro de texto -tan sólo se muestra el último escrito-. Ahora no ando muy inspirado, así que necesito un cable caritativo, por favor.
-------------------------------------------------------------
Código:
Private Sub cuadrodetexto_KeyPress(KeyAscii As Integer)
Dim texto As String
texto = cuadrodetexto.Text
cuadrodetexto = cuadrodetexto & texto
Form.RecordSource = "Select tabla from campo"
End Sub
--------------------------------------------------------------
Nota: Entiendo que lo ejecuto en el evento correcto o por el contrario ¿Debo realizarlo en otro evento?
Además he de crear una excepción para permitir que la tecla "delete" me borre un carácter, pero no tengo la más remota idea de cómo solventar esa cuestión.
Gracias.