如何实现把edit中的值与access数据库中的对应字段记录相加或相减?急急!!!!

Question

cnn.Execute("Update tablename Set columnname = columnname + " & Edit1.Text)

Answer 1

Data1.Database.Execute("Update [Tabel1] Set [Field1] = [Field1]+[Field2]+'" & replace(Edit1.Text,"'","''") & "'"  
三项相加相减只限于数字之间：
if IsNumeric(Edit1.text) then
     Data1.Database.Execute("Update [Tabel1] Set [Field1] = [Field1]-[Field2]-" &  Edit1.Text
endif

Answer 2

Data1.Recordset.Edit
Data1.Recordset.Fields("Field1")=Data1.Recordset.Fields("Field1") & Edit1.Text
Date1.Recordset.Update

Answer 3

recordset.update(fields(2),newvalue)错在哪里