Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何实现跨表的表达式列


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

主题：[求助]如何实现跨表的表达式列
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 10:46:00 [显示全部帖子]


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


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 11:20:00 [显示全部帖子]

Sum(Child(合同_价格).金额)肯定是可以的，应该是价格表没有这个合同编号的数据

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 13:30:00 [显示全部帖子]


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


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 14:10:00 [显示全部帖子]

再判断第一个列的值

msgbox(r("第一个列"))
if r("第一个列") like “专业*” then

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 16:12:00 [显示全部帖子]

正常项目就是专业的上一行

            Else'如果是专业分组行
                Dim f As String =  "专业 = '" & r("合同编号") & "' and 项目编号 = '" & t.Rows(i-1,True)("合同编号") & "'" 

Count(日期)为0说明没有符合条件的数据，或者日期列没有值。
Output.Show(i & "  " & r("合同编号"))显示什么内容？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 16:41:00 [显示全部帖子]

做些虚拟的测试数据，使用下面代码汇总后，截图整个表的数据发上来看看。最好是做个例子发上来，不要浪费那么多时间来回扯

   Dim t As Table = Tables("合同表")
    t.GroupAboveData = True '分组行位于数据行之上
    t.TreeVisible = True '显示目录树
    Dim g As Subtotalgroup
    t.SubtotalGroups.Clear()
    g = New Subtotalgroup
    g.GroupOn = "专业"
    g.TotalOn = "合同额"
    t.SubtotalGroups.Add(g)
    g = New Subtotalgroup
    g.GroupOn = "项目编号"
    g.TotalOn = "合同额"
    g.Caption = "{0}"
    t.SubtotalGroups.Add(g)
    t.Subtotal()
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107135 积分：544918 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/9/1 20:49:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 6 次数据查询