以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  单列设置可显示数据标记,多列设置不体现?错哪?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=185030)

--  作者:阳光自我灿烂
--  发布时间:2023/1/31 16:25:00
--  单列设置可显示数据标记,多列设置不体现?错哪?
If e.Col.IsNumeric AndAlso e.Col.Name = "环境_温度" Then 
    If e.Row.IsNull(e.Col.Name) = False Then\'且该列已经输入内容
        If e.Row(e.Col.Name) < 19 Then \'如果该列的值小于19
            e.Style = "温低" \'那么用"温低"样式绘制单元格
        ElseIf e.Row(e.Col.Name) > 21 Then \'如果单元格的值大于21
            e.Style = "温高" \'那么用"温高"样式绘制单元格
        End If
    End If
    If e.Col.IsNumeric AndAlso e.Col.Name = "密度1_第一次_水槽水温" Then
        If e.Row.IsNull(e.Col.Name) = False Then
            If e.Row(e.Col.Name) < 19 Then 
                e.Style = "水温低" 
            ElseIf e.Row(e.Col.Name) > 21 Then 
                e.Style = "水温高"
            End If
        End If
    End If
End If

--  作者:有点蓝
--  发布时间:2023/1/31 16:27:00
--  
If e.Col.IsNumeric AndAlso e.Col.Name = "环境_温度" Then 
    If e.Row.IsNull(e.Col.Name) = False Then\'且该列已经输入内容
        If e.Row(e.Col.Name) < 19 Then \'如果该列的值小于19
            e.Style = "温低" \'那么用"温低"样式绘制单元格
        ElseIf e.Row(e.Col.Name) > 21 Then \'如果单元格的值大于21
            e.Style = "温高" \'那么用"温高"样式绘制单元格
        End If
    End If
End If
If e.Col.IsNumeric AndAlso e.Col.Name = "密度1_第一次_水槽水温" Then
    If e.Row.IsNull(e.Col.Name) = False Then
        If e.Row(e.Col.Name) < 19 Then 
            e.Style = "水温低" 
        ElseIf e.Row(e.Col.Name) > 21 Then 
            e.Style = "水温高"
        End If
    End If
End If

--  作者:阳光自我灿烂
--  发布时间:2023/1/31 16:31:00
--  
谢谢!!!
--  作者:阳光自我灿烂
--  发布时间:2023/1/31 17:03:00
--  
亲:有二次水槽水温,要求是一至的可以这么写吗?
 If e.Col.IsNumeric AndAlso e.Col.Name = "密度1_第一次_水槽水温" "密度1_第二次_水槽水温"Then

--  作者:有点蓝
--  发布时间:2023/1/31 17:06:00
--  
参考:http://www.foxtable.com/webhelp/topics/0625.htm

Select Case e.DataCol.Name
    Case
 "A列","B列","C列"
        
\'代码四
    
Case "E列""F列"
        
\'代码五

End Select