Foxtable(狐表)用户栏目专家坐堂 → 代码不执行


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

主题:代码不执行

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


加好友 发短信
等级:幼狐 帖子:129 积分:1033 威望:0 精华:0 注册:2020/6/28 13:58:00
代码不执行  发帖心情 Post By:2021/5/12 11:24:00 [只看该作者]

1钢板入库页数 钢板出库页数 自动汇总到钢板仓库中怎么代码不执行呢


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

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

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

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 11:38:00 [只看该作者]

上面3段代码分别是哪个表的?另外把代码文字发上来

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


加好友 发短信
等级:幼狐 帖子:129 积分:1033 威望:0 精华:0 注册:2020/6/28 13:58:00
  发帖心情 Post By:2021/5/12 13:25:00 [只看该作者]

钢板库存表
图片点击可在新窗口打开查看此主题相关图片如下:0001.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:幼狐 帖子:129 积分:1033 威望:0 精华:0 注册:2020/6/28 13:58:00
  发帖心情 Post By:2021/5/12 13:25:00 [只看该作者]

钢板入库


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

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


加好友 发短信
等级:幼狐 帖子:129 积分:1033 威望:0 精华:0 注册:2020/6/28 13:58:00
  发帖心情 Post By:2021/5/12 13:27:00 [只看该作者]

数控下料表


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

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


加好友 发短信
等级:超级版主 帖子:107147 积分:544978 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 14:07:00 [只看该作者]

钢板入库和数控下料表改为这种方式,重置库存表列计算

Select Case e.DataCol.Name
    Case
 "数量","单价","折扣"
        
Dim pr As DataRow
        pr = 
DataTables("统计").Find("产品 = '" & e.DataRow("产品") & "'")
        If
 pr IsNot Nothing Then
            DataTables
("统计").DataCols("产品").RaiseDataColChanged(pr)
        End
 If
End
 Select

 回到顶部