Visual Basic.NET - Pasar datos de datagrid a Textbox

 
Vista:

Pasar datos de datagrid a Textbox

Publicado por Sheila (28 intervenciones) el 30/08/2004 09:48:30
Hola a todos!
El motivo de mi consulta es el siguiente: tengo un datagrid en el que se visualizan los campos de una tabla detalle y lo que quiero es que, al pinchar dos veces sobre una fila del datagrid, los datos de esa fila se pasen a unos textfield, es decir:
contenido de la columna1 del datagrid -> textfield1
contenido de la columna2 del datagrid -> textfield2
etc
¿alguna idea?
Muchas gracias.
Un saludo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pasar datos de datagrid a Textbox

Publicado por Alfredo (62 intervenciones) el 30/08/2004 21:17:16
hola,
prueba esto:
en el evento doble click de la grilla:
Dim fila, columna As Integer
' tomar la fila actual
fila = dataGrid1.CurrentCell.RowNumber
' luego recorres la grilla y enlazas los campos
text1.text = datagrid1(fila,1)
text2.text = datagridq(fila,2)
' y asi sucesivamente (puedes meter la instruccion en un ciclo )

suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Pasar datos de datagrid a Textbox

Publicado por Sheila (28 intervenciones) el 31/08/2004 08:04:45
Muchas gracias Alfredo,
lo voy a probar y te cuento.
Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Solución

Publicado por sheila (28 intervenciones) el 31/08/2004 08:33:35
Hola Alfredo!
Ya lo he solucionado, lo he hecho de otro modo, pero gracias a tu idea :-)
Pongo el código por si otro lo puede necesitar.

' Obtengo el número de fila que ha sido seleccionado en el DataGrid a
' través del BindingContext y de la propiedad Current del
' BindingManagerBase. Funciona tanto si el DataGrid ha sido ordenado
' como si no.

Dim bm As BindingManagerBase = Me.DG.BindingContext (Me.DG.DataSource, Me.DG.DataMember)

Dim Fila As DataRow = CType(bm.Current, DataRowView).Row

Me.txtCodArticulo.Text = Fila("CodArticulo")
'donde CodArticulo es una columna de mi datagrid
Me.txtCantidad.Text = Fila("Cantidad")
Me.txtDescripcion.Text = Fila("Descripcion")
Me.txtPVP.Text = Fila("PVP")
Me.txtArtDcto.Text = Fila("Dcto")
Me.txtArtIva.Text = Fila("Iva")
Me.txtArtTotal.Text = Fila("Importe")

Un saludo.
Sheila
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar