- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]请问专业报表多行多列如何同时合并？还有单元格部分线条的隐藏要怎么写？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187003)
-- 发布时间：2023/6/14 2:29:00
-- [求助]请问专业报表多行多列如何同时合并？还有单元格部分线条的隐藏要怎么写？
如题：请问专业报表多行多列如何同时合并？还有单元格部分线条的隐藏要怎么写？
效果如图：
-- 发布时间：2023/6/14 8:40:00
--
Dim doc As New PrintDoc \'定义一个报表
Dim rt As New prt.RenderTable() \'定义一个表格对象
doc.Body.Children.Add(rt) \'将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef \'设置网格线
rt.Rows.Count = 7 \'设置总行数
rt.Cols.Count = 5 \'设置总列数
rt.Height = 120 \'设置表格的高度为120毫米
rt.Cells(2, 1).SpanRows = 3 \'第3行第2个单元格向下合并3行
rt.Cells(2, 1).SpanCols = 3 \'第3行第2个单元格向右合并3列
Doc.Preview() \'预览报表