- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 菜鸟求代码 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2814)
-- 发布时间：2009/5/17 18:18:00
-- 菜鸟求代码
“支出摊销”和“支出统计”是两个表，不用“交叉统计”方法，直接用代码把“支出摊销”中各月摊销和统计后反映在“支出统计”表的金额对应月的单元格中。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2009/5/17 18:41:00
--
你这列名取的不是为难人吗
不改的话代码要复杂不少呢，改一下可以吧。
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目9.table |
-- 发布时间：2009/5/17 18:59:00
--
怎么改，请版主改，我想学写代码的思路
-- 发布时间：2009/5/17 21:31:00
--
以下是引用shixia在2009-5-17 18:59:00的发言：
怎么改，请版主改，我想学写代码的思路
怎么改，请版主改，我想学写代码的思路
2楼的文件就是改过的。
你原来的列名是 一月 二月 我改成1月 2月了。
-- 发布时间：2009/5/17 21:38:00
--
这种方法只能在按钮里实现吧,不能在DataColChanged中这样写代码吧
-- 发布时间：2009/5/18 7:31:00
--
用DataColChanged的也行：
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目46.table |
但是在事先设计好统计表的情况下，lxl版主的代码显然更合理，反正都是要单击一个按钮来重算的。
-- 发布时间：2009/5/18 10:52:00
--
以下是引用狐狸爸爸在2009-5-18 7:31:00的发言：
用DataColChanged的也行：
但是在事先设计好统计表的情况下，lxl版主的代码显然更合理，反正都是要单击一个按钮来重算的。
用DataColChanged的也行：
| 下载信息 [文件大小：352.0 KB 下载次数：2] | |
 点击浏览该文件:管理项目46.table |
但是在事先设计好统计表的情况下，lxl版主的代码显然更合理，反正都是要单击一个按钮来重算的。
不严谨～ 缺少月份的判断：
if r("月份") >=1 and r("月份") <=12
........原代码
else
MessageBox.Show("月份输入错误!", "提示")
r("月份") ＝ nothing
end if
[此贴子已经被作者于2009-5-18 10:55:12编辑过]
-- 发布时间：2009/5/18 11:01:00
--
