DataSetオブジェクトのテーブルにレコードを追加するにはDataTableオブジェクトに含まれるDataRowCollectionオブジェクトの
Addメソッドを使います
DataRowCollectionオブジェクトのAddメソッドはDataRowCollectionオブジェクトに新しいDataRowオブジェクトを追加します
Addメソッドの引数には、DataRowオブジェクトを指定します
DataRowCollectionオブジェクトはRowsプロパティで取得できる
DataTableオブジェクト.Rows.Add ( DataRowオブジェクト )
DataRowオブジェクトはDataTableオブジェクトのNewRowメソッドで作成します
レコードの値は作成したDataRowオブジェクトにフィールド名を指定してフィールドごとに値を設定することができる
DataRowオブジェクト( フィールド名 ) = フィールドの値
Dim dSet As DataSet = New DataSet("t_テスト")
Dim dTbl As New DataTable
Dim dRow As DataRow
dTbl = dSet.Tables.Add("t_テスト")
dTbl.Columns.Add( " メニューNO" , Type.GetType("System.Int32"))
dTbl.Columns.Add( "メニュー" , Type.GetType("System.String"))
dRow = dTbl.NewRow()
dRow("メニューNO") = 101
dRow("メニュー") = "ホットレモネード"
dTbl.Rows.Add( dRow )
データセットのテーブルにレコードを追加
---------------------------------------------------------------
DataTableオブジェクト.Rows.Add(DataRowオブジェクト)
DataRowオブジェクト = DataTableオブジェクト.NewRow()
DataRowオブジェクト(フィールド名) = 値
DataRowオブジェクト(インデックス) = 値
---------------------------------------------------------------
Dim dSet As DataSet = New DataSet("恐竜")
Dim dTbl As DataTable
Dim dRow As DataRow
dTbl = dSet.Tables.Add("肉食恐竜")
dTbl.Columns.Add("NO", Type.GetType("System.Int32"))
dTbl.Columns.Add("名前", Type.GetType("System.String"))
'レコードを作成しテーブルに追加
dRow = dTbl.NewRow()
dRow("NO") = 1
dRow("名前") = "テラノザウルス"
dTbl.Rows.Add( dRow )
|
|
dSet.Tables(0).Rows(0)(0)
dSet.Tables(0).Rows(0)(1)
'新しいDataRowを作成
Dim dRow As DataRow
dRow = dTbl.NewRow()
0 件のコメント:
コメントを投稿