以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  首行，单元格，绘制？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=103472)
--  作者：yancheng
--  发布时间：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
--  发布时间：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

老师看一下，有没有需要调整的？
--  作者：有点甜
--  发布时间：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