以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何统计出不重复的行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77269)

--  作者:huhu
--  发布时间:2015/11/14 18:40:00
--  [求助]如何统计出不重复的行
Dim cpxhhj As WinForm.Button = e.Form.Controls("产品型号合计")
Dim sum1 As Integer
sum1 = DataTables("库存明细表").Compute("count(产品编码)")
cpxhhj.text = "产品型号合计:(" & sum1 & ")"






这样统计出来的是所有的行数,希望统计出不重复的行(重复的产品编码算一行)

--  作者:y2287958
--  发布时间:2015/11/14 23:25:00
--  
http://www.foxtable.com/help/topics/2747.htm
--  作者:大红袍
--  发布时间:2015/11/15 10:38:00
--  
Dim cpxhhj As WinForm.Button = e.Form.Controls("产品型号合计")
Dim sum1 As Integer
sum1 = DataTables("库存明细表").GetValues("产品编码").Count
cpxhhj.text = "产品型号合计:(" & sum1 & ")"