Foxtable(狐表)用户栏目专家坐堂 → 菜单里的组合框的下拉列表如何做


  共有10285人关注过本帖平板打印复制链接

主题:菜单里的组合框的下拉列表如何做

帅哥哟,离线,有人找我吗?
paullqxp
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:518 积分:4773 威望:0 精华:1 注册:2011/11/23 20:48:00
  发帖心情 Post By:2012/8/20 14:10:00 [只看该作者]

我再追问一下吧

我窗体中的“统计”按钮里的代码我写好了 但没有用到菜单里年月份的值来做筛选,能帮我稍稍改一下吗?

主要是加个筛选条件,注释请无视,我复制帮助里的

以下是源代码:

----------------------------------------------------------------------------------------

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("每月订单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("车型") '根据型号分组
bd1.Totals.AddDef("数量","计划") '对数量进行统计
dt1 = bd1.BuildDataSource()

 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("每日产量"))
Dim dt2  As fxDataSource
bd2.Groups.AddDef("车型") '根据型号分组
bd2.Totals.AddDef("数量","完成") '对数量进行统计
dt2 = bd2.BuildDataSource()


dt1.Combine("车型",dt2,"车型") '将销售统计数据组合到进货统计数据
 

Tables("产量统计_Table1").DataSource = dt1 '将统计结果绑定到Table
With DataTables("产量统计_Table1").DataCols  '用表达式列计算库存数据
    .Add("未完成",Gettype(Integer), "IsNull([计划],0) - ISNULL([完成],0)")
 
End With

--------------------------------------------------------------------------------------

[此贴子已经被作者于2012-8-20 14:11:18编辑过]

 回到顶部
总数 16 1 2 下一页