行列样式
行、列都有自己的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