更新表单上的所有文本框

Question

我的用户表单大约有30个文本框。

我有一个on_change，其中文本框使用DSums和Dcounts进行更新 - 问题是看起来并非所有文本框都在更新。

是否有另一种方法可以提醒或刷新盒子？

示例代码：

CashE = DSum("[Total Amount]", "[tbl_Cash_Yesterday]", "[Processed By] = '" & Text285 & "' and [Field19] = 'Evening'") - DSum("[Aged Relief]", "[tbl_Cash_Yesterday]", "[Processed By] = '" & Text285 & "' and [Field19] = 'Evening'")

Answer 1

您可以尝试在更新后保存数据。添加

Me.Dirty = false

并查看是否不会刷新已保存数据中的所有内容。