主题：如何用一列显示某列内容出现的次数？

Select e.Col.name
    Case "第一列"
        e.Row("第二列") =Format(e.Table.Compute("Count(第一列)","[第一列] = '" & e.Row("第一列")  & "'"),"000")
End Select

  我用在AfterEdit设置上面的代码，虽然按重置不会重新计算，但当再次编辑第一列时第二列的内容还会计算，我想无论什么情况下第二列都只是显第一列出现的次序，用来编码，不知道有什么方法可以实现，以前在易表就用一个函数countif就搞定了。