Dim g As New GroupTableBuilder("统计表1", DataTables("生产合同")) g.Groups.AddDef("生产合同编号") g.Totals.AddDef("生产合同编号",AggregateEnum.Count,"订单数") g.FromServer = True dim dt as datatable = g.Build(true) dim str as string = dt.GetComboListString("生产合同编号","订单数 > 1")