Private Sub Command1_Click()
  With Grid1
    If .IsEditMode <> 0 Then .UpdateRow
 
    If .IsEditMode <> 0 Then
      .Recordset.Edit
      .Recordset("SpalteC") = .Recordset("SpalteA") + .Recordset("SpalteB")
      .Recordset.Update
      .RowRefresh
    End If
  End With
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de