以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教，单元格数据发生变化时的如何改变字体颜色？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=6803)
--  作者：baoxyang
--  发布时间：2010/4/27 8:57:00
--  请教，单元格数据发生变化时的如何改变字体颜色？
如题。
--  作者：狐狸爸爸
--  发布时间：2010/4/27 10:29:00
--  
DrawCell
--  作者：baoxyang
--  发布时间：2010/4/27 10:55:00
--  
以下是引用狐狸爸爸在2010-4-27 10:29:00的发言：
DrawCell

可能我没说清楚，当一个表中某列值改变时：
DataColChanging事件触发：

 If e.DataCol.Name = "驶入" Then
    If e.DataRow("驶入") <> e.NewValue Then 
       不知如何写代码，来改变当前列的字体颜色。
    End If
End If

或者DrawCell
If e.Col.Name = "驶入" then
   If 原值<> 新值 Then \'这段代码不知如何写？
      e.Style = "b"
   End If
End If

或者两事件结合起来实现，不知如何实现？有无好的办法实现？谢谢！！

[此贴子已经被作者于2010-4-27 11:07:50编辑过]
--  作者：程兴刚
--  发布时间：2010/4/27 11:28:00
--  
以下是引用baoxyang在2010-4-27 10:55:00的发言：

可能我没说清楚，当一个表中某列值改变时：
DataColChanging事件触发：

 If e.DataCol.Name = "驶入" Then
    If e.DataRow("驶入") <> e.NewValue Then 
       不知如何写代码，来改变当前列的字体颜色。
    End If
End If

或者DrawCell
If e.Col.Name = "驶入" then
   If 原值<> 新值 Then \'这段代码不知如何写？
      e.Style = "b"
   End If
End If

或者两事件结合起来实现，不知如何实现？有无好的办法实现？谢谢！！

[此贴子已经被作者于2010-4-27 11:07:50编辑过]


      系统包内不是有示例文件吗？
--  作者：狐狸爸爸
--  发布时间：2010/4/27 12:20:00
--  
菜单中不是有一个标记功能吗？
能够自动标出变动的数据，无需编写代码的
--  作者：baoxyang
--  发布时间：2010/4/27 15:09:00
--  
谢了，试试看！