不同的case不同的底色
Posted gaoleionline
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了不同的case不同的底色相关的知识,希望对你有一定的参考价值。
‘_row.DefaultCellStyle.BackColor = color_inCase ‘ 底色改为 淡红
‘ 上面以前,所有的case都是一种底色
‘ 下面现在,不同的case不同的底色(取决于其 case ID)
Dim idR As Integer = CInt(_caseID.Substring(3, 7)) * 25
Dim idG As Integer = CInt(_caseID.Substring(8, 2)) * 100 + CInt(_caseID.Substring(6, 4))
Dim idB As Integer = CInt(_caseID.Substring(7, 3)) * 10
idR = 255
idG = idG Mod 255
idB = idB Mod 255
‘ 上面以前,所有的case都是一种底色
‘ 下面现在,不同的case不同的底色(取决于其 case ID)
Dim idR As Integer = CInt(_caseID.Substring(3, 7)) * 25
Dim idG As Integer = CInt(_caseID.Substring(8, 2)) * 100 + CInt(_caseID.Substring(6, 4))
Dim idB As Integer = CInt(_caseID.Substring(7, 3)) * 10
idR = 255
idG = idG Mod 255
idB = idB Mod 255
Dim _color As Color = Color.FromArgb(idR, idG, idB)
_row.DefaultCellStyle.BackColor = _color ‘ 底色改为 这种颜色
_row.DefaultCellStyle.BackColor = _color ‘ 底色改为 这种颜色
以上是关于不同的case不同的底色的主要内容,如果未能解决你的问题,请参考以下文章
请问怎么设置Excel单元格底色,要每一行用不同的颜色区分开来
怎么设置Excel单元格底色,要每一行用不同的颜色区分开来?
简单几行代码设置UIcollectionView的section底色