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


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

主题:打印问题

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/29 16:29:00 [显示全部帖子]

 宽,高,调小一点啊,不要超出范围。

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/29 16:50:00 [显示全部帖子]

 如果不预览,直接doc.print行不行?

 

 或者试试这个例子行不行?

 

下载信息  [文件大小:296.0 KB  下载次数:9]
图片点击可在新窗口打开查看点击浏览该文件:嵌入专业报表.table


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/30 1:11:00 [显示全部帖子]

 把你的那台打印机设置成默认打印机,然后直接print。

 

 看你的打印效果,应该是因为你的纸张是纵向(窄),而要打印的内容,是横向,导致超出纸张的内容无法打印。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/30 10:04:00 [显示全部帖子]

 打印多份,这样写

 

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Dim ps As new System.Drawing.Printing.PrinterSettings

ps.PrinterName = cmb1   '设置打印机名

ps.Copies = txt1   '设置份数

doc.Print(ps)     '打印


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/30 11:17:00 [显示全部帖子]

上下边距、宽高要设置得当。

 

单位是毫米,你好好测量一下你纸张的大小。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/6/30 17:21:00 [显示全部帖子]

mark 本来就是没问题的,你要打印的内容超过了页面宽度,就会变成这样的。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


 回到顶部