合格率 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim b As New CrossTableBuilder("统计表1",DataTables("采购送检"))

b.HGroups.AddDef("送检日期",DateGroupEnum.Year,"年") '添加日期列用于水平分组,按年分组

b.HGroups.AddDef("供方代码","供方代码") '添加日期列用于水平分组,按月分组

b.VGroups.AddDef("送检日期","送检日期_{0}月") '添加产品列用于垂直分组

b.Totals.AddDef("金额") '添加数量列用于统计

b.Totals.AddDef("交验数量") '添加数量列用于统计

b.Totals.AddDef("合格数量") '添加数量列用于统计

b.Totals.AddDef("降用数量") '添加数量列用于统计

b.Totals.AddDef("报废数量") '添加数量列用于统计

b.Subtotal = True '生成汇总模式

b.Build '生成统计表

MainTable = Tables("统计表1") '打开生成的统计表

我想在统计表中再增加一列合格率，公式是合格数量/交验数量，

请老师赐教代码，谢谢！

主题：合格率