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


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

主题：[求助]关于统计
帅哥哟，离线，有人找我吗？
kni4444
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：10 积分：161 威望：0 精华：0 注册：2016/9/28 19:52:00 		[求助]关于统计  发帖心情 Post By：2016/9/30 22:41:00 [只看该作者]

Select Case e.DataCol.Name
    Case "啊","把"
        For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey"))
            Dim Val3 As Double = e.DataTable.Compute("Sum(啊)","[_SortKey] <= " & dr("_SortKey"))
            Dim Val4 As Double = e.DataTable.Compute("Sum(把)","[_SortKey] <= " & dr("_SortKey"))
            dr("陈") = Val3 + Val4
        Next
End Select

这段代码中如果“啊”和“把”列是表达式列这段代码怎么改才可以使用？
现在的问题是我写下了这段代码中的“啊”和“把”列是表达式列，所以“陈”这一列无法出现计算结果。
其中这三列都是一样的整数属性。
其中“啊”的表达式为，IsNull([规格],0) * IsNull([数量件],0) + IsNull([捆重量],0)
[此贴子已经被作者于2016/10/1 1:04:57编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2016/10/1 8:44:00 [只看该作者]


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


加好友 发短信
等级：婴狐 帖子：10 积分：161 威望：0 精华：0 注册：2016/9/28 19:52:00 		[求助]  发帖心情 Post By：2016/10/1 14:24:00 [只看该作者]

可否帮我编辑一下这样的代码，我刚接触什么都不会。
 现在是这样一个情况
Select Case e.DataCol.Name
    Case "D"
        For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey"))
            Dim Val1 As Double = e.DataTable.Compute("Sum(C)","[_SortKey] <= " & dr("_SortKey"))
            dr("E") = Val1
        Next
End Select


现在的问题是我写下了这段代码中的“D”是表达式列，所以“E”这一列无法出现计算结果。
其中这几列都是一样的整数属性。
其中“D”的表达式为，IsNull([A],0) * IsNull([A],0) + IsNull([C],0)

[此贴子已经被作者于2016/10/1 14:32:38编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2016/10/2 8:27:00 [只看该作者]

Select Case e.DataCol.Name
    Case "A","C"
        For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey"))
            Dim Val1 As Double = e.DataTable.Compute("Sum(C)","[_SortKey] <= " & dr("_SortKey"))
            dr("E") = Val1
        Next
End Select

这里有视频教程：
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03516 秒, 4 次数据查询