
Ayuda con timer y Text Change
Publicado por Ayuda Con Timer (18 intervenciones) el 24/09/2012 23:25:35
Buen dia,
Les cuento que estoy haciendo una especie de busqueda "Inteligente" en un combo Box, lo estoy haciendo en el Evento TextChange,
Cuando Digian una letra se activa este codigo:
Dim sql = "select nombre_empleado,idempleado from empleados where nombre_empleado LIKE '%" & ComboEmpleado.Text & "%';"
Dim dt = globales.EjecutarRetorna(sql).Tables(0)
ComboEmpleado.DataSource = dt
ComboEmpleado.ValueMember = "idempleado"
ComboEmpleado.DisplayMember = "nombre_empleado"
El problema esque solo puedo escribir una letra porque ahi mismo carga el combobox.
Se me Ocurre crear un Timer que cuando digiten la ejecucion del codigo por ejm:
if timer=timer then
Dim sql = "select nombre_empleado,idempleado from empleados where nombre_empleado LIKE '%" & ComboEmpleado.Text & "%';"
Dim dt = globales.EjecutarRetorna(sql).Tables(0)
ComboEmpleado.DataSource = dt
ComboEmpleado.ValueMember = "idempleado"
ComboEmpleado.DisplayMember = "nombre_empleado"
end if
Causar un retardo mientras se digita la primer letra y que espere un tiempo prudencia para cargar el compo y cada que digiten otra palabra siga creciendo la espera...
Pero no se mucho manejar los Timer sime podrian ayudar, o si conocen otro metodo mas Efectivo les agradeceria la Ayuda..
Saludos y Gracias
Les cuento que estoy haciendo una especie de busqueda "Inteligente" en un combo Box, lo estoy haciendo en el Evento TextChange,
Cuando Digian una letra se activa este codigo:
Dim sql = "select nombre_empleado,idempleado from empleados where nombre_empleado LIKE '%" & ComboEmpleado.Text & "%';"
Dim dt = globales.EjecutarRetorna(sql).Tables(0)
ComboEmpleado.DataSource = dt
ComboEmpleado.ValueMember = "idempleado"
ComboEmpleado.DisplayMember = "nombre_empleado"
El problema esque solo puedo escribir una letra porque ahi mismo carga el combobox.
Se me Ocurre crear un Timer que cuando digiten la ejecucion del codigo por ejm:
if timer=timer then
Dim sql = "select nombre_empleado,idempleado from empleados where nombre_empleado LIKE '%" & ComboEmpleado.Text & "%';"
Dim dt = globales.EjecutarRetorna(sql).Tables(0)
ComboEmpleado.DataSource = dt
ComboEmpleado.ValueMember = "idempleado"
ComboEmpleado.DisplayMember = "nombre_empleado"
end if
Causar un retardo mientras se digita la primer letra y que espere un tiempo prudencia para cargar el compo y cada que digiten otra palabra siga creciendo la espera...
Pero no se mucho manejar los Timer sime podrian ayudar, o si conocen otro metodo mas Efectivo les agradeceria la Ayuda..
Saludos y Gracias
Valora esta pregunta


0