Thursday, May 21, 2009 3:02 AM azamat_ali

Creating a DataTable Through Code


        Dim tblMy As New DataTable()
        Dim rw1, rw2, rw3 As DataRow
        Dim c1 As New DataColumn("ID")
        Dim c2 As New DataColumn("Team")

        tblMy.Columns.Add(c1)
        tblMy.Columns.Add(c2)

        rw1 = tblMy.NewRow()
        rw1.Item("ID") = 1
        rw1.Item("Team") = "Team 1"
        tblMy.Rows.Add(rw1)

        rw2 = tblMy.NewRow()
        rw2.Item("ID") = 2
        rw2.Item("Team") = "Team 2"
        tblMy.Rows.Add(rw2)

        rw3 = tblMy.NewRow()
        rw3.Item("ID") = 3
        rw3.Item("Team") = "Team 3"
        tblMy.Rows.Add(rw3)
      

Filed under: , , , , ,

Comments

No Comments

Leave a Comment

(required) 
(required) 
(optional)
(required)