以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  满足条件，就执行样式  (http://foxtable.com/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