Foxtable(狐表)用户栏目专家坐堂 → 窗口打印纵向横向弄反了


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

主题:窗口打印纵向横向弄反了

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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/11 17:08:00 [显示全部帖子]

1、既然是自定义支行,就没有必要选择横向了。

 

2、直接打印:

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Doc.AutoRotate =False
doc.Preview()


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/11 17:35:00 [显示全部帖子]

要不你把高度设置为221

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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/12 16:12:00 [显示全部帖子]


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/13 16:26:00 [显示全部帖子]

之前有人这样解决,窗口设计不进行页面设置,在打印按钮中设置,只设置宽度,不设置高度:

 

1、

e.Form.Page.Width = 220 '纸张宽度为100毫米
dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Pint()

 

2、或者:

 

dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.PageSetting.Width = 220 '纸张宽度为100毫米

doc.Pint()


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/13 17:31:00 [显示全部帖子]

我也没有别的办法了,当时hanxuntx确实解决了的哦,要不你问问他吧:

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=34514&skin=0

 


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


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/11/13 17:32:00 [显示全部帖子]

发论坛短信,

 回到顶部