web-dev-qa-db-ja.com

vb.netはデータテーブルを作成していますか？

私はvb.net/winformsを使用しています。 3つの列を持つ10行をDataSet/DataTableに変換するにはどうすればよいですか？

行は次のようなものです：

Item-1, $100, 44

Item-2, $42, 3

etc
vb.netdatatable
9
Alex
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
21
Bala R

私はこの投稿が古いことを知っていますが、これはより少ないコード行で解決できると思います。

' 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)

ソース DotNetPerls.com：VB.NET DataTable

16
PhilNicholas