日期的打印
在命令窗口执行下面的代码：
Dim
doc
As New PrintDoc
Dim rt As
New prt.RenderText
rt.DataBinding.DataSource = BindTables("订单")
'将rt绑定到订单表
rt.Text= "[Fields!日期.Value]"
doc.body.Children.Add(rt)
doc.Preview()
你会发现，打印出来的日期带有时间部分，并不符合我们的要求：
为了得到常规的日期格式，可以利用Format格式化日期数据：
Dim doc As New PrintDoc
Dim rt As New prt.RenderText
rt.DataBinding.DataSource = BindTables("订单")
'将rt绑定到订单表
rt.Text=
"[Format(Fields!日期.Value,""yyyy-MM-dd"")]"
doc.body.Children.Add(rt)
doc.Preview()
要记得对于字符串中的每一个双引号，都必须用两个双引号来表示。
本页地址：http://www.foxtable.com/webhelp/topics/1253.htm