Dim dt as new DataTable()
dt.Columns.Add("id", GetType(Int32))
dt.Columns.Add("name", GetType(String))
Dim aRow As DataRow = dt.NewRow
aRow(0) = 1
aRow(1) = "数据1"
dt.Rows.Add(aRow)
Dim aRow1 As DataRow = dt.NewRow
aRow1(0) = 2
aRow1(1) = "数据2"
dt.Rows.Add(aRow1)