gCtAliCo

Seleccionar el renglon de un grid al escribir en textbox y autocompletar vb 2008

2010-12-03T12:40:00.000-08:00

Hoy tuve que investigar sobre esto pero no encontre nada, lo que tenia que hacer es que cuando fuera escribiendo en un textbox se fuera selecionando el renglon del grid
que tuviera el mismo texto, asi que como por fin lo pude hacer aqui lo comparto

'Flag para la tecla BackSpace
Public KeyRetroceso As Boolean

Function Autocompletar_Grid(ByVal TBox As TextBox, ByVal Columna As Integer)

Dim i As Integer
Dim pos_SelStart As Integer
If (KeyRetroceso Or Len(TBox.Text) = 0) Then
KeyRetroceso = False
Return False
Exit Function
End If
With gridArticulos
'Recorremos todas las filas del grid
For i = 0 To gridArticulos.Rows.Count - 1
'Busca en el grid si hay coincidencia, en la fila y columna actual
If InStr(1, Trim(gridArticulos(Columna, i).Value), Trim(TBox.Text), vbTextCompare) = 1 Then
pos_SelStart = TBox.SelectionStart
'Asignamos el valor de la celda actual al textbox
TBox.Text = gridArticulos(Columna, i).Value
'Indicamos el comienzo de la selección
TBox.SelectionStart = pos_SelStart
'seleccionamos la porción de texto en el Text
TBox.SelectionLength = Len(gridArticulos(Columna, i).Value) - pos_SelStart
' Seleccionamos la fila
gridArticulos(Columna, i).Selected = True
Exit For
End If
Next i
End With
Return True
End Function

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
' aqui mandamos llamar nuestra funcion para que
' cada que se introduzca un dato se ejecute
' Autocompletar_Grid(aqui nuestro textbox , aqui el numero de columna)
' aqui vamos buscar la clave
Call Autocompletar_Grid(TextBox1, 1)
End Sub

Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
' aqui mandamos llamar nuestra funcion para que
' cada que se introduzca un dato se ejecute
' Autocompletar_Grid(aqui nuestro textbox , aqui el numero de columna)
' aqui vamos buscar la descripcion
Call Autocompletar_Grid(TextBox2, 2)
End Sub

Private Sub TextBox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
'.. Si la tecla presionada es Backspace o la tecla Delete
If e.KeyCode = Keys.Back Or e.KeyCode = Keys.Delete Then
' ..si hay texto en el Textbox
If Len(TextBox1.Text) <> 0 Then
KeyRetroceso = True
End If
End If
End Sub

Private Sub TextBox2_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox2.KeyDown
'.. Si la tecla presionada es Backspace o la tecla Delete
If e.KeyCode = Keys.Back Or e.KeyCode = Keys.Delete Then
' ..si hay texto en el Textbox
If Len(TextBox2.Text) <> 0 Then
KeyRetroceso = True
End If
End If
End Sub

Despues de hacer todo esto ya podemos escribir en nuestro textbox y veremos como al ir introduciendo datos en el se va a autocompletar y se seleccionara el renglon del grid que sea igual

QUE POCA MADRE

2010-10-13T10:19:00.001-07:00

Incluso cuando te esta llevando la chingada....

…no falta alguien que te quiera chingar

todavía más.

EL TIO GUAYABITO CAYO

2010-09-10T11:00:00.001-07:00

ASI ES EL TIO GUAYABITO FUE ENBRUJADO POR MADAMME ALEE, CLARO DE UNA MANERA MUY AMABLE COMO SE VE EN LA IMAGEN JEJEJE MAS DETALLES HOY POR NEO NIGHT'S

LA BANDERA MAGICA

2010-04-12T13:17:00.001-07:00

Me encontre esta bandera de mi pais, aunque parece extraño los colores estan bien y no es que sea daltonico jajajajaja, los que no me crean fijen su mirada en el punto que esta al centro durante 30 segundos y ya despues volteen hacia otro lado y diganme si tengo razon o no

EL SPIDER Y SUS PENDEJADAS

2010-04-09T13:13:00.000-07:00

Aqui les dejo uno de los videos del spider que es un wey que me pidio que subiera sus videos a internet por que quiere hacerse famoso haciendo sus pendejadas, chequenlo haber que les parece

CHICHARITO FICHADO CON EL MANCHESTER UNITED

2010-04-09T08:59:00.000-07:00

El sueño se cumplió. El jugador mexicano de las Chivas del Guadalajara, Javier ‘Chicharito' Hernández, fue fichado por el Manchester United de la Liga Premier de Inglaterra.

El anuncio fue publicado por la página de internet del equipo inglés, quien aseguró que llegó a un acuerdo con la directiva de las Chivas y sólo esperan que el delantero presente los exámenes médicos correspondientes.

"Manchester United se complace en anunciar que llegó a un acuerdo con el club mexicano, Chivas de Guadalajara para la adquisición del joven delantero mexicano de 21 años de edad, Javier Hernández, mejor conocido como el ‘Chicharito', por un monto no revelado", publicó el sitio oficial del cuadro británico.

El club también corroboró que Hernández ya pasó los exámenes físicos en la presente semana, por lo que se especula que fue la razón por la que no jugó el Clásico del futbol mexicano.

Despues de investigar por mi cuenta parece que el total de la venta del chicharito fue por 6 millones de libras aproximadamente y ademas de que el Manchester acepto ser uno de los equipos inaugurar el nuevo estadio de las chivas con un torneo entre los mejores clubes del mundo y todos con sus estrellas, eso si es interesante "SUERTE CHICHARITO" hechale ganas no te vaya a pasar lo que a Omar Bravo

Cuauhtémoc Blanco Chiva

2010-04-07T12:33:00.000-07:00

Y se colocó la playera del Guadalajara.
Cuauhtémoc Blanco se puso una playera de las Chivas justo un día después de la caída del América, equipo del cual es un referente, en el Clásico ante el Rebaño.

Cuau cumplió así una apuesta que realizó con el actor Demián Bichir, aficionado rojiblanco. La pagó en el marco de su programa La Hora de Cuauhtémoc que realizó en vivo en el Altar a la Patria del Bosque de Chapultepec.

"Yo sí cumplo las apuestas, no como Jorge Vergara. Deudas de juego son deudas de honor", señaló Blanco después de ponerse la casaca tapatía.
"Vergara me dijo una vez que me iba a dar la mano y que se iba a poner la playera del América y perdió y no cumplió"

Conforme al comentario de Cuauhtémoc Blanco sobre la apuesta creo que en lugar de estarse quejando de Vergara, deberia estar agradecido por haber podido portar la playera del mejor equipo de México el Guadalajara y me parece muy bien que Vergara no se alla puesto la del America porque talvez con el cancer de piel que le hubiera dado asi menos terminaria el nuevo estadio

EJEMPLOS DE DICCIONARIO DE LA LENGUA CASTELLANA

2010-04-07T12:12:00.000-07:00

ZORRO = Héroe justiciero.
ZORRA = Puta.

PERRO = Mejor amigo del hombre.
PERRA = Puta.

AVENTURERO = Osado, valiente, arriesgado.
AVENTURERA = Puta.

CUALQUIER = Fulano, Mengano, Zutano.
CUALQUIERA = Puta.

CALLEJERO = De la calle, urbano.
CALLEJERA = Puta.

HOMBREZUELO = Hombrecillo, mínimo, pequeño.
MUJERZUELA = Puta.

HOMBRE PÚBLICO = Personaje prominente. Funcionario público.
MUJER PÚBLICA = Puta.

HOMBRE DE LA VIDA = Hombre de gran experiencia.
MUJER DE LA VIDA = Puta.

PUTO = Homosexual.
PUTA = Puta.

HEROE = Ídolo.
HEROÍNA = Droga.

ATREVIDO = Osado, valiente.
ATREVIDA = Insolente, mal educada.

SOLTERO = Codiciado, inteligente, hábil.
SOLTERA = Quedada, lenta, ya se le fue el tren.

SUEGRO = Padre político.
SUEGRA = Bruja, metiche, etc.

MACHISTA = Hombre macho.
FEMINISTA = Lesbiana.

DON JUAN = Hombre en todo su sentido.
DOÑA JUANA = La mujer de la limpieza.

AUNQUE USTED NO LO CREA, EL ATLAS ALGUNA VEZ FUE CAMPEON

2010-04-06T19:46:00.000-07:00

PARA TODOS LOS AFICIONADOS AL ATLAS, AQUI TIENEN LA IMAGEN DEL RECUERDO, JEJEJE

Y PARA COMPLEMENTAR ESTA IMAGEN AQUI TIENEN UN HECHO VERIDICO

Llega un ruso con dios y le pregunta: "dios mio, cuando morira la madre rusia?". Dios le responde, "en 1995", y el ruso lloró.
Después llega un cubano y le pregunta, "señor cuando morira castro?", "en 2002" le responde el señor, y el cubano lloro.
En eso llega un gringo y pregunta "my lord cuando se acabar el imperio gringou" y dios le dice en 2034".
Y el gringo lloro. en eso llega un aficionado atlista y le dice, "dios mio, cuando va a ser campeon el atlas", y dios lloro...

MUJER AL VOLANTE, CUIDENSE TODOS

2010-04-06T12:18:00.000-07:00

Quien no ha escuchado de que las mujeres estan rependejas para manejar como dice Armado Palomas, pues me toco la de malas y me dieron en la madre, asi es, yo no choque wey me chocaron
una vieja y no digo pendeja por que es pleonasmo se me embarro y me dejo sin carro por 15 dias.
No me preocupa el carro porque esta asegurado lo que me apura es que voy a nadar en camion eso si es lo preocupante pero que mas se puede hacer les dejo unas imagenes para que vean como quedo mi charsentra jejejeje.

Asi que cuando vean a una mujer al volante alejense lo mas posible de ella o les caera la maldicion del ataque del troll chocon como dice "Dante"