报表打印
如何在报表中每隔N行显示一条粗线
2003-12-06 23:43:13

 

问题:  

  如何在报表中每隔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行显示一行粗线。

 

录入:changechange(CSDN)   责任编辑:cg1