主题：[求助]怎样把同一人同一月的数据生成到发放记录表中？

如题，怎么把人员表中的张三2009年5月工资汇总生成到第二个表中？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

以下是引用听雪落的声音在2009-5-31 10:38:00的发言：

如题，怎么把人员表中的张三2009年5月工资汇总生成到第二个表中？

下载信息  [文件大小：396.0 KB  下载次数：1]

点击浏览该文件:管理项目1.table

最简单办法做个关联,将姓名和性别关联起来,将发放记录的工资列改成表达式列.将表达式写成"Sum(Child(工资).工资)",就可以了.
  然后,写上姓名和性别,工资列自然会汇总.

  老六说的,能用表达式解决的,千万不要用代码解决.看附件:

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:工资汇总.table

以下是引用yangming在2009-5-31 11:55:00的发言：

下载信息  [文件大小：396.0 KB  下载次数：10]

点击浏览该文件:把同一人同一月的数据生成到发放记录.table

加了一个月份列

[此贴子已经被作者于2009-5-31 11:55:06编辑过]

可以不加月份列吗？另外年份不能区别

将发放记录表的发放日期改成日期型。
发放记录表，DataColChanged事件代码。

Dim dr As DataRow =e.DataRow
if e.DataCol.Name ="发放日期" Then
    if dr.IsNull("发放日期") Then
        dr("工资") = Nothing
    Else
        Dim d As Date = dr("发放日期")
        Dim Month As Integer = d.Month
        Dim Year As Integer = d.Year
        Dim StartDate As Date = New Date(Year,Month,1)
        Dim EndDate As Date = New Date(Year,Month,Date.DaysInMonth(Year,Month))
        dr("工资") = DataTables("人员表").Compute("sum(工资)", "[姓名] = '" & dr("姓名") & "' And [开始时间] >= #" & StartDate & "# And [开始时间] <= #" & EndDate & "#")
    End If
End If