主题：[求助]公式原理

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,数割","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","数割", ">" ,0) And EvalFor(GridName,"工序名称","""数割""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,大剪","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","大剪", ">" ,0) And EvalFor(GridName,"工序名称","""大剪""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,小剪","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","小剪", ">" ,0) And EvalFor(GridName,"工序名称","""小剪""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,仿割","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","仿割", ">" ,0) And EvalFor(GridName,"工序名称","""仿割""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,直割","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","直割", ">" ,0) And EvalFor(GridName,"工序名称","""直割""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,型切","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","型切", ">" ,0) And EvalFor(GridName,"工序名称","""型切""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,锯切","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","锯切", ">" ,0) And EvalFor(GridName,"工序名称","""锯切""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,剪地边条","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","剪地边条", ">" ,0) And EvalFor(GridName,"工序名称","""剪地边条""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,校平","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","校平", ">" ,0) And EvalFor(GridName,"工序名称","""校平""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,坡口","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","坡口", ">" ,0) And EvalFor(GridName,"工序名称","""坡口""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,组焊","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","组焊", ">" ,0) And EvalFor(GridName,"工序名称","""组焊""","工序名称","=","") And

AppendFor("下料","产品代码,产品名称,零部件图号,零部件名称,单台数量,折压","产品代码,产品名称,零部件图号,零部件名称,单台数量,工价","折压", ">" ,0) And EvalFor(GridName,"工序名称","""折压""","工序名称","=","")

http://www.egrid2000.com/dvbbs/dispbbs.asp?boardid=3&Id=159&page=4

 

AppendFor("下料","-------,数割","-------","数割", ">" ,0) And EvalFor(GridName,"工序名称","""数割""","工序名称","=","") And

AppendFor("下料","-------,大剪","-------","大剪", ">" ,0) And EvalFor(GridName,"工序名称","""大剪""","工序名称","=","") And

AppendFor("下料","-------,小剪","-------","小剪", ">" ,0) And EvalFor(GridName,"工序名称","""小剪""","工序名称","=","") And

变量%XL%：

"数割|大剪|小剪|仿割|直割|型切|锯切|剪地边条|校平|坡口|组焊|折压"

需要一翻三的通用公式：

一翻三("A|B|C"→"A@A#A|B@B#B|C@C#C")
公式：Eval("Substitute(""|@|#|"",""|"","""+Substitute("A|B|C","|",""")+""|""+Substitute(""|@|#|"",""|"",""")+""")")
结果：A@A#A|B@B#B|C@C#C

想学习Eval公式，必须理解下面的通用公式：

 

一翻二("A|B|C"→"A@A|B@B|C@C")
公式：Eval("Substitute(""|@|"",""|"","""+Substitute("A|B|C","|",""")+""|""+Substitute(""|@|"",""|"",""")+""")")
结果：A@A|B@B|C@C
 
一翻三("A|B|C"→"A@A#A|B@B#B|C@C#C")
公式：Eval("Substitute(""|@|#|"",""|"","""+Substitute("A|B|C","|",""")+""|""+Substitute(""|@|#|"",""|"",""")+""")")
结果：A@A#A|B@B#B|C@C#C
 
一翻四("A|B|C"→"A@A#A&A|B@B#B&B|C@C#C&C")
公式：Eval("Substitute(""|@|#|&|"",""|"","""+Substitute("A|B|C","|",""")+""|""+Substitute(""|@|#|&|"",""|"",""")+""")")
结果：A@A#A&A|B@B#B&B|C@C#C&C
------------
一翻六--------
公式：Eval("Substitute(""|@|#|$|%|&|"",""|"","""+Substitute("A|B|C|D","|",""")+""|""+Substitute(""|@|#|$|%|&|"",""|"",""")+""")")