一个例外
单元格内边距,也就是内容和网格线的距离,是唯一不能通过表、行、列的Style属性设置的。
对于表格来说,Style的Spacing子属性设置的是表格和相邻对象的距离,而不是单元格内边距。
表格、行、列有一个CellStyle属性,专门用于解决这些问题,顾名思义,CellStyle当然完全是针对单元格的。。
示例
Dim
doc
As New PrintDoc
'定义一个报表
Dim rt As
New prt.RenderTable() '定义一个表格对象
doc.Body.Children.Add(rt) '将表格对象加入到报表中
rt.Style.GridLines.All = New prt.Linedef
'设置网格线
rt.CellStyle.Spacing.All = 1
'单元格内边距设为1毫米
'下面的代码向表格中填入值
For r As
Integer =
0
to
5
For
c As
integer =
0
to
5
rt.Cells(r, c).Text = r &
"," & c
'
Next
Next
doc.Preview() '预览报表
执行结果:
一般来说,如果你用Style无效,那么就改用CellStyle来试试,总有一个可以的。
本页地址:http://www.foxtable.com/webhelp/topics/1211.htm