主题：分类统计的代码，，怎么编写，，，，

 

 

 

分别把B表中的数据分类，，（颜色，，加工工艺1，加工工艺2.。。。。。。。。）等数量自动填入，，，

在以前易表里有个SUMFOR，，，，但在FOXTABLE里没有，，，

有没有高人帮一下忙了，，，

Dim t As Table 

Dim s1,s2  As String

Dim Ls As List(Of String)

Ls = DataTables("b").GetUniqueValues("", "加工工艺")

For Each s1 In Ls

    s2+ =",iif(加工工艺 = '" & s1 & "'" & ",数量 ,Null) as 加工工艺_" & s1.Replace("号工艺","")

Next

t = Tables("窗口1_Table1")

t.FILL("Select [_Identify],订单号,颜色" & s2 & ",数量 as 订单数量 From{B}",True)

t.sort = "订单号"