Foxtable(狐表)用户栏目专家坐堂 → [求助]关于打印输出的数据排列方式求助


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

主题:[求助]关于打印输出的数据排列方式求助

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


加好友 发短信
等级:幼狐 帖子:67 积分:649 威望:0 精华:0 注册:2016/9/22 8:41:00
[求助]关于打印输出的数据排列方式求助  发帖心情 Post By:2016/11/5 0:44:00 [只看该作者]

Dim doc As New PrintDoc() '定义一个报表
Dim
rt As prt.RenderText '定义一个文本对象
doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
'设置排列方式
For
i AS integer = 0 To 10
rt = New prt.RenderText()
'创建文本对象
rt.Text =
"Hello Foxtable " & i '设置文本对象的内容
rt.Width =
39 '宽度为39毫米
rt.Height =
35 '宽度为35毫米
rt.Style.Spacing.All =
2 '设置各个方向的间隔
rt.Style.Borders.All = New prt.Linedef(
1, Color.Red) '设置边框
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center
'水平居中
rt.Style.TextAlignVert = prt.AlignVertEnum.Center
'垂直居中
doc.Body.Children.Add(rt)
'将文本对象加入到报表
Next

doc.Preview()
'预览
这是帮助文档的关于报表打印排列方式的示例,本人菜鸟不懂,大概知道这是对一个指定表中的某一列的数据通过设置排列方式后,转移到一个表中,这和我的需求刚刚吻合。
但是上面的语言到底哪些内容是可以依葫芦画瓢,根据实际表和列以及报表的名称,修改后就能实现的?
图片点击可在新窗口打开查看此主题相关图片如下:打印报表排列.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2016/11/5 1:02:26编辑过]

 回到顶部