23-11-2021, 22:34
Buenas!
Hice un ejemplo para buscar en el contol listbox.
He usado dos controles, una caja de texto y un listbox.
He creado tres ejemplos.
Código Común:
Primer ejemplo. Busca y muestra una coincidencia.
![[Imagen: 7dxuHqa.png]](https://i.imgur.com/7dxuHqa.png)
Segundo Ejemplo. Busca y muestra una coincidencia.
Estoy interesado en este ya que usa una constante gb.like. El efecto cuando busca no siempre es correcto.
Imaginar que busco elementos que comienzan con la "z", pues hay veces que si hay más de una coincidencia, se salta el primero.
El problema se encuentra en la constante que usa el método "find". O que no lo uso de una forma correcta.
![[Imagen: U8d1Dwb.png]](https://i.imgur.com/U8d1Dwb.png)
Se ha saltado el primero.
Tercer ejemplo, muestra todos los elementos que coinciden con el texto que busco.
Os subo el ejemplo. Tiene tres formularios, seleccionar uno de ellos y o bien ejecutarlo como correr esta clase ó como clase de inicio.
Saludos
Hice un ejemplo para buscar en el contol listbox.
He usado dos controles, una caja de texto y un listbox.
He creado tres ejemplos.
Código Común:
GAMBAS
-
-
-
- acadenas.Add(nom)
- nom = ""
-
- Return acadenas
-
Primer ejemplo. Busca y muestra una coincidencia.
![[Imagen: 7dxuHqa.png]](https://i.imgur.com/7dxuHqa.png)
GAMBAS
Segundo Ejemplo. Busca y muestra una coincidencia.
Estoy interesado en este ya que usa una constante gb.like. El efecto cuando busca no siempre es correcto.
Imaginar que busco elementos que comienzan con la "z", pues hay veces que si hay más de una coincidencia, se salta el primero.

El problema se encuentra en la constante que usa el método "find". O que no lo uso de una forma correcta.
![[Imagen: U8d1Dwb.png]](https://i.imgur.com/U8d1Dwb.png)
Se ha saltado el primero.
GAMBAS
-
- lstElementos.List = Comun.LlenadoDelista()
- Comun.valores = lstElementos.List
- txtEntrada.SetFocus()
-
-
-
- lstElementos.List = Comun.valores
-
-
Tercer ejemplo, muestra todos los elementos que coinciden con el texto que busco.
GAMBAS
-
- lstElementos.List = Comun.LlenadoDelista()
- Comun.valores = lstElementos.List
- txtEntrada.SetFocus()
-
-
-
-
- lstElementos.List = Comun.valores
-
- lstElementos.Index = x
- lstElementos.List = listaencontrados
-
Os subo el ejemplo. Tiene tres formularios, seleccionar uno de ellos y o bien ejecutarlo como correr esta clase ó como clase de inicio.
Saludos
"Pero no toques, por qué tocas? - Amador"