Foxtable(狐表) → 用户栏目 → 专家坐堂 → 代码（3楼已作示范文件）C版请进


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

主题：代码（3楼已作示范文件）C版请进
帅哥哟，离线，有人找我吗？
wqc360
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：790 积分：5695 威望：0 精华：0 注册：2009/4/17 18:42:00 		代码（3楼已作示范文件）C版请进  发帖心情 Post By：2010/7/27 11:55:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目26.table

求1代码：

当零部件明细表交货数量改变时，订单序号来源于订单表的订单序号第一行，（订单表订单机型中6列打钩的为1）GE296_6梳机械_台数为订单表订单机型_GE296_6梳机械列的合计（合计条件为订单序号小于零部件明细表当前行的订单序号），GE296_7梳机械_台数为订单表订单机型_GE296_6梳机械列的合计（合计条件为订单序号小于零部件明细表当前行的订单序号），以此6个台数列合计。如果零部件明细表中6种机型的同机型台数*台用量累加-交货数量小于0时，零部件订单序号列减1，否则加1，如此循环，请高手指点，谢谢

[此贴子已经被作者于2010-7-28 3:30:28编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2010/7/27 23:13:00 [只看该作者]

看不明白.

 回到顶部
帅哥哟，离线，有人找我吗？
wqc360
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：790 积分：5695 威望：0 精华：0 注册：2009/4/17 18:42:00 		  发帖心情 Post By：2010/7/28 3:29:00 [只看该作者]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目26.table

总算做出一点能说明要求的东西了。详见附件

现在还剩下一个问题还没解决：

"零部件明细"表的"订单序号"列，能自动计算出如示范文件一样的结果。要求是：来源于"订单"表中的"订单序号"列，满足当"零部件明细"表中"剩余数量"大于0时，"订单序号"就加1，一直到小于0时，再减1就是所需数据。

（严格来讲应是"零部件明细"表中"剩余数量"大于各机型的台用量最大值时，"订单序号"就加1，一直到小于台用量最大值）

请C版帮忙看看用什么招解决，谢谢

[此贴子已经被作者于2010-7-28 10:41:42编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
wqc360
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：790 积分：5695 威望：0 精华：0 注册：2009/4/17 18:42:00 		  发帖心情 Post By：2010/7/28 13:45:00 [只看该作者]

各位老师，3楼红色的不能满足要求，因如果下一个订单机型太用量比较小，够一台用量，就不是我要的结果了，还是按3楼原文及黑色的要求写代码，谢谢

 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/7/28 15:02:00 [只看该作者]

呵呵  有点晕······

 回到顶部
帅哥哟，离线，有人找我吗？
czy
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级：超级版主 帖子：6318 积分：33963 威望：0 精华：10 注册：2008/8/31 20:56:00 		  发帖心情 Post By：2010/7/28 21:17:00 [只看该作者]

呵呵，我什么也没看出来，从数据中只看出订单序号是各台数的总和。
 回到顶部
帅哥哟，离线，有人找我吗？
wqc360
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：790 积分：5695 威望：0 精华：0 注册：2009/4/17 18:42:00 		  发帖心情 Post By：2010/7/29 0:34:00 [只看该作者]

哪只是巧合，我要求能自动计算出零部件明细表中订单序号列数据，如示范文件中的数据就满足要求，那是我人工试着填进去的，实际工作中，有很多行，人工试填不现实，示范文件中剩余数量都不小于0，如果订单序号再加1，剩余数量就小于0了，订单序号属从1开始的整数如1、2、3、4、5、6、.............100、101、102、..........。能不能吧订单表中订单序号列的数据设一个集合，从最小的开始往零部件明细表订单序号列中填充，零部件明细应有订单序号变化时的一些计算，当计算到剩余数量大于0时，订单序号再加1，如此循环直到最大，如当计算到剩余数量小于0时，订单序号减1既是所需数据。循环语句我还没用过，不知怎么用，是用按钮还是其他，请C版帮帮忙，谢谢了。

 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9879 积分：57640 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2010/7/29 8:02:00 [只看该作者]

你用A,B,C等列名解释一下不就得了,有很多东西看了头晕,

 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/7/29 12:40:00 [只看该作者]

觉得好像就是这样的结果:    不知道对不?

 

Dim gbr As Row = CurrentTable.current    '零部件明细表
Dim ger As DataRow
ger = DataTables("订单").Find("机号_GE296 = " & gbr("可装机号_GE296"))
Dim bkr As DataRow
bkr = DataTables("订单").Find("机号_BKS = " & gbr("可装机号_BKS"))
If gbr.isnull("可装机号_GE296") = False And gbr.isnull("可装机号_BKS") = False
    If ger("订单序号") > bkr("订单序号")
        gbr("订单序号") = ger("订单序号")
    Else
        gbr("订单序号") = bkr("订单序号")
    End If
Elseif gbr.isnull("可装机号_GE296") And gbr.isnull("可装机号_BKS") = False
    gbr("订单序号") = bkr("订单序号")
Elseif gbr.isnull("可装机号_GE296")  = False And gbr.isnull("可装机号_BKS")
    gbr("订单序号") = ger("订单序号")
Elseif gbr.isnull("可装机号_GE296") And gbr.isnull("可装机号_BKS")
gbr("订单序号") = Nothing           '刚补上的
End If

 
[此贴子已经被作者于2010-7-29 13:52:33编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
mr725
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：MVP荣誉狐 帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00 		  发帖心情 Post By：2010/7/29 13:43:00 [只看该作者]

你从剩余数量与订单序号的关系让人难与理解, 因为剩余数量=0时，订单序号还有数据,叫人发蒙啊~   所以楼上换个角度来计算 订单序号 的值,可能更好些吧......

 回到顶部
总数 17 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 6 次数据查询