我用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
代码如上
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
代码如上
解决方案 »
- 关于vb中的画图问题??
- 高手进来,请问使用Inet1.Execute如何发送ZIP压缩文件,并且接收保存??打算用ASP.net接收
- 做界面登陆的,就简简单单几行代码。错误显示在第一行:对象变量或with块变量未设置
- 有没有什么方法可以让commondialog(对话框)居中啊?
- 如何用vb调用word文件另存为web页?
- VARIENT类型在C++中是什么样的类型?
- 帮帮我```````
- 请问在添加 OCX 控件时,出现“未设置对象变量,或with block变量是怎么回事?
- 大问题:我的数据完了,如何恢复
- 如果要同时打开两个结果集占用内存太大,应该怎么样结决?
- 谁知道VB如何捕获IE页面的刷新事件呢?
- 在VB中怎么才能实现左边是treeview控件,点击相关项在右边显示对应的界面呀
我把这段代码放在form的load 事件中,就不行(用msflexgrid可以)
放在form的Resize事件中,居然就可以了。