Foxtable(狐表)用户栏目专家坐堂 → [讨论]这段代码有误吗


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

主题:[讨论]这段代码有误吗

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


加好友 发短信
等级:一尾狐 帖子:475 积分:3548 威望:0 精华:0 注册:2012/8/30 10:58:00
[讨论]这段代码有误吗  发帖心情 Post By:2015/8/17 16:06:00 [只看该作者]

Dim bd1 As New GroupTableBuilder("库存表1",DataTables("入库表"))
Dim dt1 As fxDataSource
bd1.groups.AddDef("样品编号") '根据型号分组
bd1.Totals.AddDef("入库数量","入库_数量") '对数量进行统计
bd1.Totals.AddDef("单位","入库_单位")
dt1 = bd1.BuildDataSource()
Dim bd2 As New GroupTableBuilder("库存表2",DataTables("出库表"))
Dim dt2  As fxDataSource
bd2.Groups.AddDef("样品编号") '根据型号分组
bd2.Totals.AddDef("出库数量","出库_数量") '对数量进行统计
bd2.Totals.AddDef("单位","出库_单位")
dt2 = bd2.BuildDataSource()
Dim bd3 As New GroupTableBuilder("库存表3",DataTables("退货表"))
Dim dt3 As fxDataSource
bd3.Groups.AddDef("样品编号") '根据型号分组
bd3.Totals.AddDef("数量","退货_数量") '对数量进行统计
bd3.Totals.AddDef("单位","退货_单位")
dt3 = bd3.BuildDataSource()
dt1.Combine("样品编号",dt2,"样品编号") '将销售统计数据组合到进货统计数据
dt1.Combine("样品编号",dt3,"样品编号") '将退货统计数据组合到进货统计数据
Tables("成品管理_Table5").DataSource = dt1 '将统计结果绑定到Table
With DataTables("成品管理_Table5").DataCols  '用表达式列计算库存数据
    .Add("库存数量",Gettype(Integer), "IsNull([入库_数量],0) - ISNULL([出库_数量],0) - ISNULL([退货_数量],0)") 
按照这段代码,应该显示“样品编号”这一列,为何运行时没有出现呢?问题出在哪里呢?

图片点击可在新窗口打开查看此主题相关图片如下:1212.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/17 16:21:00 [只看该作者]

呃,这段代码没问题。

 

出错的话,做例子发上来。


 回到顶部
帅哥哟,离线,有人找我吗?
czgtiger
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:475 积分:3548 威望:0 精华:0 注册:2012/8/30 10:58:00
  发帖心情 Post By:2015/8/17 18:55:00 [只看该作者]

我新增加了个窗口,把这段代码复制过去,发现一切正常,对比了一下,不同之处在于,老窗口上面是有tablescontrol控件,共有4页,第一页是入库,第二页是出库,第三页是库存,第四页是退货,新窗口中没有,难道是这个原因吗?请高手指点

 回到顶部
帅哥哟,离线,有人找我吗?
czgtiger
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:475 积分:3548 威望:0 精华:0 注册:2012/8/30 10:58:00
  发帖心情 Post By:2015/8/17 18:56:00 [只看该作者]

如果是的,请问如何解决呢?


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/17 19:24:00 [只看该作者]

看一下停靠设置,不要停靠,有可能被遮挡了。

 

还有可能是你有其余的代码隐藏了此列。


 回到顶部
帅哥哟,离线,有人找我吗?
czgtiger
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:475 积分:3548 威望:0 精华:0 注册:2012/8/30 10:58:00
  发帖心情 Post By:2015/8/18 9:24:00 [只看该作者]

谢谢大红袍老师

 回到顶部