[浏览完整版]
标题：分类统计的代码，，怎么编写，，，，
1楼
jackshen888 发表于：2011/7/4 20:00:00我现在有二个表，，，我想分类统计怎么写代码。。。如图
原始表
要求达到表的效果，，，
分别把B表中的数据分类，，（颜色，，加工工艺1，加工工艺2.。。。。。。。。）等数量自动填入，，，
在以前易表里有个SUMFOR，，，，但在FOXTABLE里没有，，，
有没有高人帮一下忙了，，，
附文件
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
[此贴子已经被作者于2011-7-4 20:02:55编辑过]
2楼
hhbb 发表于：2011/7/4 20:16:00订单号001有红色,白色,蓝色三种颜色,在A 表生成3行数据还是1行?
3楼
jackshen888 发表于：2011/7/4 22:09:00要求生成三行
4楼
czy 发表于：2011/7/4 23:08:00你得让大家看到你的图呀。
5楼
hhbb 发表于：2011/7/4 23:16:00在窗口中显示成不?
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 = "订单号"
[此贴子已经被作者于2011-7-5 9:15:20编辑过]
6楼
jackshen888 发表于：2011/7/5 11:28:00不行呀，，，提示有错误呀，，，
7楼
hhbb 发表于：2011/7/5 11:39:00以下是引用jackshen888在2011-7-5 11:28:00的发言：
不行呀，，，提示有错误呀，，，
不行呀，，，提示有错误呀，，，
有何錯誤?你應該先建[窗口1]---再插入[Table1]--再設一按鈕,代碼如上
8楼
狐狸爸爸 发表于：2011/7/5 11:46:00| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目105.table |
9楼
jackshen888 发表于：2011/7/5 12:15:00行了哦，，谢谢hhbb和狐狸爸爸。。。。
10楼
jackshen888 发表于：2011/7/5 22:50:00狐狸爸爸，，你设计的还有一个问题，，就是只有一个111订单号的参加计算限，，其它的订单号怎么操作？？