- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求助: 按复选框选中状态和字段条件值求记录数?(已解决） (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=39374)
-- 发布时间：2013/8/22 21:20:00
-- 求助: 按复选框选中状态和字段条件值求记录数?(已解决）
此主题相关图片如下：未命名1.jpg
按钮代码如下:
For Each r As Row In Tables("表A").GetCheckedRows
Dim Sum As Double
Sum = Tables("表A").Compute("Count(状态)", r("状态")="新建")
MessageBox.Show(Sum)
Next
我想要的结果是2,不是4
我想求出表格内[状态]字段为"新建"而且复选框为选中状态的记录数,求老师帮忙?
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:按条件求记录值.table |
[此贴子已经被作者于2013-9-26 20:08:10编辑过]
-- 发布时间：2013/8/22 21:30:00
--
如下代码
Dim count As Integer = 0
For Each r As Row In Tables("表A").GetCheckedRows
If r.Checked AndAlso r("状态") = "新建" Then
count += 1
End If
Next
msgbox(count)
-- 发布时间：2013/8/22 21:37:00
--
这样效率很低的，增加一个逻辑列来替代复选框列吧
-- 发布时间：2013/8/22 21:44:00
--
捉摸了一个晚上没弄出来，谢谢二楼老师指导！
-- 发布时间：2013/8/22 22:03:00
--
代码的第一个判断是不需要的……
Dim count As Integer = 0 For Each r As Row In Tables("表A").GetCheckedRows If r("状态") = "新建" Then count += 1 End If Next msgbox(count) |