If e.Col.Name = "津贴比例" Then If e.Row.IsNull(e.Col.Name) = False '且该列已经输入内容 Dim v As Double = e.Row("津贴比例") Select Case e.Row("车间") Case "一车间","二车间","三车间","四车间","五车间","六车间" If v < 14 Then e.Style = "比例偏低" ElseIf v > 16 Then e.Style = "比例偏高" End If Case "七车间","八车间" If v < 39 Then e.Style = "比例偏低" ElseIf v > 41 Then e.Style = "比例偏高" End If End Select End If End If