Foxtable(狐表)用户栏目专家坐堂 → 求助!SQL Table表列一为值1时字体颜色的设置?


  共有15212人关注过本帖树形打印复制链接

主题:求助!SQL Table表列一为值1时字体颜色的设置?

帅哥哟,离线,有人找我吗?
baoxyang
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3313 积分:23146 威望:0 精华:1 注册:2009/3/31 11:25:00
求助!SQL Table表列一为值1时字体颜色的设置?  发帖心情 Post By:2009/11/9 18:20:00 [显示全部帖子]

目的,判断为SQL Table(窗口中的表)某列值为“A”时字体颜色为白色,为“B”时字体颜色为红色。请问下代码应如何写?

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3313 积分:23146 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2009/11/9 21:35:00 [显示全部帖子]

在窗口AfterLoad事件中如下代码:

DataTables("车辆状态管理_Table1").Styles("空闲").ForeColor = Color.Green
DataTables("车辆状态管理_Table1").Styles("中转").ForeColor = Color.Blue
DataTables("车辆状态管理_Table1").Styles("配送").ForeColor = Color.plum
DataTables("车辆状态管理_Table1").Styles("维修").ForeColor = Color.Red
DataTables("车辆状态管理_Table1").Styles("预报空闲").ForeColor = Color.Orange
DataTables("车辆状态管理_Table1").Styles("已计划").ForeColor = Color.Aqua


DrawCell
事件中如下代码:
If e.Col.Name = "状态" Then
    If e.Row.IsNull("状态") = False
        If e.Row("状态") = "空闲" Then
            e.Style = "空闲"
        else If e.Row(e.Col.Name) = "中转" Then
            e.Style = "中转"
        else If e.Row(e.Col.Name) = "配送" Then
            e.Style = "配送"
        else If e.Row(e.Col.Name) = "维修" Then
            e.Style = "维修"
        else If e.Row(e.Col.Name) = "预报空闲" Then
            e.Style = "预报空闲"
        else If e.Row(e.Col.Name) = "已计划" Then
            e.Style = "已计划"
        End If
    End If
End If

请指点以上代码哪里有问题,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3313 积分:23146 威望:0 精华:1 注册:2009/3/31 11:25:00
  发帖心情 Post By:2009/11/10 8:42:00 [显示全部帖子]

同样是没有反映(不出效果),请老大帮看看是怎回事?


 回到顶部