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


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

主题:求助!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”时字体颜色为红色。请问下代码应如何写?

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2009/11/9 19:06:00 [只看该作者]

帮助中的DrawCell 不知道对窗口中的table有没有效果,反正我没有试过。  你可以试一试呀~


 回到顶部
帅哥哟,离线,有人找我吗?
baoxyang
  3楼 | 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

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

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2009/11/10 0:18:00 [只看该作者]

好象只需这样就可以吧?

If e.Col.Name = "状态" Then
    If e.Row.IsNull("状态") = False
        e.Style = e.Row(e.Col.Name)
    End If
End If

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


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

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


 回到顶部