以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  计数的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43871)

--  作者:sugus
--  发布时间:2013/12/17 22:32:00
--  计数的问题
各位大大~~~我有个表1,有两列A,B 能否能实现统计计数A列的值出现的次数,并把值赋给同行的B列,比如说
A      B
QQ    2
QQ    2
bb     3
bb     3  
bb     3
代码改怎么写呢 
[此贴子已经被作者于2013-12-17 22:36:09编辑过]

--  作者:有点甜
--  发布时间:2013/12/17 22:58:00
--  
 做一个按钮,这样写代码

For Each dr As DataRow In DataTables("表A").datarows
    dr("B") = DataTables("表A").Compute("count(_Identify)", "A = \'" & dr("A") & "\'")
Next

--  作者:sugus
--  发布时间:2013/12/17 23:03:00
--  
谢谢哈,那么不用按钮,能在事件中添加代码实现自动计算么
--  作者:有点甜
--  发布时间:2013/12/17 23:13:00
--  
 比如,datacolchanged事件,写代码

If e.DataCol.name = "A" Then
    e.DataRow("B") = DataTables("表A").Compute("count(_Identify)", "A = \'" & e.DataRow("A") & "\'")
End If
[此贴子已经被作者于2013-12-17 23:15:01编辑过]

--  作者:sugus
--  发布时间:2013/12/17 23:24:00
--  
好像不好使啊图片点击可在新窗口打开查看
--  作者:sugus
--  发布时间:2013/12/17 23:36:00
--  
好了 谢谢哈 解决了呢图片点击可在新窗口打开查看