Foxtable(狐表)用户栏目专家坐堂 → 专业报表横向打印真的不行!


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

主题:专业报表横向打印真的不行!

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


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

Dim doc As New PrintDoc '定义一个报表
doc.PageSetting.Height =100
doc.PageSetting.Width =210
doc.AutoRotate = False '禁止自动旋转打印内容
Dim rx0 As New prt.RenderText '定义一个文本对象
rx0.Text="横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印横向打印"
doc.Body.Children.Add( rx0)
Doc.Print() '预览报表

 回到顶部