以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  咨询函数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190053)

--  作者:divil
--  发布时间:2024/1/13 16:56:00
--  咨询函数
版主,您好!有函数功能需要请您指导,具体见附件图片,谢谢!
图片点击可在新窗口打开查看此主题相关图片如下:程序咨询说明.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2024/1/13 18:03:00
--  
Select Case e.DataCol.Name
    Case
 "产线名称","客户名称",
"简写型号规格"
        
Dim dr As DataRow = e.DataRow
            If dr.IsNull("客户物料") andalso dr("简写型号规格") = "OCF" andalso dr("产线名称") = "滤波器" andalso dr("客户名称") = "出口中性" Then
                dr(
"客户物料") = pr("物料")
            End
 
If
End
 Select
--  作者:divil
--  发布时间:2024/1/13 18:22:00
--  
版主,您好。咨询信息见附件,谢谢!
图片点击可在新窗口打开查看此主题相关图片如下:咨询图片.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2024/1/14 19:10:00
--  
dr("客户物料") = pr("物料")
改为
dr("客户物料") = dr("物料")

--  作者:divil
--  发布时间:2024/1/15 9:40:00
--  
版主,您好!已经搞定,谢谢您。