Memorizar textos - VB-MUNDO

mcrex1 · #1 (**permalink**) 10-12-2005, 10:19:13

Lo he intentado hacer sin exito con un combo box

Lo que pretendo es un efecto en un textbox que al ir escribiendo me vaya poniendo textos predeterminados, algo parecido a un combo pero en algo tipo textbox

Gracias

J.M.Movilla · #2 (**permalink**) 10-12-2005, 10:50:33

Vamos..., que lo que más claro dejas es que ni tú mismo te aclaras...

A ver si soy capaz de entenderte: Tú quieres que a medida que vas escribiendo en un textbox, vayan filtrándose los registros que tienes en un combobox, y queden sólo los que empiezan por los caracteres que tú vayas introduciéndo en el texbox; ¿es eso?

Por ejemplo, si escribes "b", en el combo te aparezcan todas la líneas que empiezan por "b". Luego añades "a", y en el combo quedan sólo las que empiezan por "ba"... Si es esto, te responderé con una solución muy fácil, aunque creo que te lo van a responder otros antes que yo, porque hoy tengo un día muy complicado con obligaciones perentorias...

mcrex1 · #3 (**permalink**) 10-12-2005, 11:43:42

Si, es eso y "perdon" por la mala explicación

pongamos por ejemplo en un campo de una historia clinica un texto para diagnostico principal.

mi idea es que (sin hacer busquedas que luego no se suelen hacer) cuando voy escribiendo me haga ese tipo de acción en el textbox

así ahorro tiempo en la entrada de datos

Gracias

khoby · #4 (**permalink**) 10-12-2005, 16:22:32

Yo en una ocasión implementé algo parecido a lo que tu estás comentando. Era para localizar datos mediante filtros de una manera muy rápida.
Tenía un formulario de búsqueda con un textbox y una lista situada debajo. En el textbox metias por ejemplo una a y te sacaba todas las palabras que empezaban por a si seguias con una c las que empezaban por ac......etc en la lista.
Yo lo controlaba mediante el evento change del textbox, en ese evento llamaba a un procedimiento de busqueda de expresiones que acababa haciendo una consulta del tipo.
Select * from table where campo LIKE '" & textbox.Text & "*' " . El resultado lo metia en un recordset y despues rellenaba la lista.
La verdad es que resultaba muy cómodo. Ten en cuenta que también tienes que controlar lo de la comilla para que no pete la consulta.

Código:

Private sub textbox_KeyPress(KeyAscii as integer)
       if keyascii = 39 then keyascii = 0
end sub

Espero que te sirva de ayuda. Es muy fácil de utilizar.

J.M.Movilla · #5 (**permalink**) 10-12-2005, 19:34:28

Ya sabía yo que, una vez entendida tu pregunta, ibas a tener inmediatas respuestas. La que te da khoby esperfecta; yo sólo añadiría que, si quieres que te coja cualquier palabra de los diferentes registros (que no coja sólo la palabra inicial... Por ejemplo, si tú escribes "UROLOGIC" pueda presentarte "Afección urológica, Infección urológica, Inflamación urológica, Trastorno urológico... etc" sólo tienes que sustituir la SQL que te aconseja knoby por la siguiente:

Código:

"Select * from table where campo LIKE '*" & textbox.Text & "*' "