横向的方案完全走不通，换了一个思路 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 横向的方案完全走不通，换了一个思路

共有2095人关注过本帖树形打印复制链接主题：横向的方案完全走不通，换了一个思路

yetle

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00

横向的方案完全走不通，换了一个思路 发帖心情

Post By：2018/8/9 15:03:00 [只看该作者]

请教：配色表中物料根据款式颜色表中存在的颜色生成对应的行,配量表中物料根据款式尺码表中存在的尺寸生成对应的行可以怎么写？

[此贴子已经被作者于2018/8/11 10:47:22编辑过]

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/8/9 15:17:00 [只看该作者]

1、看看 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=122616&skin=0

2、如果写代码，就循环表A所有行，在循环里面再循环表B所有行，addnew即可。

yetle

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00

Post By：2018/8/9 16:36:00 [只看该作者]

方法二循环具体怎么写？

[此贴子已经被作者于2018/8/9 17:09:07编辑过]

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/8/9 17:34:00 [只看该作者]

以下是引用yetle在2018/8/9 16:36:00的发言：
方法二循环具体怎么写？

[此贴子已经被作者于2018/8/9 17:09:07编辑过]

For Each ar As Row In Tables("表A").rows
    For Each br As Row In Tables("表B").rows

    Next
Next

yetle

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：858 积分：6381 威望：0 精华：0 注册：2017/2/13 9:04:00

Post By：2018/8/9 17:55:00 [只看该作者]

还有两个疑问：

1、款式颜色表和配料表里还存有其他款的资料，所以需加条件，新增的只是当前对应款号，这又怎么写？

2、新增行就是在代码后加Tables("款式颜色").addnew()？

For Each ar As Row In Tables("表A").rows
    For Each br As Row In Tables("表B").rows

    Next
Next

Tables("款式颜色").addnew()

有点甜

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/8/9 18:30:00 [只看该作者]

For Each ar As Row In Tables("表A").rows
    For Each br As Row In Tables("表B").rows
        Dim nr = Tables("款式颜色").addnew()
        nr("第一列") = ar("aaa")
        nr("第二列") = br("bbb")
    Next
Next

下一主题 >> << 上一主题

主题：横向的方案完全走不通，换了一个思路