Foxtable(狐表)用户栏目专家坐堂 → 如何计算勾选行的最大值?


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

主题:如何计算勾选行的最大值?

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


加好友 发短信
等级:八尾狐 帖子:1938 积分:17793 威望:0 精华:0 注册:2014/7/29 19:09:00
如何计算勾选行的最大值?  发帖心情 Post By:2018/5/8 22:31:00 [显示全部帖子]

想计算当前表中勾选行的最个字段的最大值,类似下面这样

Dim dt1 As date = Tables("订单").Compute("Max(修改日期)","Tables("订单").GetCheckedRows()")


后面那个条件除了拼接每行中的某个字段来判断外,表中勾选的行有没有直接写在上面条件中的办法?


谢谢!


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


加好友 发短信
等级:八尾狐 帖子:1938 积分:17793 威望:0 精华:0 注册:2014/7/29 19:09:00
  发帖心情 Post By:2018/5/9 11:38:00 [显示全部帖子]

Dim dt1 As date = Tables("订单").Compute("Max(修改日期)")
意思是如果后面不带条件就会默认按当前订单表中的所有数据计算,
勾选行有没有一个直接的属性比如是"XX = true",(就像老师说的加一临时列一样,因为通用每个表都加一个临时列不太好)

现在是用下面的方法
Dim ids As String
For Each r In Tables(winName & "_主表").GetCheckedRows()
    ids = ids & "," &  r("_Identify")  '集合列
Next
Dim dt1 As date = Tables("订单").Compute("Max(修改日期)","[_Identify] In(" & ids.trim(",") & ")")
还有没有其他简单的方法?

 回到顶部