以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助大佬,谢谢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=127469)

--  作者:ezilu
--  发布时间:2018/11/14 21:19:00
--  求助大佬,谢谢
Dim wjz As Integer = DataTables("患者信息").Compute("Sum(IIF(Rows(是否结账).Checked = True),1,0)")
If wjz <> 0 Then
    Dim Result As DialogResult
    Result = MessageBox.Show("系统检测到到未结账数 " & wjz & " 个,请处理", "系统提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning)
End If

请问红色部分这样写 为什么是错误的 应该怎么写 谢谢麻烦了
(是否结账) 是 一个逻辑列  true 代表已经结账  
想统计未结账的个数

[此贴子已经被作者于2018/11/14 21:19:56编辑过]

--  作者:有点甜
--  发布时间:2018/11/14 21:28:00
--  

1、可以这样写

 

Dim wjz As Integer = DataTables("患者信息").sqlCompute("Sum(IIF(是否结账 = True,1,0)")

 

2、可以改成

 

Dim wjz As Integer = DataTables("患者信息").Compute("count(是否结账)", "是否结账 = true")

 


--  作者:ezilu
--  发布时间:2018/11/14 23:38:00
--  
谢谢班主,去测试看看图片点击可在新窗口打开查看