- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何计算和填充总行数 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=149494)
-- 发布时间：2020/5/4 14:14:00
-- 如何计算和填充总行数
计算总数，错在什么地方
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目38 (1).table |
-- 发布时间：2020/5/4 14:26:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目147.table |
-- 发布时间：2020/5/4 14:39:00
--
酸哥哥，您的版本高，我打不开，代码复制上来吧
-- 发布时间：2020/5/4 14:45:00
--
代码错在哪里？
Dim t1 As Table = e.Form.Controls("Table2").Table
For Each r As Row In t1.Rows
r("总数量") = r.DataRow.GetChildRows("产品编号").Count
Next
-- 发布时间：2020/5/4 14:57:00
--
GetChildRows必须是已经建立关联的时候才能用，
你是模拟关联，只能用Compute:
-- 发布时间：2020/5/4 16:01:00
--
酸哥哥，求您把代码复制一下吧，搞不定
-- 发布时间：2020/5/4 19:14:00
--
Dim t1 As Table = e.Form.Controls("Table2").Table
For Each r As Row In t1.Rows
r("总数量") = DataTables("订单表").Compute("Count(_Identify)", "[产品编号] = \'" & r("产品编号") & "\'")
Next