使用MshFlexGrid的问题

Property CellBackColor As OLE_COLOR
    Member of MSHierarchicalFlexGridLib.MSHFlexGrid
    Returns or sets the background color of individual cells or ranges of cells.

解决方案 »

  1.   

    Private Sub Form_Load()
    Dim i As Integer
    For i = 1 To Me.MSHFlexGrid1.Rows - 1
        Me.MSHFlexGrid1.Col = 2
        Me.MSHFlexGrid1.Row = i
        MSHFlexGrid1.CellBackColor = vbRed
    Next iFor i = 1 To Me.MSHFlexGrid1.Cols - 1
        Me.MSHFlexGrid1.Row = 1
        Me.MSHFlexGrid1.Col = i
        MSHFlexGrid1.CellBackColor = vbRed
    Next iEnd Sub
      

  2.   

    for i=1 to 5
      with mshflexgrid1
      .row=i
      .selectionmode=1
        .heightbright=2
    .focusrect=0
    .forcolor=rgb(0,0,255)
    endifnext