Vb.net data table creation?

Question

I am using vb.net/winforms. How to convert 10 rows with three columns to a DataSet / DataTable?

The lines look something like this:

Item-1, $100, 44 Item-2, $42, 3 etc 

Answer 1

 Dim Table1 As DataTable Table1 = New DataTable("TableName") Dim column1 As DataColumn = New DataColumn("Column1") column1.DataType = System.Type.GetType("System.String") Dim column2 As DataColumn = New DataColumn("Column2") column2.DataType = System.Type.GetType("System.Int32") Dim column3 As DataColumn = New DataColumn("Column2") column3.DataType = System.Type.GetType("System.Int32") Table1.Columns.Add(column1) Table1.Columns.Add(column2) Table1.Columns.Add(column3) Dim Row1 As DataRow Row1 = Table1.NewRow() Row1.Items("Column1") = "Item1" Row1.Items("Column2") = 44 Row1.Items("Column3") = 99 Table1.Rows.Add(Row1) ' Repeat for other rows 

Answer 2

I know this post is old, but I believe that it is possible to solve much less lines of code.

 ' Declare DataTable Dim Table1 As DataTable ' Define columns Table1.Columns.Add("Column1", GetType(System.String)) Table1.Columns.Add("Column2", GetType(System.Int32)) Table1.Columns.Add("Column3", GetType(System.Int32)) ' Add a row of data Table1.Rows.Add("Item1", 44, 99) Table1.Rows.Add("Item2", 42, 3) 

Source DotNetPerls.com: VB.NET DataTable