Dim bdx As New SQLGroupTableBuilder("统计表01","今日股票池")
bdx.C

bdx.AddTable("今日股票池","股票代码","今日特大单","股票代码")

bdx.AddTable("今日股票池","股票代码","特大单加仓最近","股票代码")

bdx.AddTable("今日股票池","股票代码","动态显示牌最近","股票代码")

bdx.Groups.AddDef("股票代码","代码")

bdx.Totals.AddDef("MACD十")
bdx.Totals.AddDef("MACD六")
bdx.Totals.AddDef("MACD日")
bdx.Totals.AddDef("MACD周")
bdx.Totals.AddDef("MACD月")
bdx.Totals.AddDef("DK十")
bdx.Totals.AddDef("DK六")
bdx.Totals.AddDef("DK日")
bdx.Totals.AddDef("DK周")
bdx.Totals.AddDef("DK月")
Output.Show("1")
bdx.Build
到此处错误？

Dim bdx As New SQLGroupTableBuilder("统计表01","今日股票池")
bdx.C
bdx.AddTable("今日股票池","股票代码","今日特大单","股票代码")
bdx.AddTable("今日股票池","股票代码","特大单加仓最近","股票代码")
bdx.AddTable("今日股票池","股票代码","动态显示牌最近","股票代码")
bdx.Groups.AddDef("{今日股票池}.股票代码","代码")
bdx.Totals.AddDef("MACD十")
bdx.Totals.AddDef("MACD六")
bdx.Totals.AddDef("MACD日")
bdx.Totals.AddDef("MACD周")
bdx.Totals.AddDef("MACD月")
bdx.Totals.AddDef("DK十")
bdx.Totals.AddDef("DK六")
bdx.Totals.AddDef("DK日")
bdx.Totals.AddDef("DK周")
bdx.Totals.AddDef("DK月")
Output.Show("1")
bdx.Build
Output.Show("2")
    Tables("主窗口_TblOprStkInfo").DataSource = bdx.BuildDataSource\' .BuildDataSource()   \' dt22 \'将统计结果绑定到Table
Output.Show("3")
  \'  Tables("主窗口_TblPoolGrp").Sort=tSort
    Tables("主窗口_TblOprStkInfo").AutoSizeCols()
Output.Show("4")

1、2过，3还是错误，与上面3、4步一样

对的，兰老师，去掉就好了，可是现在问题又来了，第一个表有的股票出现6次，后面表只有一次，嘿嘿，后面表的数据乘以6，汇总，也就是六倍的意思，请问怎么解决？

Dim   bd1 As  New   GroupTableBuilder("统计表x1",DataTables("今日股票池"))
Dim  dt1 As DataTable
 bd1.Groups.AddDef("股票代码")  \'根据型号分组
dt1=bd1. .BuildDataSource

这个东西怎么搞个DATATABLE表？