Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口打印一直打印不全


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

主题:[求助]窗口打印一直打印不全

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
[求助]窗口打印一直打印不全  发帖心情 Post By:2017/6/19 19:23:00 [显示全部帖子]

怎么也不能横向打印
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:窗口打印实验.foxdb

,使用的是资江热敏打印机 80毫米宽   一直纵向打印 求帮忙 帮忙 谢谢 谢谢谢谢谢谢xxxxx
[此贴子已经被作者于2017/6/19 19:23:36编辑过]

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/19 21:31:00 [显示全部帖子]

都试过了 不行 只能每次预览的时候手动选择横向打印才可以,直接打印怎么都不行

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/20 17:26:00 [显示全部帖子]

那怎么办 应该怎么用啊 

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/20 17:47:00 [显示全部帖子]


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

这个纸张类型怎么选 我找不到对应的

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/20 17:54:00 [显示全部帖子]

在这个界面可以找的到 但是每次打印都要这样选一次吗? 怎么可以直接打印就成功的

每次打印的时候 不这样选 那就肯定纵向打印了 
[此贴子已经被作者于2017/6/20 17:55:09编辑过]

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/20 18:19:00 [显示全部帖子]

1、只能自定义  选的通通都不保存

2、doc.PageSetting.Width = 200  '纸张宽度为200毫米
doc.PageSetting.Height = 170  '纸张高度为170毫米
doc.AutoRotate = False  '如果纸张的宽度超过高度,要加上这行代码
'添加打印内容
doc.print

添加打印内容那里应该写什么啊  不会。。

3、纸张大全里没有跟这个纸对应的 

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/23 18:21:00 [显示全部帖子]

打印机都买好了 总不能换来换去吧 想想办法解决一下啊  能不能控制让打印内容直接旋转一下应该就可以了,或者做好的窗口能不能旋转一下呢?

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/23 18:51:00 [显示全部帖子]

Dim doc As New PrintDoc()
doc.PageSetting.Width = 200  '纸张宽度为200毫米
doc.PageSetting.Height = 80  '纸张高度为170毫米
doc.AutoRotate = False  '如果纸张的宽度超过高度,要加上这行代码
'添加打印内容
doc.Preview

添加打印内容那里,应该写什么啊 请指教  这个代码预览出来是空白的 

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


加好友 发短信
等级:小狐 帖子:319 积分:3465 威望:0 精华:0 注册:2012/4/24 14:47:00
  发帖心情 Post By:2017/6/23 21:04:00 [显示全部帖子]

不行啊 那能不能打印的时候控制打印内容旋转一下呢 或者窗口旋转一下也可以解决问题

 回到顶部