Foxtable(狐表)用户栏目专家坐堂 → 帮忙看下代码吧?


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

主题:帮忙看下代码吧?

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


加好友 发短信
等级:三尾狐 帖子:713 积分:5196 威望:0 精华:0 注册:2012/4/13 13:10:00
帮忙看下代码吧?  发帖心情 Post By:2012/11/30 10:57:00 [只看该作者]

Select Case e.DataCol.name
    Case "工艺状态","粗车计划完成日","钳工热焊计划完成日","外协计划完成日","精车计划完成日","采购计划完成日","设计图计划完成日"
        Dim dr As DataRow = e.DataRow
        If dr("工艺状态") = "原材料" Or dr("工艺状态") = "外购毛坯" Then
            Dim dx As Row = Tables("生产明细表").Filter = "[项目编号] = '" & Tables("生产项目表").current("项目编号")& "'"
            If math.max(dx("粗车计划完成日"),dx("钳工热焊计划完成日"),dx("外协计划完成日"),dx("精车计划完成日")) = "无" Then
                dr("装配入库计划开始日") = "缺值"
            Else
                dr("装配入库计划开始日") = math.max(dx("采购计划完成日"),dx("粗车计划完成日"),dx("钳工热焊计划完成日"),dx("外协计划完成日"),dx("精车计划完成日"))
            End If
        Else
            If dr("工艺状态") = "外购成品" Or dr("工艺状态") = "库存成品" Then
                dr("装配入库计划开始日") = dr("设计图计划完成日")
            End If
        End If
End Select

请帮忙看下 谢谢了~~自己弄了好久弄不来了~~

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/30 12:35:00 [只看该作者]

 不知道你想实现什么,也不知道你报什么错误……估计是这句代码写错了。

If math.max(dx("粗车计划完成日"),dx("钳工热焊计划完成日"),dx("外协计划完成日"),dx("精车计划完成日")) = "无" Then

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


加好友 发短信
等级:三尾狐 帖子:713 积分:5196 威望:0 精华:0 注册:2012/4/13 13:10:00
  发帖心情 Post By:2012/11/30 12:46:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20121130124026.png
图片点击可在新窗口打开查看
这个是找出指定列里面的最大值

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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/11/30 14:26:00 [只看该作者]

日期没有办法用math.max,另外写代码判断出那个日期最大


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


加好友 发短信
等级:三尾狐 帖子:713 积分:5196 威望:0 精华:0 注册:2012/4/13 13:10:00
  发帖心情 Post By:2012/11/30 15:10:00 [只看该作者]

不知道该如何判断日期~~请教下狐爸~图片点击可在新窗口打开查看

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/30 15:17:00 [只看该作者]

 把你这个表的数据上传上来。 看不懂你代码的逻辑。

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


加好友 发短信
等级:三尾狐 帖子:713 积分:5196 威望:0 精华:0 注册:2012/4/13 13:10:00
  发帖心情 Post By:2012/11/30 15:23:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:test.foxdb

帮忙看下,在datacolchanged里

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/30 15:25:00 [只看该作者]

 数据源呢?

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


加好友 发短信
等级:三尾狐 帖子:713 积分:5196 威望:0 精华:0 注册:2012/4/13 13:10:00
  发帖心情 Post By:2012/11/30 15:29:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:db.rar

 抱歉 ~忘记了 ~~~

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/11/30 15:41:00 [只看该作者]

 If math.max(dx("粗车计划完成日"),dx("钳工热焊计划完成日"),dx("外协计划完成日"),dx("精车计划完成日")) = "无" Then

这句代码你想实现的内容是什么?怎么处理日期是 无 的情况?

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