Foxtable(狐表)用户栏目专家坐堂 → [求助]GetCheckedRows用法!


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

主题:[求助]GetCheckedRows用法!

美女呀,离线,留言给我吧!
rophy0952
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:581 积分:4989 威望:0 精华:0 注册:2014/6/12 14:55:00
[求助]GetCheckedRows用法!  发帖心情 Post By:2023/12/30 18:53:00 [只看该作者]

老师,好!如何对勾选行的数据列进行求和,每勾选一次,重新进行一次求和。谢谢

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9474 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2023/12/30 20:17:00 [只看该作者]

在表的AfterCheckRow事件中写求和代码即可。


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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/1 20:21:00 [只看该作者]

Dim rs As List(of Row) = Tables("订单").GetCheckedRows()
dim sum as double
For Each 
r As Row in rs
   
sum  = sum  + r("s数据列"))
Next
msgbox(sum)

 回到顶部
美女呀,离线,留言给我吧!
rophy0952
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:581 积分:4989 威望:0 精华:0 注册:2014/6/12 14:55:00
  发帖心情 Post By:2024/1/2 10:24:00 [只看该作者]

解决了,谢谢老师们!

 回到顶部