| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]打印分组框内容 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55878) |
| -- 作者：青岛立邦达 -- 发布时间：2014/8/25 15:38:00 -- [求助]打印分组框内容 一个窗口里面10多个groupbox Dim grp As WinForm.GroupBox = e.Form.Controls("GroupBox1") Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp) doc.Preview() Dim gre As WinForm.GroupBox = e.Form.Controls("GroupBox2") Dim dec As PrintDoc = e.Form.GernatePrintDoc(gre) dec.Preview() 依次类推 打印的话 是这么写 按钮么
|
| -- 作者：Bin -- 发布时间：2014/8/25 15:41:00 -- 对的.如果是 GroupBox1-10的话,可以简化一下代码 for i as integer = 1 to 10 Dim grp As WinForm.GroupBox = e.Form.Controls("GroupBox" & i) Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp) doc.Preview() next
|
| -- 作者：青岛立邦达 -- 发布时间：2014/8/25 15:46:00 -- 但是输入这个代码以后 点打印 它是依次打印的，一个GROUPBOX对应一张纸，如何能够将这些GROUPBOX 一次打印到一张A4纸呢？ |
| -- 作者：Bin -- 发布时间：2014/8/25 15:49:00 -- 不行 |
| -- 作者：有点甜 -- 发布时间：2014/8/25 15:53:00 -- 这个做不到。
1、用线去画一个分组框代替呗；
2、你试试先保存成图片，在合并起来看是否可以 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=55807&replyID=371786&skin=1
|