Foxtable(狐表)用户栏目专家坐堂 → 请教大红袍 页边距的问题,谢谢


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

主题:请教大红袍 页边距的问题,谢谢

帅哥哟,离线,有人找我吗?
km001
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:15 积分:190 威望:0 精华:0 注册:2015/5/26 15:35:00
请教大红袍 页边距的问题,谢谢  发帖心情 Post By:2015/11/10 17:31:00 [只看该作者]

请问 大红袍 为何我设置的页边距打印预览时无效?

Dim grp As WinForm.Panel = e.Form.Controls("Panel1")
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
Doc.PageSetting.LeftMargin = 100 '设置左边距
Doc.PageSetting.RightMargin = 1'设置右边距
Doc.PageSetting.TopMargin = 100 '设置上边距
Doc.PageSetting.BottomMargin = 0 '设置下边距
Doc.Preview()

[此贴子已经被作者于2015/11/10 17:30:56编辑过]

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


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

Dim grp As WinForm.Panel = e.Form.Controls("Panel1")
Doc.PageSetting.LeftMargin = 100 '设置左边距
Doc.PageSetting.RightMargin = 1'设置右边距
Doc.PageSetting.TopMargin = 100 '设置上边距
Doc.PageSetting.BottomMargin = 0 '设置下边距
 
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
Doc.Preview()

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


加好友 发短信
等级:婴狐 帖子:15 积分:190 威望:0 精华:0 注册:2015/5/26 15:35:00
  发帖心情 Post By:2015/11/10 17:40:00 [只看该作者]

以下是引用大红袍在2015/11/10 17:36:00的发言:
Dim grp As WinForm.Panel = e.Form.Controls("Panel1")
Doc.PageSetting.LeftMargin = 100 '设置左边距
Doc.PageSetting.RightMargin = 1'设置右边距
Doc.PageSetting.TopMargin = 100 '设置上边距
Doc.PageSetting.BottomMargin = 0 '设置下边距
 
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
Doc.Preview()

上面Doc 尚未定义,不可以设置其边距的吖,怎么把定义写到下面了呢?

[此贴子已经被作者于2015/11/10 17:43:17编辑过]

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


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


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


加好友 发短信
等级:婴狐 帖子:15 积分:190 威望:0 精华:0 注册:2015/5/26 15:35:00
  发帖心情 Post By:2015/11/10 18:37:00 [只看该作者]

谢谢!

 回到顶部