以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  窗口报表打印  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=103116)

--  作者:sysckj
--  发布时间:2017/6/30 18:07:00
--  窗口报表打印

根据客户要求,进行标签套打,我把客户的标签打描成图像,在窗口("标签")中做为背景,插入相应表(A)的字段,预览成功!

 

 

现在我新建一个窗口("查询"),添加一个TABLE控件,连接上SQL查询表,添加打印按钮,针对这个表(A)查询出符合条件的若干条记录,点击打印,就调用标签套打格式(”标签"),打印出所有记录的标签,应该要如何遍历SQL查询表的记录,如何针对每条记录调用套打窗口?

[此贴子已经被作者于2017/6/30 18:10:06编辑过]

--  作者:有点甜
--  发布时间:2017/6/30 18:21:00
--  

 循环每一行,然后打印,如代码

 

For Each r As Row In Tables("表A").rows
    r.Table.Position = r.Index
    Dim doc As PrintDoc = e.Form.GernatePrintDoc()
    doc.Preview()
Next