[求助]多条件计算 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师好！

请教一下，关于目录树计算显示表符合条件的行数

计算代码：

tr.text = "所有生产单(" & DataTables("看板生产单").SQLCompute("count(归属部门)") & ")"

需求： ''需要计算《看板生产单》表 "归属部门" 列包含《权限管理》表 "可查看哪些部门数据"列里面包含的 '部门'(多值字段)

Else

If tr.name = "false" Then

tr.text = "未结单(" & DataTables("看板生产单").SQLCompute("count(归属部门)","生产进度 = 0") & ")"

需求： ''需要增加条件计算《看板生产单》表 "归属部门" 列包含《权限管理》表 "可查看哪些部门数据"列里面包含的 '部门'(多值字段)

ElseIf tr.name = "true" Then

tr.text = "已结单(" & DataTables("看板生产单").SQLCompute("count(归属部门)","生产进度 = 1") & ")"

需求： ''需要增加条件计算《看板生产单》表 "归属部门" 列包含《权限管理》表 "可查看哪些部门数据"列里面包含的 '部门'(多值字段)

按钮全部代码：

下载信息 [文件大小：下载次数： ]
点击浏览该文件:目录树条件计算.txt

谢谢老师！

《看板生产单》表 "归属部门" 列是多值字段？还是《权限管理》表 "可查看哪些部门数据"列是多值字段？如果起其中一个是多值字段可以处理；如果2个都是，没有办法在这里使用表达式条件处理

谢谢蓝老师，是《权限管理》表 "可查看哪些部门数据"列是多值字段（多选的列名，中间间隔符号，），《看板生产单》表 "归属部门" 列是正常的字段

此主题相关图片如下：表区分.png

[此贴子已经被作者于2021/10/4 20:32:20编辑过]

要使用sql处理:http://www.foxtable.com/webhelp/topics/0696.htm

dim sql as string = "select count(归属部门) from 看板生产单 where 生产进度 = 0 and exists (select * from 权限管理 as a where ',' + a.可查看哪些部门数据 + ',' like '%,' + [归属部门] + ',%' 用户名 ='" & _UserName & "' and 表名 = '看板生产单')"

Dim val As Integer
Dim cmd As New SQLCommand
cmd.ConnectionName = "数据源名称"
cmd.CommandText = sql
val = cmd.ExecuteScalar()

msgbox（val）

主题：[求助]多条件计算