- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何绘制整行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95894)
-- 发布时间：2017/2/8 9:48:00
-- 如何绘制整行
DrawCell 我目前设置条件显示的是一个单元格，我想符合条件的整行都显示出来
-- 发布时间：2017/2/8 10:20:00
--
把 If e.Col = "第一列" Then 这样的条件去掉
-- 发布时间：2017/2/8 10:21:00
--
我用了一个蠢方法：集合
直接在到期提醒的例子上改了
原代码：
If e.col.Name =
"到期日期"
Then
If e.Row.IsNull("到期日期") = False
If e.Row("到期日期") < Date.Today.AddDays(10) Then
e.Style = "到期"
End If
End If
End If
If e.Row.IsNull("到期日期") = False
If e.Row("到期日期") < Date.Today.AddDays(10) Then
e.Style = "到期"
End If
End If
End If
修改后的：
把第一行代码改为：
Select Case e.Col.Name
Case "第一列","第二列","第三列","第五列"
最后一个end if 改为 end select
更新：
此方法果然很蠢，请参照版主的方法，把第一行代码去掉就行了，已测试。
[此贴子已经被作者于2017/2/8 10:24:42编辑过]
-- 发布时间：2017/2/8 10:24:00
--
无地自容……
费死脑子改了代码，原来去掉就行了
-- 发布时间：2017/2/8 10:28:00
--
你这样写也对。可以区别某几列绘制。