Foxtable(狐表)用户栏目专家坐堂 → BOM需求核算


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

主题:BOM需求核算

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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 11:33:00 [只看该作者]

增加后,编码还是要处理下才行,可能要使用到递归的原理进行处理

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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 11:35:00 [只看该作者]


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

这个使用内联折叠,折叠后的层级都乱了的,这个是什么原因

本来是第三层的,跑到第二层去了,都不是一层层排下去的


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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 11:36:00 [只看该作者]

Dim st As New InlineTreeSetting
st.ParentCol = "母件编码"''''字符型,指定父列名称
st.ChildCol = "子件编码"'''''''字符型,指定子列名称
'st.SortCol = "子件名称"'''''字符型,指定排序列,参考:指定排序列  保存行顺序
st.ExpandTo = -1 '''整数型,指定折叠树默认展开级别,默认为0,也就是都不展开,如果设置为-1,则全部展开
st.AggregateCols = {"用量", "数量", "金额"}''''''字符数组,指定要汇总的列,参考:汇总数据  汇总值和原始值
st.UseStyle = True''''' 逻辑型,是否使用样式区分分组行,参考:使用样式区分行
'st.SortDesc = True''''逻辑型,是否降序排序
st.TreeCol = "母件编码"''''''字符型,指定折叠树显示列名称,如果不设置,默认显示在子列
Tables("订单BOM.订单BOM明细").ShowGridTree(st)

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/1/6 11:50:00 [只看该作者]

没有问题。数据里很多母子件就只有2层,不存在第三层。只有2层是无法形成树的

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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 11:56:00 [只看该作者]

现在生成是乱了,不在下层,都跑到上层去了

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/1/6 12:01:00 [只看该作者]

哪个数据乱?举例说明一下

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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 12:09:00 [只看该作者]


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

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


加好友 发短信
等级:超级版主 帖子:107846 积分:548581 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/1/6 12:35:00 [只看该作者]

不指定排序列,那么会默认按照父列名称进行排序显示

st.ParentCol = "母件编码"''''字符型,指定父列名称

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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 13:58:00 [只看该作者]

???不明白试了很多次还是这样的


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


加好友 发短信
等级:八尾狐 帖子:1861 积分:5273 威望:0 精华:0 注册:2017/11/8 17:37:00
  发帖心情 Post By:2023/1/6 14:00:00 [只看该作者]

Dim st As New InlineTreeSetting
st.ParentCol = "母件编码"
st.ChildCol = "子件编码"
'st.SortCol = "子件名称"
st.ExpandTo = -1
st.AggregateCols = {"用量", "数量", "金额"}
st.UseStyle = True'
'st.SortDesc = True
st.TreeCol = "母件编码"
Tables("订单BOM.订单BOM明细").ShowGridTree(st)

需怎样改作


 回到顶部
总数 42 上一页 1 2 3 4 5 下一页