Foxtable(狐表)用户栏目专家坐堂 → 条件合计


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

主题:条件合计

帅哥哟,离线,有人找我吗?
hopestarxia
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:924 积分:6639 威望:0 精华:0 注册:2013/8/10 18:33:00
条件合计  发帖心情 Post By:2020/12/28 11:48:00 [只看该作者]

Dim t1 As Table = e.form.Controls("Table1").Table

Dim dr As Row = Tables("主表_Table1").Rows(1)'引用第二行
dr("N1") = t1.Compute("Sum(sdje)")   想在此加条件,比如说t1表中 的所有数据行中 A列 的值 = "调整值" 字符的,才参与合计。请问老师此处怎么处理?


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107648 积分:547549 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/28 11:52:00 [只看该作者]

dr("N1") = t1.Compute("Sum(sdje)","A列='调整值'")

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


加好友 发短信
等级:四尾狐 帖子:924 积分:6639 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2020/12/28 12:09:00 [只看该作者]

谢谢老师!

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


加好友 发短信
等级:四尾狐 帖子:924 积分:6639 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2020/12/28 13:08:00 [只看该作者]

老师,调整后代码报错:请老师看看。
Dim t1 As Table = e.form.Controls("Table1").Table

Dim t As Table = Forms("主表").Controls("Table1").Table
For Each r As Row In t.Rows
r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = r("name")")  本句的条件我是想写成主表T的行的lrje列值 等于当前窗口表的NI列合计,合计的条件是T1表的 内容例 NEWTYPE 的值等于 主表对应的合计行的项目名字(r("name")) ,结果这样写条件报错了,提示“编辑去看一看:应为逗 号、”)“或有效的表大家式继续 符,错误代码 :r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = r("name")")   ”   
Next

请问老师条件处应如何修改。



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


加好友 发短信
等级:四尾狐 帖子:924 积分:6639 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2020/12/28 13:10:00 [只看该作者]

老师,调整后代码报错:请老师看看。
Dim t1 As Table = e.form.Controls("Table1").Table

Dim t As Table = Forms("主表").Controls("Table1").Table
For Each r As Row In t.Rows
r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = r("name")")  本句的条件我是想写成主表T的行的lrje列值 等于当前窗口表的NI列合计,合计的条件是T1表的 内容例 NEWTYPE 的值等于 主表对应的合计行的项目名字(r("name")) ,结果这样写条件报错了,提示“编辑去看一看:应为逗 号、”)“或有效的表大家式继续 符,错误代码 :r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = r("name")")   ”   
Next

请问老师条件处应如何修改。

条件改为为了单引号的也是不行的  
r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = 'r(name)' ")  (不报错不起作用条件)
                                             r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = 'r("name")' ")  报前面相同错误 

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107648 积分:547549 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/28 13:43:00 [只看该作者]

先看几遍:http://www.foxtable.com/webhelp/topics/1284.htm

r("lrje") =  t1.Compute("Sum(N1)","NEWTYPE = '" & r("name") & "'")

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


加好友 发短信
等级:四尾狐 帖子:924 积分:6639 威望:0 精华:0 注册:2013/8/10 18:33:00
  发帖心情 Post By:2020/12/28 13:48:00 [只看该作者]

谢谢老师,这个用过,我一直以为这个只是要带到SQL语句里才用到 '"&    &"',   谢谢老师。

 回到顶部