データグリッドの変更の反映・キャンセル
変更点があるかどうかをチェックするのは、DataSet の GetChanges メソッドです。変更が無い場合は、Nothing を返します。変更がある場合には、DataAdapter の Fill メソッド を遣います。
Private gDS as System.Data.DataSet ' ちゃんと Fill していること Private gAdapter As System.Data.SqlClient.SqlDataAdapter ' ちゃんとコマンドを取り込んでおくこと ... ' データセットに対する変更の停止 Me.BindingContext(oDS).EndCurrentEdit() ' 変更前後の差分を取得 Dim oDataSetChanges As System.Data.DataSet = gDS.GetChanges ' 変更点の有無を見る If Not oDataSetChanges Is Nothing Then ' 変更点がある gAdapter.Update( oDataSetChanges ) End If
キャンセルは、DataSet の RejectChangesメソッドで済みます。
Private gDS as System.Data.DataSet ' ちゃんと Fill していること ... gDS.RejectChanges()