怎么给控件MSFlexGrid和dbgrid控件的每行换一种颜色？

Question

我想给MSFlexGrid和DBgrid控件的每行记录背景色交替显示，怎么实现呢？

Answer 1

不常用這兩個控件
看能不能用action屬性先選中一行？

Answer 2

Dim i_col As Integer
  Dim c_col As Integer
  c_col = MSFlexGrid1.Col
  If c_col > 0 Then
     For i_col = 0 To MSFlexGrid1.Cols - 1 Step 2
         MSFlexGrid1.Col = i_col
         MSFlexGrid1.CellBackColor = &HFFFFC0
     Next i_col
     For i_col = 1 To MSFlexGrid1.Cols - 1 Step 2
         MSFlexGrid1.Col = i_col
         MSFlexGrid1.CellBackColor = &H8000000F
     Next i_col
     
     MSFlexGrid1.Col = c_col
  End If

Answer 3

我都想知道，我现在是用CellBackColor来做这种功能的，要是另外有好的方法，告诉我一声！