Foxtable(狐表)用户栏目专家坐堂 → 专业报表求助


  共有4100人关注过本帖平板打印复制链接

主题:专业报表求助

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


加好友 发短信
等级:三尾狐 帖子:659 积分:4686 威望:0 精华:0 注册:2013/6/11 17:51:00
专业报表求助  发帖心情 Post By:2014/2/25 12:17:00 [只看该作者]

我有设置打印页的纸张大小,但是加入文本之后看不到
估计跑到范围之外去了,我只增加一个文本却有两页
.x=0
.y=0
不应该会有两页
Dim doc As New PrintDoc '定义一个报表
doc.PageSetting.Width = 30
doc.PageSetting.Height = 50 
Dim rt As New prt.RenderText
rt.X=0
rt.Y=0
rt.Text="DOT pos:" & e.form.Controls("DOT_POS").Text
doc.Body.Children.Add(rt)
doc.Preview() '预览
[此贴子已经被作者于2014-2-25 12:19:24编辑过]

 回到顶部
总数 13 1 2 下一页