主题：[求助]工资标准调用，以及查看工资标准问题

呵呵,xyt是不是传错文件了，你的文件没有代码啊。

1、第一文件，将工资计算表的DataColChanged事件代码设置为：

Select Case e.DataCol.name
    Case "工厂","工段","日期"
        Dim dr As DataRow = e.DataRow
        If dr.IsNull("工厂") = False AndAlso dr.IsNull("工段") = False AndAlso dr.IsNull("日期") =False Then
            Dim pr As DataRow = DataTables("工资标准").Find("分厂 = '" & dr("工厂") & "' and 工段  = '" & dr("工段") & "' And 执行日期 <= #" & dr("日期") & "#", "执行日期 Desc")
            If pr IsNot Nothing Then
                dr("工资标准")  = pr("工资标准")    
            End If
        End If
End Select

2、第二个问题，确实不好办，要查询历史数据，就必须记录历史数据，但是你这里没有记录。一个员工，可以不同时期在不同的岗位。