主题：如何实现打印张数控制，设置某列的值，根据该值打印标签数量

如何实现打印张数控制?

比如设置某列的值，根据该值打印标签数量。

比如订单表，设置一列为标签数量，然后打印时，根据这列的标签数量，打印相应的标签数量。

 呃，要打印的内容，循环n次不就行了？

 专业报表可以这样

Dim doc As New PrintDoc '定义一个报表
Dim rt As New prt.RenderText '定义一个文本对象
rt.Text = "Hello Foxtable" '设置文本对象的内容
doc.Body.Children.Add(rt) '将文本对象加入到报表
Doc.PageSetting.ToPageSettings.PrinterSettings.Copies = 2
Doc.Print

多谢，看到专业报表了。学习一下，有疑问再请教。

如果不是专业报表，不能实现吗？ 打印某一行记录时，定义其中一个单元格的数值为打印份数。

谢谢!

循环n次，如

for i as Integer = 1 to 3

    '打印代码

next

这个不是帮助文档公开的属性，要靠自己积累这些零星的东西。