如何只打印序号的偶数行?
Dim doc As New PrintDocDim rt As New prt.RenderTextrt.DataBinding.DataSource = BindTables("订单") '将rt绑定到订单表rt.Text= "[Fields!序号.Value]" '设置打印字段doc.body.Children.Add(rt)doc.Preview()