1. 程式人生 > >如何在Access報表中每隔N行顯示一條粗線

如何在Access報表中每隔N行顯示一條粗線

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