Access 中需要的 DSum 对象
DSum Object Required in Access
我在 Access 2010 中有一个子表单,其中列出了与项目不同部分相关的成本。在另一页上,我有一个 TotalValue
字段,它获取每个项目的成本总和,并将其乘以 1,000,000。最初,我只有 Parent.[TotalValue] = Me.Est_Value.Value * 1000000
,但这并没有计算成本。所以我尝试添加一个 DSum
,但它在 DSum
行给出了运行时错误 424: Object Required
。
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
我不太确定它有什么问题,所以我将不胜感激。
我真的没有这方面的任何工作示例。但基于我在这里阅读的内容: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
我在 Access 2010 中有一个子表单,其中列出了与项目不同部分相关的成本。在另一页上,我有一个 TotalValue
字段,它获取每个项目的成本总和,并将其乘以 1,000,000。最初,我只有 Parent.[TotalValue] = Me.Est_Value.Value * 1000000
,但这并没有计算成本。所以我尝试添加一个 DSum
,但它在 DSum
行给出了运行时错误 424: Object Required
。
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
我不太确定它有什么问题,所以我将不胜感激。
我真的没有这方面的任何工作示例。但基于我在这里阅读的内容: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