Foxtable(狐表)用户栏目专家坐堂 → 统计窗口表 复选框 选中 数据


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

主题:统计窗口表 复选框 选中 数据

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


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/5/23 12:47:00 [显示全部帖子]

试试看:

Dim rs As List(of Row) = Tables("订单").GetCheckedRows()
For Each
r As Row in rs
    label1.text=val(
label1.text)+r("金额")

Next

[此贴子已经被作者于2015/5/23 12:53:43编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/5/23 13:04:00 [显示全部帖子]

你的标签控件放在哪里?如果是放在窗口中 则:
Dim rs As List(of Row) = Tables("表A").GetCheckedRows()
For Each r As Row In rs
    e.Form.Controls("Label1").TEXT=val(e.Form.Controls("Label1").text)+r("金额")
Next

 回到顶部