簡単なことなのに、どうやったっけ？てなるメモ

レポートの指定行数おきに線ひいたり処理すること。

Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer)
    Me.line01.Visible = CurrentRecord Mod 5 = 0
End Sub