| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 条件合计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159491) |
| -- 作者：hopestarxia -- 发布时间：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列 的值 = "调整值" 字符的，才参与合计。请问老师此处怎么处理？ |
| -- 作者：有点蓝 -- 发布时间：2020/12/28 11:52:00 -- dr("N1") = t1.Compute("Sum(sdje)","A列=\'调整值\'") |
| -- 作者：hopestarxia -- 发布时间：2020/12/28 12:09:00 -- 谢谢老师！ |
| -- 作者：hopestarxia -- 发布时间：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 -- 发布时间：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")\' ") 报前面相同错误
|
| -- 作者：有点蓝 -- 发布时间：2020/12/28 13:43:00 -- 先看几遍：http://www.foxtable.com/webhelp/topics/1284.htm r("lrje") = t1.Compute("Sum(N1)","NEWTYPE = \'" & r("name") & "\'")
|
| -- 作者：hopestarxia -- 发布时间：2020/12/28 13:48:00 -- 谢谢老师，这个用过，我一直以为这个只是要带到SQL语句里才用到 \'"& &"\', 谢谢老师。 |