以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用三张表信息打印同一张piao据,中的上一条与下一条的代码怎么写?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65683)

--  作者:筑梦踏实
--  发布时间:2015/3/20 14:47:00
--  用三张表信息打印同一张piao据,中的上一条与下一条的代码怎么写?

With Tables("凭证")

    .Position = .Position - 1

End With


With Tables("凭证")

    .Position = .Position + 1

End With


这是只真对一张表做的“上一条”,“下一条”按钮的代码。

我想要用三张表上的信息,在同一张票据上打印,这个代码得怎么写?


--  作者:有点甜
--  发布时间:2015/3/20 14:51:00
--  

1、是一次打印相同的三张表的意思?

 

2、还是说,排版什么的全部不同?如果不同,就应该重新做一个模板。

 

---------

 

具体问题请上传例子。


--  作者:筑梦踏实
--  发布时间:2015/3/20 14:51:00
--  
还有一个问题:

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Preview 

这是“打印”按钮的代码。可是每次都打开预览窗口。我想要直接打印,不用打开预览窗口得怎么写代码?



--  作者:有点甜
--  发布时间:2015/3/20 14:55:00
--  

 上传例子

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Print

 


--  作者:筑梦踏实
--  发布时间:2015/3/20 15:34:00
--  
我做了一个快递单的打印。
有三个问题:
1、我想要用三张表上的信息,在同一张票据上打印,这个“上一条”、“下一条”的代码得怎么写?
2、在预览时,他分页了?
3、能不能不用预览,可以直接打印?


--  作者:有点甜
--  发布时间:2015/3/20 16:10:00
--  

 1、上传例子;

 

 2、上传例子;

 

 3、

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Print


--  作者:筑梦踏实
--  发布时间:2015/3/21 9:14:00
--  
我做了一个快递单的打印。
有三个问题:
1、我想要用三张表上的信息,在同一张票据上打印,这个“上一条”、“下一条”的代码得怎么写?
2、在预览时,他分页了?
3、能不能不用预览,可以直接打印?

--  作者:筑梦踏实
--  发布时间:2015/3/21 9:15:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:三张表用同一窗口.zip


--  作者:筑梦踏实
--  发布时间:2015/3/23 15:16:00
--  
为什么没人给我回话啊?????
--  作者:Bin
--  发布时间:2015/3/23 15:46:00
--  
1.三张表行对应就 分别写三句1楼代码对应3个表
2.放不下就分页
3.

Dim doc As PrintDoc = e.Form.GernatePrintDoc()

doc.Print