domingo, junio 16, 2024

Como agregar DataRow a un DataTable

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»

Roy Rojas
Roy Rojashttp://www.dotnetcr.com
Con más de 20 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 | GitHub
Roy Rojas
Roy Rojashttp://www.dotnetcr.com
Con más de 20 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 | GitHub