以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  满足条件,就执行样式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88772)

--  作者:zhangning
--  发布时间:2016/8/9 11:57:00
--  满足条件,就执行样式
预先设置好了一种样式,比如是“样式1”,如何让某个日期是周六或周日的时候,整行就执行“样式1”

请问老师,如何能达到这种效果呢?

--  作者:njcyt
--  发布时间:2016/8/9 12:18:00
--  
加一列逻辑列休息日,If e.Row("休息日") = True Then
    e.Style = "样式1"


--  作者:大红袍
--  发布时间:2016/8/9 12:19:00
--  

If e.Row.IsNull("日期") = False Then
   
    Dim d As Date = e.Row("日期")
   
    If d.DayOfWeek = 0 OrElse d.DayOfWeek = 6 Then
        e.style = "样式1"
    End If
   
End If