一逻辑列为真,其他逻辑列必须为假,不然数值列一修改,逻辑值就矛盾了。
If e.DataCol.Name = "第一列" Then
If e.DataRow.IsNull("第一列") = False Then
If e.DataRow(e.DataCol) >= - 1 AndAlso e.DataRow(e.DataCol) <= 1 Then
e.DataRow("第二列") = True
e.DataRow("第三列") = False
e.DataRow("第四列") = False
ElseIf (e.DataRow(e.DataCol) > 1 AndAlso e.DataRow(e.DataCol) <= 2) OrElse (e.DataRow(e.DataCol) >= - 2 AndAlso e.DataRow(e.DataCol) < - 1) Then
e.DataRow("第二列") = False
e.DataRow("第三列") = True
e.DataRow("第四列") = False
ElseIf e.DataRow(e.DataCol) > 2 OrElse e.DataRow(e.DataCol) < - 2 Then
e.DataRow("第二列") = False
e.DataRow("第三列") = False
e.DataRow("第四列") = True
End If
End If
End If