office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access报表每隔多条记录添加一行空白行

2020-03-17 08:00:00
tmtony8
原创
7110

在数据报表中,如果记录太多,可能不便于阅读和查找数据。

如果在主体中,每几条记录插入一个空白行,这样看起来就会舒服很多

在“主体”节中放置一个空白未绑定 的文本框(txtS)和一个“=1”的文本框(txtC)。


在主体的格式化事件中添加以下代码。这样可以控制主体数据每个5条打印出一个空白行

Private Sub Detail1_Format(Cancel As Integer, FormatCount As Integer)
  If Me.txtCounter.Value Mod 5 = 0 Then
    Me.txtSpacer.Value = Space$(1)
  Else
    Me.txtSpacer.Value = Null
  End If
End Sub

运行效果如图:


当文本框控件(txtS)为空时,主体节会根据需求进行缩小,文本框(txtC)可以放在报表的“主体”中的任意位置,将文本框(txtS)的值设置为希望空白行在打印输出时所具有的高度。

    分享