以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教关于复选框的代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=11948) |
-- 作者:shixia -- 发布时间:2011/8/17 18:46:00 -- 请教关于复选框的代码 选取表筛选框后,如何在AfterCheckRow事件中写代码统计出该表所有筛选框为TRUE 的行中“数量”列的和? [此贴子已经被作者于2011-8-17 21:00:19编辑过]
|
-- 作者:狐狸爸爸 -- 发布时间:2011/8/17 21:33:00 -- Dim sum as Double For Each r As Row In Tables("员工").GetCheckedRows sum = sum + r("数量") Next |
-- 作者:客人 -- 发布时间:2011/8/18 13:01:00 -- Dim sum as Double For Each r As Row In Tables("员工").GetCheckedRows sum = sum + r("数量") Next 窗口增加代码:e.Form.Controls("Label9").text = sum 错误提示: |
-- 作者:狐狸爸爸 -- 发布时间:2011/8/18 14:06:00 -- 表事件的e参数,不会有e.form的 窗口事件,才会有e.form,表示触发事件的窗口 |