以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  当行数是5的位数时,格式为网格线  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89891)

--  作者:kaituozhe
--  发布时间:2016/8/31 18:34:00
--  当行数是5的位数时,格式为网格线

当行数是5的位数时,格式为网格线,黄色的代码怎么修改?

If e.Row("摘要") = "本月合计" Then
    e.Style = "本月合计"
ElseIf e.Row("_Identify") Mod 5 = 0 Then
    e.Style = "风格线"
End If


--  作者:kaituozhe
--  发布时间:2016/8/31 18:37:00
--  

可以了

 


--  作者:程兴刚
--  发布时间:2016/9/1 7:28:00
--  
以下是引用kaituozhe在2016/8/31 18:37:00的发言:

可以了

 

删除再添加、或插入行试试!
--  作者:kaituozhe
--  发布时间:2016/9/1 7:57:00
--  

有改进的办法吗?


--  作者:有点蓝
--  发布时间:2016/9/1 9:02:00
--  
If e.Row("摘要") = "本月合计" Then
    e.Style = "本月合计"
End If
If e.Row("_Identify") Mod 5 = 0 Then
    e.Style = "风格线"
End If