Dim fdr As DataRow = DataTables("车队管理").Find("[姓名] = '" & e.DataRow("姓名") & "' and 月份= '" & e.DataRow("月份") & "'")
If fdr IsNot Nothing Then
e.DataRow("兑现奖励") = iif(fdr("兑现奖励") = true, 0, 100)
End If