seleccionar los datos del datagridview y mostrarlo en textos
Publicado por nato (59 intervenciones) el 26/06/2017 20:35:02
hola gracias por us tiempo
tengo un datagridview es cual tengo enlazado a una tabla y lo gre hacer que al seleccionar un datos del datagridview mw lo mande a los texbox el problema es que al seleccionar a veces 3 o 4 se al dar click en otra celda no responde hasta despues de varios click o que cambie de columna
dejo mi codigo a ver si alguien me puede decir que esta mal
saludos
tengo un datagridview es cual tengo enlazado a una tabla y lo gre hacer que al seleccionar un datos del datagridview mw lo mande a los texbox el problema es que al seleccionar a veces 3 o 4 se al dar click en otra celda no responde hasta despues de varios click o que cambie de columna
dejo mi codigo a ver si alguien me puede decir que esta mal
saludos
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private Sub dtgproductos_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles dtgproductos.CellContentClick
Dim i As Integer
i = dtgproductos.CurrentRow.Index
txtcodigo.Enabled = False
txtclave.Enabled = False
txtdescripcion.Enabled = False
txtcodigo.Text = dtgproductos.Item(0, i).Value().ToString
txtclave.Text = dtgproductos.Item(1, i).Value().ToString
lbubicacion.Text = dtgproductos.Item(2, i).Value().ToString
txtdescripcion.Text = dtgproductos.Item(3, i).Value().ToString
cbclase.Text = dtgproductos.Item(4, i).Value().ToString
cbetatus.Text = dtgproductos.Item(5, i).Value().ToString
txtprefijo.Text = dtgproductos.Item(6, i).Value().ToString
txtubicacion.Text = dtgproductos.Item(7, i).Value().ToString
btcambios.Visible = True
btdisponibles.Visible = False
End Sub
Valora esta pregunta
0
