FOTABLE编程最新分析和总结.pdfVIP

. 数据绑定 最简单的绑定 首先还是打开我们的示例文件 “专业报表 .Table ”，然后在命令窗口执行下面的代码： 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() 上述代码会打印出订单表中每一行的产品名称。 DataBinding 用于设置打印对象的绑定属性，该属性包括一些子属性， DataSource 表示数据 来源，数据来源可以是 Table ，还可以是数组或者集合。 需要注意的是，不能直接绑定到 Table ，如果要绑定到 Table ，必须用 BindTables 来设置， 例如： rt.DataBinding.DataSource = BindTables( 订单 ) 如果对象的内容来自于某一列，其 Text 属性的设置格式如下： [Fields! 列名称 .Value] 使用表达式 在命令窗口执行下面的代码： Dim doc As New PrintDoc Dim rt As New prt.RenderText rt.DataBinding.DataSource = BindTables( 订单 ) 将 rt 绑定到订单表 rt.Text= [Math.Round(Fields! 金额 .Value,1)] 设置打印表达式 doc.body.Children.Add(rt) doc.Preview() 留意方括号中的内容： Math.Round(Fields! 金额 .Value,1) 意思是打印的时候将金额列的内容，保留一位小数，你可以在 Text 属性中使用 Foxtable 支 持的所有函数。 注意表达式必须用方括号括起来。 日期的打印 为了得到常规的日期格式，可以利用 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() 要记得对于字符串中的每一个双引号，都必须用两个双引号来表示。 在命令窗口执行下面的代码： 绑定多个字段 为了打印出订单表中的日期和数量，在命令窗口执行下面的代码： 需要使用容器 (RenderArea) ，将原来的打印对象加入到容器中，这些打印对象不再需要设置 绑定，只需为容器设置绑定即可。 例如： Dim doc As New PrintDoc Dim rt As New prt.RenderText Dim ra As New prt.RenderArea ra.Style.Spacing.Bottom = 2 ra.DataBinding.DataSource = BindTables( 订单 ) 将容器绑定到订单表 rt.Text = [Fields! 日期.Value] ra.Children.Add(rt) 将打印对象添加到容器中 rt = New prt.RenderText rt.Text= [Fields! 数量 .Value] ra.Children.Add(rt) doc.body.Children.Add(ra) d