Foxtable(狐表)用户栏目专家坐堂 → 打印设置


  共有1882人关注过本帖树形打印复制链接

主题:打印设置

美女呀,离线,留言给我吧!
qinlao666
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3766 威望:0 精华:0 注册:2015/3/3 10:06:00
打印设置  发帖心情 Post By:2016/3/23 17:32:00 [只看该作者]



此主题相关图片如下:qq截图20160323172854.png
按此在新窗口浏览图片
Dim doc As PrintDoc = e.Form.GernatePrintDoc() '定义一个报表
doc.PageSetting.PaperKind = 9 '
Doc.PageSetting.LeftMargin = 0 '设置左边距
Doc.PageSetting.RightMargin = 0 '设置右边距
Doc.PageSetting.TopMargin = 0 '设置上边距
Doc.PageSetting.BottomMargin = 0 '设置下边距

doc.Preview() '预览

 

如图预览出来的效果,我想顶边打印,边距不要空这么多,请问老师如何写代码


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2016/3/23 17:38:00 [只看该作者]

设计窗口的时候,调整控件位置,往左上角移动。

 回到顶部
美女呀,离线,留言给我吧!
qinlao666
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3766 威望:0 精华:0 注册:2015/3/3 10:06:00
  发帖心情 Post By:2016/3/23 17:43:00 [只看该作者]

老师已经顶到头了

 回到顶部
美女呀,离线,留言给我吧!
qinlao666
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3766 威望:0 精华:0 注册:2015/3/3 10:06:00
  发帖心情 Post By:2016/3/23 17:45:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160323174342.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/3/23 17:49:00 [只看该作者]

这样写

 

e.Form.Page.LeftMargin = 0 '设置左边距
e.Form.Page.RightMargin = 0 '设置右边距
e.Form.Page.TopMargin = 0 '设置上边距
e.Form.Page.BottomMargin = 0 '设置下边距
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()


 回到顶部
美女呀,离线,留言给我吧!
qinlao666
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:443 积分:3766 威望:0 精华:0 注册:2015/3/3 10:06:00
  发帖心情 Post By:2016/3/23 17:52:00 [只看该作者]

好了,谢谢老师

 回到顶部