Dim doc As New PrintDoc
Dim rt As New prt.RenderTable
Dim tb as
Table = Tables("订单")
Dim ColNames As
String() = New String(){"产品",
"客户","单价", "数量", "金额"}
For
c
As
integer = 0
To
ColNames.Length
-1
rt.Cells(0,c).Text = ColNames(c)
rt.Cols(c).Width =
tb.Cols(ColNames(c)).PrintWidth
rt.Cells(1, c).Text = "[Fields!" & ColNames(c) & ".Value]" '设置绑定表达式
Next
rt.RowGroups(0,1).Style.TextAlignVert = prt.AlignVertEnum.Center '第一行内容垂直居中
rt.RowGroups(0,1).Header = prt.TableHeaderEnum.All '将第一行作为表头。
rt.RowGroups(1,1).DataBinding.DataSource = BindTables("订单") '将第二行绑定到订单表
doc.Body.Children.Add(rt)
doc.Preview()
请问其中 rt.Cells(1, c).Text 的内容如何来Format格式。
比如以上代码绑定后显示的是2016-01-12 12:01:01,我希望格式化成2016-01-12.
通过Format("[Fields!" & ColNames(c) & ".Value]","yyyy-MM-dd")。但系统报错。
谢谢!