如何在Access報表中每隔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行顯示一行粗線。