需求:加班工时=卡一+卡二都以超过15分钟(-00:15或00:15),以15分钟为单位或说每15分钟计算,
If e.DataCol.Name = "卡一" Then '如果
':
If e.NewValue Is Nothing Then
e.DataRow("加班工时") = Nothing
'
ElseIf e.NewValue > 00:15 Then
e.DataRow("加班工时") = 00:15 / 60
ElseIf e.NewValue > -00:15 Then
e.DataRow("加班工时") = 00:15 / 60
Else
e.DataRow("加班工时") = 0
End If
End If
If e.DataCol.Name = "卡二" Then '如果
':
If e.NewValue Is Nothing Then
e.DataRow("加班工时") = Nothing
'
ElseIf e.NewValue > 00:15 Then
e.DataRow("加班工时") = 00:15 / 60
ElseIf e.NewValue > -00:15 Then
e.DataRow("加班工时") = 00:15 / 60
Else
e.DataRow("加班工时") = 0
End If
End If
e.DataRow("加班工时") = "卡一" + "卡二"
请老师,帮助纠正,谢谢