如何在Access报表中每隔N行显示一条粗线

如何在Aclearcase/" target="_blank" >ccess报表中每隔N行显示一条粗线


 

问题：

如何在报表中每隔N行显示一条粗线
如何为报表增加一个行号列？
 




回答：


    1、在设计模式里打开该报表，在报表主体里面加一个TextBox，把Name属性改为InputID。
    2、把InputID的控件来源（ControlSource）属性设置为=1；再把InputID的运行总和（RunningSum）属性改为“全部之上”（Over All）。
    注意：如果把这个控件显示给用户看，你将得到一个以1为步进自动增长的行号列
    3、最后，在主体的格式化事件里输入如下代码：
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    If (Me![InputID] Mod 5) = 0 Then
        Me![Line19].BorderWidth = 3  @#分隔线的名称为Line19
    Else
        Me![Line19].BorderWidth = 1
    End If
End Sub
    4、预览报表就可以看到报表上每隔5行显示一行粗线。

原文转自：http://www.ltesting.net