ник: Stanislav
Понял, что загвоздка в том, что в данные в форме собраны из нескольких таблиц посредством INNER JOIN. Это не дает выполнить в обработчике BeforeUpdate не только Cancel, но и Refresh формы, чтобы сохранить изменения. Не совсем понял ситуацию, и как тут правильно поступить, но переделал вот так:
Private Sub Qty_AfterUpdate()
If Nz(Me.Qty, 0) > Nz(Me.Qty.OldValue, 0) Then
Me.Qty = Me.Qty.OldValue
Me.Refresh
Else
Me.Refresh
End If
End Sub
|
работает.