如何在Access报表中每隔N行显示一条粗线
网络整理 - 07-26
问题:
如何在报表中每隔N行显示一条粗线
如何为报表增加一个行号列?
回答:
1、在设计模式里打开该报表,在报表主体里面加一个TextBox,把Name属性改为InputID。
2、把InputID的控件来源(ControlSource)属性设置为=1;再把InputID的运行总和(RunningSum)属性改为“全部之上”(OverAll)。
注意:如果把这个控件显示给用户看,你将得到一个以1为步进自动增长的行号列
3、最后,在主体的格式化事件里输入如下代码:
以下为引用的内容:
PrivateSubDetail_Format(CancelAsInteger,FormatCountAsInteger)
If(Me![InputID]Mod5)=0Then
Me![Line19].BorderWidth=3 '分隔线的名称为Line19
Else
Me![Line19].BorderWidth=1
EndIf
EndSub
4、预览报表就可以看到报表上每隔5行显示一行粗线。