以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  按条件统计 记录条数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72917)
--  作者：supwork
--  发布时间：2015/8/8 17:11:00
--  按条件统计 记录条数

统计 当前 TABLE表TB 的 多选列为TRUE的行数的最简代码 如何 写
--  作者：有点蓝
--  发布时间：2015/8/8 17:19:00
--  
http://www.foxtable.com/help/index.html?n=1776.htm
--  作者：supwork
--  发布时间：2015/8/8 17:23:00
--  

Dim n As Integer=e.Table.GetCheckedRows.count
If _addwr=0 And n=2 Then
    MessageBox.show("修改物品只能单选!","提示",MessageBoxButtons.OK,MessageBoxIcon.Warning)
    e.Row.Checked  = False
End If

 

 

这个方法已会用了，问题是我没有使用系统提供的复选框，那样就没有行号了

 

为了有行号，我另加了一个 逻辑 选择列。这个逻辑 选择列就是，多选列

 
--  作者：有点蓝
--  发布时间：2015/8/8 17:28:00
--  
Dim s As String = "[逻辑列] = 1"
Tables("表A").Filter = s
--  作者：大红袍
--  发布时间：2015/8/9 11:19:00
--  

汗？直接统计也不会？

 

http://www.foxtable.com/help/topics/0393.htm