水晶报表分页的问题

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

'分页
在详细资料上点格式化节，在后面页新建页打勾
公式中输入：
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  '第一个,1
       FORMULA = TRUE  
   else
       FORMULA = FALSE 
   end if
end if
'(BASIC 语法)

...接着第二个[ 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ]：

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

...接着第三个[ 新增一个空白详细资料行，格式化此节，在抑制显示(无深化)打勾 ]：

公式中输入：
if not onlastrecord  then
    FORMULA = TRUE
else
   if (RecordNumber mod 5 <= 3) then  '第三个,3
       FORMULA = TRUE  
   else
       FORMULA = FALSE 
   end if
end if

...(同理第四个，即最后5-1个)