主题：[求助]

将DrawCell事件的代码设为：

'如果是数值型列，且不是总分列
If e.Col.IsNumeric AndAlso e.Col.Name <> "总分" Then
    If e.Row.IsNull(e.Col.Name) = False '且该列已经输入内容
        If e.Row(e.Col.Name) < 60 Then '如果该列的值小于60
            e.Style = "不及格" '那么用"不及格"样式绘制单元格
        End If
    End If
End If

3、在计划管理(位于数据库功能区)中增加一个计划，时间间隔设为1000，代码设为

With DataTables("成绩表").Styles("不及格")
    If .BackColor = Color.Red Then
        .BackColor = Color.White
    Else
        .BackColor = Color.Red
    End If
End With

请问：如果不是数值列可以吗，例如等于张三，代码有是怎样的，谢谢

拜托老师，将上面代码修改后完整的发过来好吗，谢谢

你要做什么，请完整表述一下

我要做的是：在一个表里把是“张三”的单元格，用"特定"样式绘制出单元格，并且不停的闪烁，谢谢

将DrawCell事件的代码设为： '如果是数值型列，且不是总分列 If e.Col.IsNumeric AndAlso e.Col.Name <> "总分" Then If e.Row.IsNull(e.Col.Name) = False '且该列已经输入内容 If e.Row(e.Col.Name) < 60 Then '如果该列的值小于60 e.Style = "不及格" '那么用"不及格"样式绘制单元格 End If End If End If 3、在计划管理(位于数据库功能区)中增加一个计划，时间间隔设为1000，代码设为 With DataTables("成绩表").Styles("不及格") If .BackColor = Color.Red Then .BackColor = Color.White Else .BackColor = Color.Red End If End With 我要做的是：在一个表里把是“张三”的单元格，用"特定"样式绘制出单元格，并且不停的闪烁，谢谢

一样的啊：

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目7.table

第一个问题：

If e.Row(e.Col.Name) = "张三" Then，这里的“张三”如果改为空白单元格，怎样写

第二个问题：查询表里的数据能不能自动更新，不需要点"同步所有表",如何设置

If e.Row(e.Col.Name) = "张三" Then
 
改为
 
If e.Row.Isnull(e.Col.Name)  Then

 

可以做个计划，定期同步。

代码怎么写，老师