Foxtable(狐表)用户栏目专家坐堂 → DrawCell无法自动执行


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

主题:DrawCell无法自动执行

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


加好友 发短信
等级:二尾狐 帖子:586 积分:5685 威望:0 精华:0 注册:2014/5/21 10:30:00
DrawCell无法自动执行  发帖心情 Post By:2014/10/30 10:37:00 [显示全部帖子]

如题,DrawCell事件设置了样式,但是每次都必须手动确定一下自定义样式,才能执行,不知为啥


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


加好友 发短信
等级:二尾狐 帖子:586 积分:5685 威望:0 精华:0 注册:2014/5/21 10:30:00
  发帖心情 Post By:2014/10/30 11:51:00 [显示全部帖子]

If e.Col.Name = "工程名称" Then '如果正在绘制的是密码列
    If e.Row("归档")=True
        'e.Text = "【归档】" & e.Row("工程名称")
        e.Style="归档"
    End If
End If
If e.Col.Name = "投标情况" Then
    If e.Row("投标情况") = "参投" Then
        e.Style = "参投"
    End If
    If e.Row("投标情况") = "待定" Then
        e.Style = "待定"
    End If
End If
If e.Col.Name = "实际定标时间" Then
    If e.Row("实际定标时间") < Date.Today And e.Row("实际定标时间") > #0:00:00# Then
        e.Style = "完成"
    End If
End If
If e.Col.Name = "发布网站" Then
    Select Case e.Row("发布网站")
        Case "深圳建设交易"
            e.style =  e.Row("发布网站")
        Case "龙岗建设交易"
            e.style =  e.Row("发布网站")
        Case "宝安建设交易"
            e.style =  e.Row("发布网站")
        Case "宝安街道办"
            e.style =  e.Row("发布网站")
    End Select
End If

 回到顶部