Foxtable(狐表)用户栏目专家坐堂 → 窗口统计数据


  共有2300人关注过本帖树形打印复制链接

主题:窗口统计数据

美女呀,离线,留言给我吧!
xiaohuli
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:461 积分:3442 威望:0 精华:0 注册:2014/2/8 11:13:00
窗口统计数据  发帖心情 Post By:2015/9/17 10:37:00 [显示全部帖子]

点击窗口中的查询按钮,然后将查询到的数据以交叉表的形式统计在窗口的table1中,虽然统计的数据放在窗口中的table1中了,但是同时又生成了一个临时表,能不能将统计的数据只放在窗口中,不要在生产临时表了。下面是我的代码,老师帮忙看看。

  Dim q As new QueryBuilder
    q.C
    q.TableName = "订单汇总"
    q.SelectString = ""
  q.Build
    Dim g As New CrossTableBuilder("订单汇总", DataTables("订单汇总"))
    g.HGroups.AddDef("编号")
    g.HGroups.AddDef("产品名称")
    g.VGroups.AddDef("区域")
    g.Totals.AddDef("销售数量", "销售数量")
  
    g.VerticalTotal = True
    g.Build()
    Tables("订单汇总_Table1").DataSource = g.BuildDataSource()
    Tables("订单汇总_table1").Font = New Font("宋体",11,FontStyle.Bold)
    Tables("订单汇总_table1").AutoSizeCols()


 回到顶部
美女呀,离线,留言给我吧!
xiaohuli
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:461 积分:3442 威望:0 精华:0 注册:2014/2/8 11:13:00
  发帖心情 Post By:2015/12/15 21:07:00 [显示全部帖子]

老师,查询出来的数据放在了窗口1中,去掉了  'g.Build()

但还是生成了临时表,这是怎么回事?

代码如下:

Dim q As new QueryBuilder
    q.C
    q.TableName = "统计表1"

    q.SelectString = “”    
    q.Build()
    'MainTable = Tables("统计表1")
    Dim g As New CrossTableBuilder("统计表1", DataTables("统计表1"))
       g.HGroups.AddDef("区域")
    g.VGroups.AddDef("月份")
    g.Totals.AddDef("金额", "金额")
    'g.HorizontalTotal = True
    'g.VerticalTotal = True
    'g.Build()
    forms("窗口1").open
'Tables("窗口1_Table1").DataTable.DataRows.Clear
    Tables("窗口1_Table1").DataSource = g.BuildDataSource()
    Tables("窗口1_table1").Font = New Font("宋体",11,FontStyle.Bold)
    Tables("窗口1_table1").AutoSizeCols()


 回到顶部