ms-access - 访问：更改事件后

Question

我正在尝试创建一个执行简单数学的访问表单。用户输入前值和后值，当用户输入后值时，禁用的净文本框自动计算并显示净值。

前： ___

后： ____

净：（=前后）

我的代码是：

   Private Sub after_Change()
       net.Value = before.Value - after.Value
   End Sub

现在的两个问题是它会根据最后输入的值进行更改（更改 5->6 它将以 5 运行代码）。并且仅在第一次更改时运行代码，而不是在每次更改时运行。要再次运行它，您必须取消选择文本框并再次选择它。

我在这里想念什么？

标签： ms-accessvba

Answer 1

这应该有效：

Private Sub Form_Current
  net.Value = before.Text - after.Text
End Sub