Foxtable(狐表)用户栏目专家坐堂 → [求助]多条件统计


  共有75人关注过本帖树形打印复制链接

主题:[求助]多条件统计

帅哥,在线噢!
苏州老街
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:837 积分:5332 威望:0 精华:0 注册:2016/10/19 16:45:00
[求助]多条件统计  发帖心情 Post By:2025/3/30 16:25:00 [只看该作者]

老师好,我想在“房屋主体”后面再加一个统计条件“单间名称”


If e.DataCol.name = "年" OrElse e.DataCol.name = "房屋主体" Then
    If e.DataRow.Isnull("年") = False AndAlso e.DataRow.Isnull("房屋主体") = False Then
        Dim filter1 As String = "名称_房屋主体 = '" & e.DataRow("房屋主体") & "'"
        For i As Integer = 1 To 12
            Dim d As Date = new Date(val(e.DataRow("年")), i, 1)
            Dim sum As Integer = DataTables("租房数据汇总").compute("sum(累计缴费)", filter1 & " and 抄表日期 >= #" & d & "# and 抄表日期 < #" & d.addmonths(1) & "#")

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113159 积分:576218 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/30 20:47:00 [只看该作者]

用法不都一样吗,使用and连接多个条件即可:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=196048&skin=0

 回到顶部
帅哥,在线噢!
苏州老街
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:837 积分:5332 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/31 4:44:00 [只看该作者]

老师,这个统计条件“单间名称”要加到下面代码中吗?

If e.DataCol.name = "年" OrElse e.DataCol.name = "房屋主体" Then
    If e.DataRow.Isnull("年") = False AndAlso e.DataRow.Isnull("房屋主体") = False Then
        Dim filter1 As String = "名称_房屋主体 = '" & e.DataRow("房屋主体") & "'"

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113159 积分:576218 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/31 8:40:00 [只看该作者]

要加

 回到顶部
帅哥,在线噢!
苏州老街
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:837 积分:5332 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/31 13:55:00 [只看该作者]

老师,没有改好,标出的是原来的代码,没标出的代码该不好。

'If e.DataCol.name = "年" OrElse e.DataCol.name = "单间名称" Then
    'If e.DataRow.Isnull("年") = False AndAlso e.DataRow.Isnull("单间名称") = False Then
        'Dim filter1 As String = "名称_单间名称 = '" & e.DataRow("单间名称") & "'"


If e.DataCol.name = "年" OrElse e.DataCol.name = "房屋主体"  OrElse e.DataCol.name = "单间名称" Then
    If e.DataRow.Isnull("年") = False AndAlso e.DataRow.Isnull("房屋主体") AndAlso e.DataRow.Isnull("单间名称") = False Then
        Dim filter1 As String = "名称_房屋主体 = '" & e.DataRow("房屋主体") And "名称_单间名称 = '" & e.DataRow("单间名称") & "'"


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113159 积分:576218 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/31 14:02:00 [只看该作者]

.....e.DataRow("房屋主体") And 名称_单间 ...

 回到顶部
帅哥,在线噢!
苏州老街
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:837 积分:5332 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/31 14:19:00 [只看该作者]

老师,是这个地方面


 Dim filter1 As String = "名称_房屋主体 = '" & e.DataRow("房屋主体") And "名称_单间名称 = '" & e.DataRow("单间名称") & "'"


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113159 积分:576218 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/31 14:21:00 [只看该作者]

多个双引号

 回到顶部
帅哥,在线噢!
苏州老街
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:837 积分:5332 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2025/3/31 14:28:00 [只看该作者]

老师,去掉双引号报错

图片点击可在新窗口打开查看此主题相关图片如下:2025-03-17 12 19 54.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113159 积分:576218 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/3/31 14:30:00 [只看该作者]

Dim filter1 As String = "名称_房屋主体 = '" & e.DataRow("房屋主体") & "' And 名称_单间名称 = '" & e.DataRow("单间名称") & "'"

 回到顶部
总数 17 1 2 下一页