1、项目事件MainTableChanged加上代码：

Select Case e.DataCol.Name
    Case "姓名"
        Dim dt_jiaban As DataTable = DataTables("加班人员表")
        Dim dt_jishu As DataTable = DataTables("加班计费基数")
        Dim dr_jiaban As DataRow = dt_jiaban.Find("加班人员 = \'" & e.NewValue & "\'" )
        If dr_jiaban IsNot Nothing Then
            Dim dr_jishu As DataRow = dt_jishu.Find("职务 = \'" & dr_jiaban("职务") & "\'")
            e.DataRow("工作日加班_小时") = dt_jiaban.Compute("Sum(加班时长)", "加班人员 = \'" & e.NewValue & "\' And 加班类型 = \'工作日\'") / 3600
            e.DataRow("工作日加班_金额") = e.DataRow("工作日加班_小时") * dr_jishu("工作日")
            e.DataRow("周末加班_小时") = dt_jiaban.Compute("Sum(加班时长)", "加班人员 = \'" & e.NewValue & "\' And 加班类型 = \'周末\'") / 3600
            e.DataRow("周末加班_金额") = e.DataRow("周末加班_小时") * dr_jishu("周末")
            e.DataRow("法定节假日加班_小时") = dt_jiaban.Compute("Sum(加班时长)", "加班人员 = \'" & e.NewValue & "\' And 加班类型 = \'法定节假日\'") / 3600
            e.DataRow("法定节假日加班_金额") = e.DataRow("法定节假日加班_小时") * dr_jishu("法定节假日")          
        End If
End Select

2、除以3600，就是你要的小时数。

3、看看如何打印关联表：

http://www.foxtable.com/help/topics/0204.htm

2、在“加班统计”代码除以3600，是可以得到我想要的小时数（例如2小时），但点打印到模板上的时候它显示的却是7200，

3、看了如何打印关联表，得到了我想要的打印效果，但还是有以下的问题（插不了图片，我添加到附件了）