GRILLA PARA TRABAJAR CON PISTOLA LECTORA DE CODIGOS DE BARRA
SIA ALGUIEN TIENE ALGUNA GRILLA EN LA QUE SE PUEDA INGRESAR CODIGOS EN UNA COLUMNA Y EN EL EVENTO CHANGE DE EL PRIMER CAMPO PASE INMEDIATAMENTE A LA SEGUNDA FILA Y ASI SUSESIVAMENTE......PORFAVOR LA NESESITO PARA UN SISTEMA SI ALGUIEN TIENE UN CODIGO FUENTE DE COMO TRAVAJARLA CON BASE DE DATOS PORFAVOR ENVIENMELA A MI CORREO...........DE ANTEMANO ESTARE MUY AGRADESIDO!!
cristian, porque no recojes el codigo en una caja de texto y una vez que la pistola lo lee se ejecuta el codigo KeyDown 13 (Cr) automaticamente y lo metes en la columna 0 de la fila+1 del grid?.
Private Sub txtCodigo_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 And txtCodigo <> "" Then
grid.Text = txtCodigo.Text
grid.Row = grid.Row + 1
txtCodigo.SetFocus
End If
End Sub
Es una Idea.
Saludos desde Galicia
Private Sub txtCodigo_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 And txtCodigo <> "" Then
grid.Text = txtCodigo.Text
grid.Row = grid.Row + 1
txtCodigo.SetFocus
End If
End Sub
Es una Idea.
Saludos desde Galicia
