Foxtable(狐表) → 用户栏目 → 专家坐堂 → 专业报表中用什么语句能自由控制二个表格在报表中的位置


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

主题：专业报表中用什么语句能自由控制二个表格在报表中的位置
帅哥哟，离线，有人找我吗？
xxfoxtable
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1781 积分：16859 威望：0 精华：0 注册：2017/6/1 23:12:00 		专业报表中用什么语句能自由控制二个表格在报表中的位置  发帖心情 Post By：2024/11/8 8:54:00 [显示全部帖子]

专业报表中用什么语句能自由控制二个表格在报表中显示的位置
[此贴子已经被作者于2024/11/8 8:54:03编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
xxfoxtable
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1781 积分：16859 威望：0 精华：0 注册：2017/6/1 23:12:00 		  发帖心情 Post By：2024/11/8 9:03:00 [显示全部帖子]


[此贴子已经被作者于2024/11/8 9:21:30编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
xxfoxtable
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1781 积分：16859 威望：0 精华：0 注册：2017/6/1 23:12:00 		  发帖心情 Post By：2024/11/8 9:17:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：标签1.png
图片点击可在新窗口打开查看

Dim rt As New prt.RenderTable() '定义一个表格对象
rt.Style.Font = New font("宋体", CStr(Tables("标签打印设置").Current("服务方法字体大小")))
rt.Cols.Count = 1'报表_table1总列数
rt.Width = CStr(Tables("标签打印设置").Current("服务方法宽度"))
rt.X = 25
rt.y = 0
'Dim a As Integer = CStr(Tables("标签打印设置").Current("服用方法上位置"))
'rt.y = "Prev.top +a"
rt.Cells(0, 0).Text = "内服"
rt.CellStyle.Spacing.All = 1.2 '单元格内容缩进1毫米
rt.Style.GridLines.All = New prt.Linedef '报表_table1网格线
rt.Style.TextAlignVert = prt.AlignVertEnum.Center '内容垂直居中
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center
'rt.Y = CStr(Tables("标签打印设置").Current("离表格的距离"))
doc.Body.Children.Add(rt) '将表格对象加入到报表中

我是这样写的，但不行
 回到顶部
帅哥哟，离线，有人找我吗？
xxfoxtable
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1781 积分：16859 威望：0 精华：0 注册：2017/6/1 23:12:00 		  发帖心情 Post By：2024/11/8 9:21:00 [显示全部帖子]

感谢

 回到顶部
帅哥哟，离线，有人找我吗？
xxfoxtable
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1781 积分：16859 威望：0 精华：0 注册：2017/6/1 23:12:00 		  发帖心情 Post By：2024/11/8 13:10:00 [显示全部帖子]

回复的太好！对我们基础不好的，有非常大的帮助

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06836 秒, 5 次数据查询