Foxtable(狐表)用户栏目专家坐堂 → 首行,单元格,绘制?


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

主题:首行,单元格,绘制?

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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
首行,单元格,绘制?  发帖心情 Post By:2017/7/9 17:16:00 [只看该作者]

DrawCell事件写入

If e.Col.Name ="余额" Then
    
    Select Case e.Row.
        Case "会计分录序时薄_table2"
            If  e.Table.Rows(0).IsNull("余额") = False Then
                e.Style= "余额"
            End If
    End Select
End If

余额列,我只绘制,第一行的,余额的单元格。怎么写?

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


加好友 发短信
等级:四尾狐 帖子:842 积分:5971 威望:0 精华:0 注册:2013/6/29 9:36:00
  发帖心情 Post By:2017/7/9 17:26:00 [只看该作者]

我现在这样写的,好像是行了。不过感觉有点慢,或者说不准确 ;要点一下表,它再刷新 一下,好像就对了。

If e.Row.IsNull("审核") = False AndAlso e.Row.IsGroup = False Then
    e.Style = "已审核"
End If

If e.Table.Current IsNot Nothing Then
    If e.Row.Index = e.Table.Current.Index Then
        e.Style = "当前行"
    End If
End If

If e.Col.Name ="余额" Then
    Select Case e.Row.Table.Name
        Case "会计分录序时薄_table2"
            If  e.Row.Index = 0 Then
                e.Style= "余额"
            End If
    End Select
End If

老师看一下,有没有需要调整的?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/9 18:17:00 [只看该作者]

基本正确

 

If e.Col.Name ="余额" Then
    Select Case e.Table.Name
        Case "会计分录序时薄_table2"
            If  e.Row.Index = 0 Then
                e.Style= "余额"
            End If
    End Select
End If

 回到顶部