Tables("统计1").Select(-1,-1)'b.Build '生成统计表forms("统计表").Openforms("统计表").controls("Table1").Table.DataSource = b.BuildDataSource()forms("统计表").controls("Table1").Table.Select(-1,-1)
'格式设置'For Each c As Col In Tables("统计表1").Cols 'c.TextAlign = TextAlignEnum.Center'Next