看了你的问题后我想过很多方法来实现,你无非是想简化日常工作,对我来说,程序也是这样,在能够实现要求的情况下越简单越好:
1、此库共建两张表,用户表与电费表,电费表也可以分为主表与明细,但后来我还是合起来了。用户表中的编号我个人喜欢用拼音,不足5位的用0补上。
2、查询1用来得到上月总度数,条件来源于"电费表"窗体,查询2没什么太大的意思,就是按条件查询一下电费表,汇总一下数据,当然也可以直接修改。另"电费报表查询"是按你的报表作的查询,显示格式是按你的要求作的,用到交叉查询(我喜欢用哦,个人认为什么样的格式都能实现)
3、主窗体是"电费表",其他三个附窗体可以写到电费表窗体,但那样你不好理解。
"电费表"中姓名组合框的更新后事件中设置了(Me.Text12.DefaultValue = DLookup("总度数", "查询1") )是求出上月总度数,你所要输入的只是"总度数",在"总度数"的更新后事件里我设置了几条语句,是为了自动求出本月度数与电费,另单价我默认为0.5,你可以修改窗体中单价的默认值来修改他。
界面没有帮你美化,但应该是实用的,关键就是数据初始化的问题,可以由EXCEL引入也可以录入,但要注意录入初始数据的时候因为没有上月度数,所以会报错,点确定就可以了,以后不会出现,使用过程中有新的要求或者问题可以在这儿提出,供大家参考学习,另希望其他高手可以改进此库,共同进步!!
(此说明是写给楼主的,白话不少,希望高手们不要笑话我,5555,谢谢!)
[此贴子已经被作者于2003-6-25 10:01:50编辑过]
|