以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  统计窗口表 复选框 选中 数据  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=68724)

--  作者:yifan3429
--  发布时间:2015/5/23 12:40:00
--  统计窗口表 复选框 选中 数据
  我想统计统计窗口表 复选框 选中 数据 行的金额列  在标签控件中显示出来  格式为  ¥:汇总数据 圆整    这个控件的代码怎么写呢
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150523123105.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2015/5/23 12:40:38编辑过]

--  作者:sloyy
--  发布时间: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
--  发布时间: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

--  作者:yifan3429
--  发布时间:2015/5/23 13:18:00
--  
实例  请老师协助  完成几个简单功能  谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:订单转制造单 剪切实现.foxdb

谢  
[此贴子已经被作者于2015/5/23 13:22:01编辑过]

--  作者:Bin
--  发布时间:2015/5/23 13:41:00
--  
.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:订单转制造单 剪切实现.foxdb


--  作者:yifan3429
--  发布时间:2015/5/23 15:50:00
--  
谢谢老师  还有几个细节
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:订单转制造单 剪切实现.foxdb

需要改善  需要麻烦您
[此贴子已经被作者于2015/5/23 15:50:13编辑过]

--  作者:yifan3429
--  发布时间:2015/5/23 15:51:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150523154631.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150523154836.png
图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2015/5/23 15:52:00
--  
计算代码.写到 表的DataColChanged事件去即可.

四尾狐了.发帖800多个.基本知识 至少要掌握一下啊.不能只靠别人给你写代码

--  作者:yifan3429
--  发布时间:2015/5/23 16:24:00
--  
也在努力学习了  现在这问题还是需要您帮我解决下了  老师。图片点击可在新窗口打开查看
--  作者:Bin
--  发布时间:2015/5/23 16:25:00
--  
按钮里的那句统计代码.复制放到DataColChanged事件即可