Select Case e.DataCol.Name
Case "日期_录入"
If e.NewValue <> "" Then
e.DataRow("状态_商务通") = 1
Else
e.DataRow("状态_百度") = 0
End If
Case "日期_转正"
If e.NewValue <> "" Then
e.DataRow("状态_商务通") = 0
Else
e.DataRow("状态_百度") = 1
End If
Case "日期_离职"
If e.NewValue <> "" Then
e.DataRow("状态_商务通") = 0
Else
e.DataRow("状态_百度") = 1
End If
End Select
老师帮我看看代码哪里有问题