- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]如何按A4纸尺寸打印窗体 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62026)
-- 发布时间：2014/12/24 11:55:00
-- [求助]如何按A4纸尺寸打印窗体
又遇到问题了。
想将窗体尺寸定义为A4纸大小，打印预览时，滚动滚动条，看不到的窗体部分就不打印了。
窗体打印只是针对可见部分打印吗？
如果窗体尺寸定义为A4纸大小有没有办法全部打印出来？
附测试文件，谢谢
-- 发布时间：2014/12/24 12:02:00
--
改变窗口大小，然后打印，再设置回来
Dim width As Integer = e.Form.baseform.Width
Dim height As Integer = e.Form.baseform.Height
e.Form.baseform.Width = 1200
e.Form.baseform.height = 1200
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview() \'打印预览
e.Form.baseform.Width = width
e.Form.baseform.height = height
-- 发布时间：2014/12/24 12:17:00
--
将窗口滚动条往下接，再点打印，窗体内容还是不能全部打印出来。只有当前窗口看得到的部分。
-- 发布时间：2014/12/24 12:29:00
--
滚动条拉到最上面就可以打印全部内容，往下拉到底部，上面部分就打印不出来了。
换个思路，将打印按钮放在页面最上方好了。
谢谢 有点甜