EJemplo de DataRepeater Winforms VB.NET

Hola a todos,
Aqui os traigo un ejemplo de como usar Datarepeater de Winforms.

Aqui os dejo el video y a continuación el codigo…

Para ello lo que haremos sera crear un un control datarepeater en nuestro form, y le añadimos 2 controles, un label y un textbox de tal manera que nos quede algo parecido a esto.

Ahora en el codigo, en el load ponemos lo siguiente.
Como siempre yo creo los datos a mano.

  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

       Dim DT As New DataTable

       DT.Columns.Add("id")
       DT.Columns.Add("Nombre")
       DT.TableName = "Tabla"

       Dim DR As DataRow

       DR = DT.NewRow
       DR("id") = 1
       DR("Nombre") = "JOSE"
       DT.Rows.Add(DR)
       DR = DT.NewRow
       DR("id") = 2
       DR("Nombre") = "PEDRO"
       DT.Rows.Add(DR)
       DT.AcceptChanges()


       Me.Label1.DataBindings.Add(New Binding("Text", DT, "id"))
       Me.TextBox1.DataBindings.Add(New Binding("Text", DT, "Nombre"))

       Me.DataRepeater1.DataSource = DT

   End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim DT As New DataTable

DT.Columns.Add("id")

DT.Columns.Add("Nombre")

DT.TableName = "Tabla"

Dim DR As DataRow

DR = DT.NewRow

DR("id") = 1

DR("Nombre") = "JOSE"

DT.Rows.Add(DR)

DR = DT.NewRow

DR("id") = 2

DR("Nombre") = "PEDRO"

DT.Rows.Add(DR)

DT.AcceptChanges()

Me.Label1.DataBindings.Add(New Binding("Text", DT, "id"))

Me.TextBox1.DataBindings.Add(New Binding("Text", DT, "Nombre"))

Me.DataRepeater1.DataSource = DT

End Sub

Como ves el codigo es bastantate simple, el datarepeater se comporta como un bindingsource.

Hasta aqui el ejemplo, un saludo a todos , ya sabes comenta y suscribite a nuestra cuenta en Twiter,Facebook o google+

Deja un comentario Cancelar respuesta