水晶报表分页并自动插入空白行

以下文字来源于http://blog.csdn.net/landlordh/archive/2005/02/05/281590.aspx
适用于明细类报表最后一页补齐的情况

在论坛上经常会看到水晶报表分页的问题,这个很好解决。
但是自动插入空白行的问题却一直没有很好的答案,
经过研究找到一个变通的办法来实现了.

在详细资料上点格式化节,在后面页新建页打勾
公式中输入:
if onlastrecord then
   formula = false
else
   if RecordNumber mod 5 =0 then
      formula =true
   else
      formula =false
   end if
end if
'(BASIC 语法)
---------------------------------------------------------------------

最后页不足,用空行填充:
新增一个空白详细资料行,格式化此节,在抑制显示(无深化)打勾
公式中输入:
if not onlastrecord  then
    FORMULA = TRUE
else
   if (RecordNumber mod 5 <= 1) then  '第一个
       FORMULA = TRUE  
   else
       FORMULA = FALSE 
   end if
end if
'(BASIC 语法)

...接着第二个:

公式中输入:
if not onlastrecord  then
    FORMULA = TRUE
else
   if (RecordNumber mod 5 <= 2) then  '第二个
       FORMULA = TRUE  
   else
       FORMULA = FALSE 
   end if
end if

...

(注:此方法适用于行数较少,不过不觉得麻烦,对行数较多也可以用)
----------------------------------------------------------------------

你可能感兴趣的:(分页)