合并单元格

单元格有一个SpanRows属性,用于指定单元格向下合并的行数,另外有一个SpanCols属性,用于指定向右合并的列数。

示例

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
.Rows(6).Height = 50 '第7行的高度为50毫米
rt
.Cells(0,4).SpanRows = 6 '第1行第5个单元格向下合并6行
rt
.Cells(4,1).SpanCols = 3 '第5行第2个单元格向右合并3列
rt
.Cells(6,0).SpanCols = 5 '第7行第1个单元格向右合并5列
Doc
.Preview() '预览报表

执行结果:


本页地址:http://www.foxtable.com/webhelp/topics/1213.htm