flexgrid的背景色问题
请问大家
如何让msflexgrid 的背景色可以隔一行换一种颜色
换句话说
就是
1,3,5。。。是绿色的
2,4,6。。。。是白色的
mshflexgrid好像可以的
不知道msflexgrid 如何实现
问题点数:20、回复次数:4Top
1 楼tztz520(午夜逛街)回复于 2004-09-03 11:55:28 得分 5
不行.要自己一行一行填上去.Top
2 楼1v1chen()回复于 2004-09-03 12:50:20 得分 0
再顶
Top
3 楼rosyou(残域)回复于 2004-09-03 13:13:28 得分 15
'///////////
Private Sub Form_Load()
dim cl as integer
with msflexgrid
For cl = 1 To .cols-1
.Row = 3
.CellBackColor = &h00ffff
Next
End With
end sub
Top
4 楼1v1chen()回复于 2004-09-03 13:27:12 得分 0
For i = 1 To Rs.RecordCount
For j = 1 To flexyz.Cols - 1
flexyz.Row = i '选择第I行
flexyz.Col = j
If i / 2 = Int(i / 2) Then '判断是单是双
flexyz.CellBackColor = RGB(224, 248, 224) '双行的底色
Else
flexyz.CellBackColor = RGB(240, 248, 224) '单行的底色
End If
Next j
Next i
错在哪里了
怎么显示不出来?Top




