Access中需要DSum对象

时间:2015-06-08 14:58:25

标签: vba ms-access access-vba ms-access-2010

我在Access 2010中有一个子表单,列出了与项目不同部分相关的成本。在另一页上,我有一个TotalValue字段,它取每个项目的成本总和,并乘以1,000,000。最初,我只有Parent.[TotalValue] = Me.Est_Value.Value * 1000000,但这并没有总结成本。所以我尝试添加DSum,但它在424: Object Required行给出了运行时错误DSum

Private Sub Est_Value_AfterUpdate()

Me.Recalc
Parent.[TotalValue] = DSum(Projects.EstValue, 
       Projects, Projects.ProjNo = Activity.ProjNo) * 1000000
Parent.[UpdatedCosts] = Date
Parent![Updated Costs].Requery
Parent!Text263.Requery

End Sub 

我不确定它有什么问题,所以我将不胜感激。

1 个答案:

答案 0 :(得分:2)

我真的没有任何有用的例子。但根据我在这里阅读的内容:http://www.techonthenet.com/access/functions/domain/dsum.php

看起来应该更像这样:

Me.Parent.[TotalValue] = DSum("EstValue", "Projects", "Projects.ProjNo = " & Activity.ProjNo) * 1000000

这假设Activity.ProjNo是表单属性,Projects.ProjNo是数字字段。

更新:在进一步讨论中,Activity.ProjNo不是包含ProjNo值的控件,而是MFProjectsSubform.ProjNo。因此代码应如下所示:

Me.Parent.[TotalValue] = DSum("EstValue", "Projects", "Projects.ProjNo = " & MFProjectsSubform.ProjNo) * 1000000