以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期编号异常  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140032)

--  作者:zhangning
--  发布时间:2019/8/28 8:52:00
--  日期编号异常
老师,早上好!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产管理2018 - 副本.rar

在“加工排产”表中,”第1序_加工日期编号”和“指令单”列需要显示出来,
但没有显示,看不出来哪儿错了,请老师帮看看呗

--  作者:zhangning
--  发布时间:2019/8/28 8:53:00
--  
密码是  qdkf


--  作者:有点蓝
--  发布时间:2019/8/28 9:45:00
--  
没有问题呀,可以显示

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


--  作者:zhangning
--  发布时间:2019/8/28 9:58:00
--  
老师,是希望下边的各行的内容显示出来呢

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


--  作者:有点蓝
--  发布时间:2019/8/28 10:28:00
--  
这2段代码的原因

    Dim fdr As DataRow = e.DataTable.Find("等级号 = \'" & e.DataRow("等级号") & "\' and 类别 = \'计划\' ")
    If fdr IsNot Nothing Then
        fdr("第1序_加工日期编号") = e.DataRow("第1序_加工日期编号")
    End If

Dim fdr1 As DataRow = e.DataTable.Find("等级号 = \'" & e.DataRow("等级号") & "\' and 类别 = \'计划\'")
If fdr1 IsNot Nothing Then
    fdr1("指令单") = e.DataRow("指令单")
End If

没看懂业务逻辑,我也不懂改

--  作者:zhangning
--  发布时间:2019/8/28 12:10:00
--  
解决了,谢谢老师