有什么控件可以在载入数据库数据时设置指定行的颜色？

Question

有什么控件可以在载入数据库数据时设置指定行的颜色？
MSHFlexGrid可以办到吗？我怎么找了半天没找的？有谁知道的麻烦回答下，谢谢了！

Answer 1

CellBackColor 和 CellForeColor 属性
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 
http://feiyun0112.cnblogs.com/

Answer 2

Private Sub set_row_color(ByRef objHMSFlexGrid As MSHFlexGrid, ByVal intRow As Long)
    Dim j As Integer
    
    With objHMSFlexGrid
        .Row = intRow
        For j = 1 To .Cols - 1
            .Col = j
            .CellBackColor = vbRed
        Next j
    End WithEnd Sub

Answer 3

Private Sub set_row_color(ByRef objMSHFlexGrid As MSHFlexGrid, ByVal lngRow As Long)
    Dim j As Integer
    
    With objHMSFlexGrid
        .Row = lngRow
        For j = 1 To .Cols - 1
            .Col = j
            .CellBackColor = vbRed
        Next j
    End WithEnd Sub

Answer 4

CellBackColor,可以設定某單獨儲存格,完全可以滿足你

Answer 5

谢谢各位，在看帖子前，我已经折腾出来了
Sub DrawLineColor(MSHFlexGrid1 As MSHFlexGrid, lngLine&, Optional ForeColor& = vbBlack, Optional BackColor& = &HC0C0C0)
    Dim i As Integer
    MSHFlexGrid1.Row = lngLine
    With MSHFlexGrid1
        For i = 1 To .Cols - 1
            .Col = i
            .CellForeColor = ForeColor
            .CellBackColor = BackColor
        Next
    End With
End Sub