为表格设置不同背景色

来源:百度文库 编辑:神马文学网 时间:2024/04/29 09:40:19
 Private Sub Form_Load()
    With MSHFlexGrid1
    .BackColor = &HC0FFFF
       .AllowBigSelection = True
    .ColWidth(0) = 300
    For r = 1 To .Rows - 1 Step 2
        .Row = r
        For c = 1 To .Cols - 1
          .Col = c
          .CellBackColor = &HC0E0FF       '设置奇数行的背景色为"浅绿色"
        Next c
    Next r
  End With
 End Sub      注意:表大了会很慢