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