Grid con datatable
El código de abajo llena el grid fpalumnos de una colección de alumnos
Dim sheet As FarPoint.Win.Spread.SheetView = Me.fpAlumnos.Sheets(0)
Dim r As Integer = 0
Me.fpAlumnos.Sheets(0).RowCount = 0
For Each alm As Alumno In esc.Alumnos.GetColeccion
sheet.RowCount += 1
sheet.SetTag(r, 0, alm)
sheet.SetText(r, 0, alm.Nombre)
sheet.SetText(r, 1, alm.Paterno)
sheet.SetText(r, 2, alm.Materno)
'Me.variables(alm) ejemplo de clonacion
r = r + 1
Next
pero ahora tengo lo siguiente:
Dim tb As DataTable = Me.tablas.Tables("tblAlumno")
For Each a As Alumno.Alumno In esc.Alumnos.GetColeccion
Dim dr As DataRow = tb.NewRow
dr.BeginEdit()
dr("idalumno") = a.IdAlumno
dr("curp") = a.Curp
dr("nombre") = a.Nombre
dr("paterno") = a.Paterno
dr("materno") = a.Materno
dr.EndEdit()
tb.Rows.Add(dr)
Next
Como hago para llenar el grid pero ahora lo toma de un datatable que es "TB"
Pero con código no con lo siguiente:
Me.FpAlumno.DataSource = tb
Dim sheet As FarPoint.Win.Spread.SheetView = Me.fpAlumnos.Sheets(0)
Dim r As Integer = 0
Me.fpAlumnos.Sheets(0).RowCount = 0
For Each alm As Alumno In esc.Alumnos.GetColeccion
sheet.RowCount += 1
sheet.SetTag(r, 0, alm)
sheet.SetText(r, 0, alm.Nombre)
sheet.SetText(r, 1, alm.Paterno)
sheet.SetText(r, 2, alm.Materno)
'Me.variables(alm) ejemplo de clonacion
r = r + 1
Next
pero ahora tengo lo siguiente:
Dim tb As DataTable = Me.tablas.Tables("tblAlumno")
For Each a As Alumno.Alumno In esc.Alumnos.GetColeccion
Dim dr As DataRow = tb.NewRow
dr.BeginEdit()
dr("idalumno") = a.IdAlumno
dr("curp") = a.Curp
dr("nombre") = a.Nombre
dr("paterno") = a.Paterno
dr("materno") = a.Materno
dr.EndEdit()
tb.Rows.Add(dr)
Next
Como hago para llenar el grid pero ahora lo toma de un datatable que es "TB"
Pero con código no con lo siguiente:
Me.FpAlumno.DataSource = tb
Respuesta de tnathos
1
no te entiendo.. no te sirve Me. FpAlumno. DataSource = tb?
Si si me funciona,,, solo quiero saber si se puede hacer pero con código es decir usando las siguientes lineas:
For Each alm As Alumno In esc.Alumnos.GetColeccion
sheet.RowCount += 1
sheet.SetTag(r, 0, alm)
sheet.SetText(r, 0, alm.Nombre)
sheet.SetText(r, 1, alm.Paterno)
sheet.SetText(r, 2, alm.Materno)
'Me.variables(alm) ejemplo de clonacion
Es decir ir recorriendo también e ir asignando a sheet los datos,,, saludos
For Each alm As Alumno In esc.Alumnos.GetColeccion
sheet.RowCount += 1
sheet.SetTag(r, 0, alm)
sheet.SetText(r, 0, alm.Nombre)
sheet.SetText(r, 1, alm.Paterno)
sheet.SetText(r, 2, alm.Materno)
'Me.variables(alm) ejemplo de clonacion
Es decir ir recorriendo también e ir asignando a sheet los datos,,, saludos
No que yo sepa ya que internamente .net hace la importación de datos al grid..
