统计集合中元素的个数问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 统计集合中元素的个数问题

共有3353人关注过本帖树形打印复制链接主题：统计集合中元素的个数问题

zstk7333

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：328 积分：2960 威望：0 精华：0 注册：2011/5/3 20:21:00

统计集合中元素的个数问题 发帖心情

Post By：2014/5/5 22:43:00 [只看该作者]

在一个集合中有N个元素，我想统计一下在这N个元素中有多少个不同的元素分别出现了几次，该如何编程，谢谢！

例如：

集合中有：1，1,1,2,1,4，3,2,1

我想统计出有5个1，2个2，1个3,1个4。

[此贴子已经被作者于2014-5-5 22:47:22编辑过]

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/5/5 22:56:00 [只看该作者]

对应代码

Dim ls As New List(Of Integer)
ls.Add(1)
ls.Add(2)
ls.Add(3)
ls.Add(1)
ls.Add(2)
ls.Add(1)
ls.Add(5)

Dim dis As New Dictionary(Of Integer, Integer)
For Each i As Integer In ls
    If dis.ContainsKey(i) = False Then
        dis.Add(i, 1)
    Else
        dis(i) += 1
    End If
Next

For Each key As Integer In dis.Keys
output.show(key & ":" & dis(key))
Next

zstk7333

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：328 积分：2960 威望：0 精华：0 注册：2011/5/3 20:21:00

回复：（有点甜）对应代码 ?Dim ls As New L... 发帖心情

Post By：2014/5/5 23:04:00 [只看该作者]

如果我的集合是从tables里取的不重复值

[此贴子已经被作者于2014-5-5 23:07:44编辑过]

y2287958

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：狐神帖子：4633 积分：33809 威望：0 精华：0 注册：2008/8/31 22:44:00

Post By：2014/5/6 6:06:00 [只看该作者]

用GetValues和Compute

lsy

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：5246 积分：33163 威望：0 精华：8 注册：2013/1/17 21:28:00

Post By：2014/5/6 8:18:00 [只看该作者]

Dim lst As New List(Of String)
Dim lst1 As New List(Of String)
For Each r As Row In Tables("表B").Rows
    lst.Add(r("第一列"))
    If lst1.Contains(r("第一列")) = False Then
        lst1.Add(r("第一列"))
    End If
Next
For i As Integer = 0 To lst1.Count - 1
    Output.Show(lst1(i) & " : " & Functions.Execute("字符串个数",String.Join(",", lst.ToArray), lst1(i)))
Next

有点甜

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/5/6 9:17:00 [只看该作者]

以下是引用zstk7333在2014-5-5 23:04:00的发言：

如果我的集合是从tables里取的不重复值

[此贴子已经被作者于2014-5-5 23:07:44编辑过]

什么意思？直接说，要想实现table的什么功能？

最好有例子说明

下一主题 >> << 上一主题

主题：统计集合中元素的个数问题