Resumen Llenado de campos según lo escrito

>Amigos listeros: Alguno sabe como hacer para que mientras uno va
>introduciendo los datos en un txt automaticamente haga la comparación
>con una base y traiga en sombreado el dato que comienza igual?
>Sería lo que hace el excel de office '97 de comparación entre campos
>anteriores.
Creo que va a ser lento pero debes hacer algo así (lo hago de memoria y sin
probar pero creo que te servirá de guía)

En el evento change del textbox :

dim EstoyBuscando as boolean, i as long

if EstoyBuscando then exit sub
EstoyBuscando = true
MiTabla.Seek ">=", MiTextBox 'supongo indice campo alfabético y activo
if not MiTabla.NoMatch then
    i=MiTextBox.SelStart
    MiTextBox = MiTabla!MiCampo
    MiTextBox.SelStar = i
    MiTextBox.SelLegth = len(MiTextBox) 'un poco feo pero ...
end if
EstoyBuscando = false

Espero no haber escrito una burrada.
    


Un saludo.

_________________________________________________
José Rubí de la Vega
E-mail : jrubi@arrakis.es
WWW : http://www.arrakis.es/~jrubi
Podrás encontrar información sobre VB, la lista
VB-ESP y un resumen de los mensajes de la misma
ICQ # : 10939566



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com