Ver Mensaje Individual
  #8 (permalink)  
Antiguo 17/03/2010, 03:52
Insomnia
 
Fecha de Ingreso: noviembre-2005
Mensajes: 751
Antigüedad: 19 años, 1 mes
Puntos: 13
Respuesta: Controlar ComboBox

Hola

La verdad es que estoy tan acostumbrado a usar bases de datos que algo "supuestamente" mas sencillo o básico me resulta en realidad más complicado.

Una forma que se me ocurre es que en el evento change del textbox (se activa cada vez que cambias el text) midas la longitud del texto introducido, luego comparas el valor del textbox con el valor que tienes en el array cogiendo la longitud con la función left y si cumple la condición lo añades al combo. Sería algo así como:

Código vb:
Ver original
  1. Private Sub Text1_Change()
  2. Dim Longitud as Integer
  3. dim Cadena as string
  4.  
  5. Longitud=len(text1.text) 'Mide cuantos caracteres tiene lo introducido en el textbox
  6.  
  7. For each cli In frmCliente.Clientes
  8.    Cadena=left(cli.nombre,Longitud) 'Cogemos los caracteres del nombre
  9.   If Cadena=text1.text then 'Si los caracteres son iguales al nombre
  10.      comboBox.Items.Add(cli.Nombre & " - " & cli.DNI) 'Añadimos al combo
  11.   end if
  12. next

Ejemplo: Si en el textbox escribimos an en la variable Longitud nos quedara 2, si el primer nombre es angel, en la variable cadena nos quedará an (los primeros dos caracteres de angel). Si cumple lña condición (en este caso la cumple) la añades al combo, si no cumple no se añadirá). Recuerda en limpiar el combo antes de todo.

--Saludos--