HIRO's.NET

VB.NET, C#, PowerShell Tipsサイト

 VB.NET, C#, PowerShellを使用しているエンジニアのためのサイト。

 基本的な使用方法から開発で役立つTipsまで幅広く取り扱っています。

HIRO's.NET RSSHIRO's.NET RSS


VB.NET 2005の開発でお困りのことはありませんか?
そんな悩みは当サイトで解決!!

HOME > VB.NET 2005 Tips > コントロール > DataSet Tips メニュー

12.テーブルにデータを追加する

UPDATE:2007/01/13 

<< 前のTips  次のTips >>

 

 DataSetの既存テーブルにデータを追加するには、DataTableオブジェクトのNewRowメソッドを使用します。

手順
1)変数の宣言
2)データセットにテーブルを追加する
3)テーブルにフィールドを追加する
4)フィールドに主キーを設定する
5)テーブルにレコードを追加する


 09.テーブルを作成する
 10.テーブルにフィールドを追加する
 11.フィールドに主キーを設定する
も参照してください。

 
サンプル
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    '1)変数の宣言
    Dim dtSet As DataSet = New DataSet("アドレステーブル")
    Dim dtTable As DataTable
    Dim PrimaryColumn As DataColumn
    Dim dtRow As DataRow

    '2)データセットにテーブルを追加する
    'ADDRESS_TBLというテーブルを作成します
    dtTable = dtSet.Tables.Add("ADDRESS_TBL")

    '3)テーブルにフィールドを追加する
    '.Add("フィールド名", フィールドの型)で追加します
    PrimaryColumn = dtTable.Columns.Add("No", Type.GetType("System.Int32"))
    dtTable.Columns.Add("ZIPCODE", Type.GetType("System.String"))
    dtTable.Columns.Add("ADDRESS", Type.GetType("System.String"))
    dtTable.Columns.Add("PHONE", Type.GetType("System.String"))
    dtTable.Columns.Add("E-MAIL", Type.GetType("System.String"))

    '4)フィールドに主キーを設定します
    dtTable.PrimaryKey = New DataColumn() {PrimaryColumn}

    '5)テーブルにデータを追加する
    dtRow = dtTable.NewRow()
    dtRow("No") = "1"
    dtRow("ZIPCODE") = "123-4567"
    dtRow("ADDRESS") = "東京都のどこか"
    dtRow("PHONE") = "0120-111-2222"
    dtRow("E-MAIL") = "hoge@mail.co.jp"
    dtTable.Rows.Add(dtRow)
End Sub