c1truedbgrid两列单元格不能正常变色问题

如图，如果两列的单元格都变色，就不能正常变色了，怎么办？

不客气

Richard.Ma 发表于 2020-6-2 14:51
修改了你这边C1TrueDBGrid1_FetchCellStyle1方法里的代码，多加一个列判断即可

非常感谢！！

修改了你这边C1TrueDBGrid1_FetchCellStyle1方法里的代码，多加一个列判断即可

1.     Private Sub C1TrueDBGrid1_FetchCellStyle1(ByVal sender As Object, ByVal e As C1.Win.C1TrueDBGrid.FetchCellStyleEventArgs) Handles C1TrueDBGrid1.FetchCellStyle
   
2.         If e.Col.Equals(1) Then
   
3.             If (C1TrueDBGrid1.Columns("销售数量").CellValue(e.Row) < 2) Then
   
4.                 Dim fntFont As New Font(e.CellStyle.Font.Name, e.CellStyle.Font.Size, FontStyle.Bold)
   
5.                 e.CellStyle.Font = fntFont
   
6.                 e.CellStyle.BackColor = System.Drawing.Color.Red
   
7.             Else
   
8.                 e.CellStyle.BackColor = System.Drawing.Color.YellowGreen
   
9.             End If
   
10.         End If
    
11.         If e.Col.Equals(2) Then
    
12.             If (C1TrueDBGrid1.Columns("销售金额").CellValue(e.Row) < 100) Then
    
13.                 Dim fntFont As New Font(e.CellStyle.Font.Name, e.CellStyle.Font.Size, FontStyle.Bold)
    
14.                 e.CellStyle.Font = fntFont
    
15.                 e.CellStyle.BackColor = System.Drawing.Color.Red
    
16.             Else
    
17.                 e.CellStyle.BackColor = System.Drawing.Color.YellowGreen
    
18.             End If
    
19.         End If
    
20. 
    
21.     End Sub

复制代码