主题：[求助]这种收据打印功能怎么实现

这种收据打印功能怎么实现？

   同一个单号，当“是否打印”=true时，自动根据“设备款”列、“保证金”列、“运费”列的值生成三张收据，当这三列当中值为0或空时，就不生成跟这列有关的收据，只生成有数值的其他列的收据

你是窗口打印 还是模板打印 还是专业报表?    有例子会比较好办

在窗口套打收据，希望实现如下功能：

   当窗口中“单号001”中“是否打印”=true时，因为“设备款”列、“保证金”列、“运费”列都有数字时，所以自动生成三张收据（收据模板见附件，“收款事由”项等于列名（设备款或者保证金或者运费）

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:收据打印.foxdb

是不是可以根据收款明细先生成收据明细，这代码咋写
此主题相关图片如下：收款明细.png


此主题相关图片如下：收据明细列表.png

你打印窗口是空白的啊,不太理解你想实现什么效果.

总金额=设备款+保证金+运费，如果设备款、保证金、运费这三项都有数字，那么针对该单号，需开三张收据

开3张什么样的收据?

可能我没说清楚，那么在5楼所附截图中，根据“收款明细”表怎样生成“收据明细列表”，帮忙写一下代码

 

Dim cs() As String = {"设备款","保证金","运费"}
For Each dr As DataRow In DataTables("收款明细").Select("是否打印 = true", Tables("收款明细").Filter)
    For Each c As String In cs
        If dr.IsNull(c) = False Then
            Dim ndr As DataRow = DataTables("收据明细").AddNew
            ndr("单号") = dr("单号")
            ndr("客户名称") = dr("客户名称")
            ndr("收款事由") = c
            ndr("金额") = dr(c)
        End If
    Next
Next