inputbox控制列印份数可资料

Dannyclock

各位大大,我想设计一个箱唛的列印,大部份资料都从资料库拿到,但有一难题,我增加了一个inputbox去输入箱数,如果输入是3,就列印3份,而且希望加上流水号1/3,2/3,3/3的号码在每一份,如果输入的是2,那就列印两份,每一份再加上1/2,2/2,
Dim inCount As Integer
On Error Resume Next
inCount = InputBox("Please input pallet quantity")
Me![QTY] = inCount
DoCmd.OpenReport "testing", acViewReport
Reports("testing").Printer.Copies = inCount
End Sub


我现在只能控制列印份数,但控制不到份数流水号,要怎样才可做才可以实现?

tmtony

份数的流水号是什么，是指印在报表上的 顺序号，或像页码那样？

tmtony

如果是这个，建立 先用代码将数据 先写到一个临时表，3 份就写3条数据，但顺序号不同
然后报表绑定这个临时表就可以了

Dannyclock

对,报表上基本资料其实只是一笔记录,但是想列印3份,而第一张左下角呈现1/3,第二张是2/3.....

临时表到现在都是不懂,语法要怎样写?

roych

tmtony 发表于 2016-5-11 22:24
如果是这个，建立 先用代码将数据 先写到一个临时表，3 份就写3条数据，但顺序号不同
然后报表绑定这个临 ...

站长想复杂了。其实多年前轻风就发过这个类型的帖子了。
楼主，没时间解释了，看帖：
http://www.office-cn.net/thread-98141-1-1.html