Como agregar DataRow a un DataTable

0
301

Pueden existir muchos motivos para crear un DataTable de forma manual, ya sea que queremos llenar un ComboBox con algunos datos exactos u otro motivo importante.

Para esto podríamos utilizar este código:

Dim dt As New DataTable
Dim dr As DataRow

dt.Columns.Add(New DataColumn(“Codigo”, GetType(String)))
dt.Columns.Add(New DataColumn(“Descripcion”, GetType(String)))
dt.Columns.Add(New DataColumn(“Valor”, GetType(Integer)))

dr = dt.NewRow()
dr(“Codigo”) = “A”
dr(“Descripcion”) = “Activo”
dr(“Valor”) = 1
dt.Rows.Add(dr)

dr = dt.NewRow()
dr(“Codigo”) = “I”
dr(“Descripcion”) = “Inactivo”
dr(“Valor”) = 2
dt.Rows.Add(dr)

dr = dt.NewRow()
dr(“Codigo”) = “B”
dr(“Descripcion”) = “Bloqueado”
dr(“Valor”) = 3
dt.Rows.Add(dr)

Claro también podríamos tener esta creación de forma dinámica, metiendo la parte del dr = dt.NewRow.. dentro de algón ciclo, for, while.

Y en el caso de que queramos mostrar este datatable en un ComboBox solo se lo asignamos al DataSource

Me.cboValores.DataSource = dt
Me.cboValores.ValueMember = “Valor”
Me.cboValores.DisplayMember = “Descripcion”

Con más de 18 años de experiencia en programación, experto en lenguajes .NET, VB, C#, ASP.NET, Xamarin, XCode, DBA en SQL Server. Creador de dotnetcr.com, sitio web para programadores en español.

royrojas.com | dotnetcr.com

Dejar respuesta

Please enter your comment!
Please enter your name here