.net DataTableに列を一括で追加する方法

Question

お世話になっております。

表題の通り、DataTableへの列追加を一括で追加できないものか、と考えております。
"一括で追加"という表現が正しいのか分かりませんが．．．。

現在以下のようにして、同じレイアウトのDataTableを作成しています。

dim table1 as new datatable
table1.colums.add("teru1")
table1.colums.add("teru2")
table1.colums.add("teru3")

dim table2 as new datatable
table1.colums.add("teru1")
table1.colums.add("teru2")
table1.colums.add("teru3")

dim table3 as new datatable
table1.colums.add("teru1")
table1.colums.add("teru2")
table1.colums.add("teru3")

この追加方法だと同じことを何度も書かなくてはいけなく、コーディング量が増えるのであまり好みではないです。
そこで、列だけを宣言した列挙体のようなものを作成し、それをDataTableの列として追加できないかと考えました。

しかしいい方法が思い浮かばず、とりあえず以下のように列を追加したDataTableを作成し、それを突っ込むというちょっと強引？な方法をとっています。

dim temp_table as new datatable
temp_table.colums.add("retu1")
temp_table.colums.add("retu2")
temp_table.colums.add("retu3")

dim table1 as datatable = temp_table
dim table2 as datatable = temp_table
dim table3 as datatable = temp_table

1度作成した列のかたまりを流用するようなイメージです。
他にもっと良い（スマート or パフォーマンスが良い）方法があれば、ご教授いただけないでしょうか。

よろしくお願いします。

Answer 1

DataTableのCopyとか、Cloneとか、DataTableのコレクションに対して処理を書き分けるとか、根本的にDataTableを使うのを止めるとか
そもそもDataTableを使ってて、パフォーマンスとか云々言っちゃダメな気がするのは私だけ？

Comments

[xo001122]

list使った方がいい、みたいな記事見かけたことありますが…。今回はdatatableで考えたいです。よろしくお願いします。

Answer 2

パフォーマンスを求めるなら、下記の様にListを使うと良いと思います。
意外と遅い DataTable 、なので List を使うと 5 倍早くなる

個人的には、各カラムの定義も分かり易くなるので好きですね。

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim dataList As New List(Of testTable)
        Dim testTable As New testTable
        testTable.col1 = "あ"
        testTable.col2 = "い"
        testTable.col3 = "う"
        dataList.Add(testTable)

        DataGridView1.DataSource = dataList
    End Sub
End Class

Public Class testTable
    Public Property col1 As String
    Public Property col2 As String
    Public Property col3 As String
End Class

Answer 3

DataTableへの列追加を一括で追加できないものか、と考えております。

列の追加だけが目的ではなく、その後何らかのデータソースからデータを取得して DataTable に行を追加するのですよね？

であれば、そのデータソースは何でしょう？

DataTable は ADO.NET ライブラリ内の中心的オブジェクトということで、データソースが SQL Server, MySQL, Access などのデータベースであれば、例えば ADO.NET の DataAdapter を使って、データソースから自動的に DataTable に列と行を追加してくれるので、今回質問者さんが問題としていることに悩む必要はないのですが。

データソースは CSV, XML などでも OK です。

Answer 4

書き方は色々あると思います。

Sub Main()
    Dim table1 As DataTable = CreateTeruDataTable()
    Dim table2 As DataTable = CreateTeruDataTable()
    Dim table3 As DataTable = CreateTeruDataTable()
End Sub

Private Function CreateTeruDataTable() As DataTable
    Using dt As New DataTable()
        dt.Columns.Add("teru1")
        dt.Columns.Add("teru2")
        dt.Columns.Add("teru3")
        Return dt
    End Using
End Function

Using table1 As New DataTable(),
      table2 As New DataTable(),
      table3 As New DataTable()
    For Each tbl In {table1, table2, table3}
        tbl.Columns.Add("teru1")
        tbl.Columns.Add("teru2")
        tbl.Columns.Add("teru3")
    Next
End Using

あとはディープコピーするとか。

【追記】
最後まで書き込みを見てませんでした。
最後に書かれているやり方だと、table1～3が同一の実体を指す事になり、table1に対する変更などがtable2にもtable3にも起こることになりますが大丈夫でしょうか。

【追記２】
xo001122さんのコード

Sub Main()
    Dim temp_table As New DataTable
    temp_table.Columns.Add("retu1")
    temp_table.Columns.Add("retu2")
    temp_table.Columns.Add("retu3")

    Dim table1 As DataTable = temp_table
    Dim table2 As DataTable = temp_table
    Dim table3 As DataTable = temp_table

    ' table1に1行追加してそれぞれのDataTableの行数を表示
    table1.Rows.Add()
    Console.WriteLine("table1の行数：{0}", table1.Rows.Count)   ' 1行
    Console.WriteLine("table2の行数：{0}", table2.Rows.Count)   ' 1行
    Console.WriteLine("table3の行数：{0}", table3.Rows.Count)   ' 1行

    Console.ReadLine()
End Sub

私のコード。

Sub Main()
    Using table1 As New DataTable(),
          table2 As New DataTable(),
          table3 As New DataTable()
        For Each tbl In {table1, table2, table3}
            tbl.Columns.Add("teru1")
            tbl.Columns.Add("teru2")
            tbl.Columns.Add("teru3")
        Next

        ' table1に1行追加してそれぞれのDataTableの行数を表示
        table1.Rows.Add()
        Console.WriteLine("table1の行数：{0}", table1.Rows.Count)   ' 1行
        Console.WriteLine("table2の行数：{0}", table2.Rows.Count)   ' 0行
        Console.WriteLine("table3の行数：{0}", table3.Rows.Count)   ' 0行
    End Using

    Console.ReadLine()
End Sub

Comments

[xo001122]

上記のコードだとテーブルにテーブルを突っ込む形になるので、わたしコードと変わらないですね。それってパフォーマンス的にはどうなんでしょう…。
下記のコードは参考にしたいですが、コード量に差はなさそうですね。(どんな書き方でも列の定義と使用テーブルの生成は要るのでこれ以上は減らしようがない気もしますが(^_^;)

[workaholist]

追記にも書きましたが違うと思います。
xo001122さんのコードは、変数はtable1～3の3つ、インスタンスは1つ。
私のコードは、変数はtable1～3の3つ、インスタンスも3つ。
です。

[workaholist]

table1～3が同一インスタンスを指すポインタで良いということであれば私のコードが誤りです。

[workaholist]

私の回答に追記しました。