访问文本框添加值

时间:2013-01-22 14:33:12

标签: vba ms-access math textbox subroutine

我有一个带有表单的访问数据库,其中包含许多文本框。文本框根据用户的选择填充货币数据。每条记录可能有不同的值,有些可能没有值。我需要将3个txtbox一起添加,但值始终显示为Null。

me.txt1 = Nz(me.txt2.value + me.txt3.value + me.txt3.value)
txt2 = 23.04
txt3 = Null(empty)
txt4 = 15.64

txt1的值应该是38.68,而不是它的Null。文本框由从下拉列表的AfterUpdate事件调用的子例程填充。

1 个答案:

答案 0 :(得分:2)

你在哪里使用那个公式?它在VBA中吗?你不需要它。
如果它来自txt1的控制源,则Me应替换为Form(或根本不替换)

在txt1的Control Source属性中,键入= nz(txt2)+nz(txt3)+nz(txt4)
这应该就是你所需要的。没有VBA。
另一种解决方案,如果表单的来源是查询,则在查询中添加计算字段 在这两种情况下,您当然不会存储该数据(这将违反第3范式)