У меня есть 3 поля:
- 1 - «общая сумма»: содержит фактическую цену
- 2 «полученная сумма»: содержит полученную сумму от клиента
- 3 - это «баланс»: = 1-2
Я хочу создать форму, которая будет использовать значение, введенное в текстовое поле, и добавить его к предыдущему значению в 2, чтобы яне нужно удалять предыдущее значение, а также обновлять поле состояния, в котором отображается любой депозит.
Примечание: поле статуса является депозитным, если 2 <1, и оплачивается, если 1 = 2.</p>
Это код, который я использую
Private sub cmdbtn on click()
Dim rs as recordset
Set rs = currentdb.Openrecordset("contacttable", dbopendynaset)
Rs.Findfirst("contactid="'" & me.Txtcid & "'")
Rs.Edit
Rs![pfee]= rs![pfee] + me.Txtbal.Value
Rs.Update
Rs.Close
End sub