行列样式

行、列都有自己的Style属性,用于设置其外观。

示例

Dim doc As New PrintDoc '定义一个报表
Dim
rt As New prt.RenderTable() '定义一个表格对象
doc.Body.Children.Add(rt)
'将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef(Color.DarkGray)
'将表格的颜色设为深灰色
rt.Rows.Count =
3 '设置行数
rt.Cols.Count =
3 '设置列数
rt.Width =
150 '设置表格的宽度
rt.Height =
150 '设置表格的高度
rt.Rows(
2).Style.Borders.All = New prt.LineDef("0.5mm", Color.Red)
rt.Cols(
0).Style.Borders.All = New prt.LineDef("2mm"
, Color.Blue)
Doc.Preview()
'预览报表

执行结果:


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