いつもお世話になっております。
現在帳票出力のコーディングをしております。
帳票は８レコードで一枚で、
８レコード以下になると、罫線が印刷されないため、
ブランクのデータを作ることで対応しようと思っています。
そこでブランクを入れる処理についてなのですが、
データ件数が８の倍数まで処理をつづけたいのですが
どのように記述すればいいか思案に苦しんでおります。
Do Until KANRI_TANA_KENSU = 8 Or 16 Or 24 Or 32 Or 40 Or 48 Or 56 Or 64 Or 72
RS_BLANK.AddNew
RS_BLANK!区分 = "BLANK"
RS_BLANK.Update
Loop
とりあえず、一つのグループに３０件以上はないので数値を固定化させたのですが
勿論これではダメだというのは理解しているのですが。。。
イメージとしては
件数カウントしている数値を８で割り、その答えが
８の倍数でない場合は小数点が出ると思います。
要するに、整数というか小数点が出なくなるまで加算させるという条件が
できればいいのかなと思っているのですが
それをコーディングにするにはどうすれば。。。と思っている次第です。
他の方法でも結構ですので何か案が御座いましたら
ご教示いただけませんでしょうか。
