主题：符合条件的列背景颜色如何用代码设置

 

列标题为2010-05-10 00:00:00格式

希望实现以下效果：如果此日期是星期日，那么用蓝颜色设置当前列内容的背景

老大请看这样写代码对吗，如果对，那么符合条件列的背景颜色如何用代码设置(*号部分)？

 

 

for each ca as col in CurrentTable.Cols
    if left(ca.caption,10).DayOfWeek=0 then
        *****************
    end if
next

此主题相关图片如下：snap1.jpg

 

 

报错，老大看一下哪错了。看提示6月3日没什么问题啊！

'窗口加载时的代码
DataTables("mail_table1").AddUserStyle("a", Color.blue, Color.yellow)

 

以下是窗口中table表的drawcell事件

'如果是数值型列，且不是分类码列
If e.Col.IsNumeric AndAlso e.Col.caption <> "分类码" AndAlso e.Col.caption <> "分类名称" Then
    If e.Row.IsNull(e.Col.Name) = False '且该列已经输入内容
dim ca as string
dim cb as integer
dim cc as date
ca=left(e.Row(e.Col.caption),10)
cc=ca
cb=cc.DayOfWeek
        If cb=0 Then '如果该列的值等于0
            e.Style = "a" '那么用"不及格"样式绘制单元格
        End If
    End If
End If

老大，帮帮忙吧，真没找出问题来呀

 

left(e.Row(e.Col.caption),10)

已经设置显示成“2010-06-03”样式了

显示的标题caption是2010-06-03  00:00:00，但是列名称name是"plannum_1"，"plannum_2"，"plannum_3"，这些都是交叉表生成的结果

麻烦老大给出答案好吗，实在是想不出来了

但是老大，我要求的是对列标题2010-06-03  00:00:00是否周日进行判断，而不是对列名称plannum_1进行判断，这个能实现吗？

真该打

 

怎么会犯这样的错误呢，真是一根筋啊