Partial Class DataTable1DataTable
 
      Private Sub DataTable1DataTable_DataTable1RowChanging(sender As _
        System.Object, e As DataTable1RowChangeEvent) Handles _
        Me.DataTable1RowChanging
         If e.Action = DataRowAction.Commit Then
            Dbg("commit")
         End If
      End Sub
 
   End Class

(Rechtschreibfehler urheberrechtlich geschützt)