以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 最大值 最小值,自定义表格式样式 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=151114) |
-- 作者:天宇科技 -- 发布时间:2020/6/15 16:17:00 -- 最大值 最小值,自定义表格式样式 我想在评委1-评委7的评分中,在每行中找到最大值和最小值,分别用自定义样式 e.Style = "最大值" ,e.Style = "最小值",显示出来,请问应该怎样弄 If e.Col.Name.Contains("评委") Then Dim min As Double = 99999 Dim max As Double For Each dc As Col In e.Table.Cols If dc.Name.Contains("评委") Then If e.Row(dc.Name) > max Then e.Style = "最大值" If e.Row(dc.Name) < min Then e.Style = "最小值" End If End If End If Next End If
|
-- 作者:天宇科技 -- 发布时间:2020/6/15 19:36:00 -- 蓝版,能回复下吗 |
-- 作者:有点蓝 -- 发布时间:2020/6/15 20:17:00 -- 不是已经有最大值和最小值列了吗?直接判断不就行了 If e.Col.Name.Contains("评委") Then If e.Row(e.Col.Name) = e.Row(“最大值”)Then e.Style = "最大值" End If If e.Row(e.Col.Name) = e.Row(“最小值”)Then e.Style = "最小值" End If End If |