agregar filas a un datatable

07/11/2006 - 00:01 por vlamafox | Informe spam

Hola a todos, Quiero agregar registros a un datatable pero no los agrega
consecutivamente, sino mas bien lo va chancando a cada uno de ellos, como
puedo hacer lo q pretendo. Gracias.

Public dsPiso As New EntidadesNegocio.dsEntidades ' hace referencia al
proyecto de dataset tipados

private sub agregarpiso()
Dim drPiso As EntidadesNegocio.dsEntidades.PisoRow
drPiso = dsPiso.Piso.NewPisoRow
drPiso("IdPredio") = IdPredio
drPiso("AnioFiscal") = AnioFiscal
drPiso("Descripcion") = txtDescripcion.text
dsPiso.Piso.AddPisoRow(drPiso)
end sub

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 vlamafox

07/11/2006 - 00:42 | Informe spam

tambien tengo q precisar q el procedimiento de agregarpiso esta en un
formulario el cual llenara a un datagridview q se encuentra en otro
formulario, gracias

"vlamafox" wrote:

Hola a todos, Quiero agregar registros a un datatable pero no los agrega
consecutivamente, sino mas bien lo va chancando a cada uno de ellos, como
puedo hacer lo q pretendo. Gracias.

Public dsPiso As New EntidadesNegocio.dsEntidades ' hace referencia al
proyecto de dataset tipados

private sub agregarpiso()
Dim drPiso As EntidadesNegocio.dsEntidades.PisoRow
drPiso = dsPiso.Piso.NewPisoRow
drPiso("IdPredio") = IdPredio
drPiso("AnioFiscal") = AnioFiscal
drPiso("Descripcion") = txtDescripcion.text
dsPiso.Piso.AddPisoRow(drPiso)
end sub

Responder a este mensaje

#2 Carlos Gómez

07/11/2006 - 17:24 | Informe spam

si tienes una tabla (con sus columnas definidas), para agregar la fila
puedes hacer:
dim fila() as Object={IdPredio,AnioFiscal,txtDescripcion.text}
tabla.Rows.Add(fila)
ojo te lanzará una excepción si el orden de los valores no es el
orden que tiene la tabla

vlamafox ha escrito:

Hola a todos, Quiero agregar registros a un datatable pero no los agrega
consecutivamente, sino mas bien lo va chancando a cada uno de ellos, como
puedo hacer lo q pretendo. Gracias.

Public dsPiso As New EntidadesNegocio.dsEntidades ' hace referencia al
proyecto de dataset tipados

private sub agregarpiso()
Dim drPiso As EntidadesNegocio.dsEntidades.PisoRow
drPiso = dsPiso.Piso.NewPisoRow
drPiso("IdPredio") = IdPredio
drPiso("AnioFiscal") = AnioFiscal
drPiso("Descripcion") = txtDescripcion.text
dsPiso.Piso.AddPisoRow(drPiso)
end sub

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida