Foxtable(狐表)用户栏目专家坐堂 → 如何让满足条件的行变成特定的颜色啊?


  共有4289人关注过本帖树形打印复制链接

主题:如何让满足条件的行变成特定的颜色啊?

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 15:25:00 [显示全部帖子]

代码

 
Dim n As Integer = 6 '未来天数,含今天,所以实际是未来7天

Dim dt As Date = e.Row("出生日期")
Dim dt1 As New Date(Date.Today.Year,dt.Month,dt.Day)
Dim dt2 As  New Date(Date.Today.AddDays(n).Year,dt.Month,dt.Day)
If (dt1 >= Date.Today AndAlso dt1 < Date.Today.AddDays(n)) OrElse (dt2 >= Date.Today AndAlso dt2 < Date.Today.AddDays(n)) Then
    e.style = "生日样式"
End If

[此贴子已经被作者于2014-6-29 15:27:48编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 15:45:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 16:21:00 [显示全部帖子]

 呃,请看2楼的代码。

 

 简单一些,是这样

 

 If e.Row("总分") < 360 Then
    e.Style = "不及格"

 End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 17:22:00 [显示全部帖子]

Dim n As Integer = 6 '未来天数,含今天,所以实际是未来7天

Dim dt As Date = e.Row("出生日期")
Dim dt1 As New Date(Date.Today.Year,dt.Month,dt.Day)
Dim dt2 As  New Date(Date.Today.AddDays(n).Year,dt.Month,dt.Day)
If dt = dt1 Then
    e.style = "今天生日"
Else If (dt1 >= Date.Today AndAlso dt1 < Date.Today.AddDays(n)) OrElse (dt2 >= Date.Today AndAlso dt2 < Date.Today.AddDays(n)) Then
    e.style = "生日将至"
End If

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 17:27:00 [显示全部帖子]

代码看10楼。

 

drawcell的意思是,判断每一个单元格,如果满足条件,就设置成对应的样式,因为一行的每一个单元格都满足这个条件,自然每个单元格的样式都是一样的......


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/29 17:35:00 [显示全部帖子]

以下是引用洗衣粉在2014-6-29 17:34:00的发言:
是把所有的都改成这样吗?

 

什么意思?代码在10楼。


 回到顶部