统一设置属性

表格、行、列都有Style属性,这样我们就无需针对每一个单元格去设置其打印对象的属性。

示例

Dim doc As New PrintDoc '定义一个报表
Dim
rt As New prt.RenderTable() '定义一个表格对象
doc.Body.Children.Add(rt)
'将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef
'设置网格线
'下面的代码向表格中填入值

For
r As Integer = 0 to 5
   
For c As integer = 0 to 5
        rt.Cells(r, c).Text = r &
"," & c '
   
Next
Next

rt.Style.TextAlignHorz = prt.AlignHorzEnum.Right
'所有文本内容靠右对齐
rt.Cols(
0).Style.TextAlignHorz = prt.AlignHorzEnum.Center '唯独第一列内容居中

doc.Preview()
'预览报表


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