mshflexgrid行颜色显示有关问题
mshflexgrid行颜色显示问题
我用msflexgrid做,实现了背景按行双色显示,为什么改成mshflexgrid后同样的程序就不能用呢?
With MSFData
If .Rows > 1 Then
For i = 1 To .Rows - 1
.Row = i
.Col = .FixedCols
.ColSel = .Cols - 1
If (i mod 2) Then '判断是单是双
.CellBackColor = RGB(224, 231, 224) '双行的底色
Else
.CellBackColor = RGB(240, 248, 224) '单行的底色
End If
Next i
.FillStyle = flexFillSingle
End If
End With
代码如上
------解决方案--------------------
哪部出现错误了?楼主断电查询一下
------解决方案--------------------
帮你试了没有问题,删了重新建一个工程
我用msflexgrid做,实现了背景按行双色显示,为什么改成mshflexgrid后同样的程序就不能用呢?
With MSFData
If .Rows > 1 Then
For i = 1 To .Rows - 1
.Row = i
.Col = .FixedCols
.ColSel = .Cols - 1
If (i mod 2) Then '判断是单是双
.CellBackColor = RGB(224, 231, 224) '双行的底色
Else
.CellBackColor = RGB(240, 248, 224) '单行的底色
End If
Next i
.FillStyle = flexFillSingle
End If
End With
代码如上
------解决方案--------------------
哪部出现错误了?楼主断电查询一下
------解决方案--------------------
帮你试了没有问题,删了重新建一个工程