易语言做记账软件

.版本 2

.支持库 iext

.程序集 窗口程序集1

.程序集变量 记录, 整数型

.子程序 __启动窗口_创建完毕

标签1.标题 ＝ “地点”

标签2.标题 ＝ “消费”

标签3.标题 ＝ “金额”

按钮1.标题 ＝ “写入”

按钮2.标题 ＝ “删除”

.如果真 (打开 (取运行目录 () ＋ “\sjk.edb”, “sjk”, , , , , ) ＝ 假)

    创建数据库 ()

.如果真结束

打开 (取运行目录 () ＋ “\sjk.edb”, “sjk”, , , , , )

列表刷新 ()

.子程序 创建数据库, 逻辑型

.局部变量 字段, 字段信息, , "5"

字段 [1].名称 ＝ “序号”

字段 [1].类型 ＝ #文本型

字段 [1].最大文本长度 ＝ 3

字段 [2].名称 ＝ “日期”

字段 [2].类型 ＝ #文本型

字段 [2].最大文本长度 ＝ 20

字段 [3].名称 ＝ “地点”

字段 [3].类型 ＝ #文本型

字段 [3].最大文本长度 ＝ 20

字段 [4].名称 ＝ “消费”

字段 [4].类型 ＝ #文本型

字段 [4].最大文本长度 ＝ 20

字段 [5].名称 ＝ “金额”

字段 [5].类型 ＝ #文本型

字段 [5].最大文本长度 ＝ 20

创建 (取运行目录 () ＋ “\sjk.edb”, 字段)

返回 (真)

.子程序 列表刷新

列表.全部删除 ()

到首记录 ()

.循环判断首 ()

    记录 ＝ 列表.插入表项 (, , , , , )

    列表.置标题 (记录, 0, 读 (“序号”))

    列表.置标题 (记录, 1, 读 (“日期”))

    列表.置标题 (记录, 2, 读 (“地点”))

    列表.置标题 (记录, 3, 读 (“消费”))

    列表.置标题 (记录, 4, 读 (“金额”))

    跳过 ()

.循环判断尾 (尾记录后 () ＝ 假)

按钮1.可视 ＝ 真

按钮2.可视 ＝ 假

连续赋值 (“”, 编辑框1.内容, 编辑框2.内容, 编辑框3.内容)

.子程序 _按钮1_被单击

.如果真 (编辑框1.内容 ＝ “”)

    信息框 (“请输入地点”, #错误图标, )

    编辑框1.获取焦点 ()

    返回 ()

.如果真结束

.如果真 (编辑框2.内容 ＝ “”)

    信息框 (“请输入消费内容”, #错误图标, )

    编辑框1.获取焦点 ()

    返回 ()

.如果真结束

.如果真 (到数值 (编辑框3.内容) ＝ 0)

    信息框 (“请输入金额”, #错误图标, )

    编辑框1.获取焦点 ()

    返回 ()

.如果真结束

加记录 (到文本 (取记录数 () ＋ 1), 到文本 (取日期 (日期框1.今天)), 编辑框1.内容, 编辑框2.内容, 编辑框3.内容)

列表刷新 ()

.子程序 _列表_左键单击表项

记录 ＝ 到整数 (列表.取标题 (列表.现行选中项, 0))

日期框1.今天 ＝ 到时间 (列表.取标题 (列表.现行选中项, 1))

编辑框1.内容 ＝ 列表.取标题 (列表.现行选中项, 2)

编辑框2.内容 ＝ 列表.取标题 (列表.现行选中项, 3)

编辑框3.内容 ＝ 列表.取标题 (列表.现行选中项, 4)

按钮1.可视 ＝ 假

按钮2.可视 ＝ 真

.子程序 _按钮2_被单击

.如果真 (信息框 (“真要删除这组数据吗？”, #询问图标 ＋ #确认取消钮, “提示!”) ＝ #确认钮)

    跳到 (记录)

    删除 (真)

    彻底删除 ()

    到首记录 ()

    记录 ＝ 1

    .判断循环首 (尾记录后 () ＝ 假)

        修改 (到文本 (记录), , , , )

记录 ＝ 记录 ＋ 1

        跳过 ()

    .判断循环尾 ()

.如果真结束

列表刷新 ()

会计流程：给原始凭证分类---填制会计凭证---登记会计账簿---记账凭证汇总---记总账---对账结账---编制会计报表---报税，纳税。

1、给原始凭证分类：拿来原始凭证后，要检查是否合乎入账手续。

2、编制记账凭证：根据原始凭证的分类，我们就可以做凭证了，凭证也叫传票。记账凭证编写完毕，还要进行审核。

3、登记账簿：凭证审核无误后，就应该登记账簿了。

先给凭证按时间顺序编号，再根据记账凭证上的科目，逐笔登记到对应的账簿上。

账簿中只有现金和银行存款日记账要做到日清月结，现金账的余额要和库存也就是保险柜中的现金数目核对，银行账的余额要和银行对账单定期核对，其他的明细账是每个月结一次就行了。记账凭证做完了，记账就是抄账，把凭证上的内容抄到账簿上就完事了，很简单。

4、记帐凭证汇总：就是把记账凭证的科目和金额汇集到一起，汇总的顺序是：按凭证上的编号排好顺序，然后根据凭证上的科目做丁字账，一个科目一个科目的抄写，最后合计，看借方总合计数是否等于贷方总合计数，相等了，说明平了，然后把数据抄写在记账凭证汇总表上。

5、登记总账：根据试算平衡的记账凭证汇总表，登记总账。

登记总账和明细账有点不同，在明细账上，借方、贷方各自记一行，而总账是借贷方在一行上。

还有，明细账是按照凭证记的，总账是按着汇总登记的。如果业务量小，一个月汇总一次，登记一次总账就可以，这些都看具体的情况。总账和明细账的关系：

它们是相互制约的关系。总账，就是记各个明细账总数的，明细账，是总账的细分类。总账记的是会计的一级科目，而明细账除了一级科目，还有二级科目，比如固定资产一级科目，固定资产的项目就是它的二级科目。还有费用帐、低值易耗品账、应交税金账等等。

到了月末，各个明细账的余额必须等于相对应的总账余额，如果不等，那多半是明细账记错了或记落了。6、对账、结账：记完总账就该对账和结账了，只要凭证是正确的，登记完的账也应该是正确的，但是手工记账，要经常对账，做到账证相符、账账相符、账实相符、账表相符。

结账就是结算出把一段时间内本期的发生额合计和余额，然后将余额结转下期或者转入新账。

7、编制会计报表：记完总账后，试算平衡了，就可以编制财务会计报表了。一般两张报表，资产负债表和利润表，还有一张是现金流量表，因为小企业很少有要这张表的。整个流程就是这样，这就是会计每个月要做的事情

1.记账凭证设计的基本内容包括：记账凭证的名称；填制凭证的日期；经济业务内容摘要；会计科目（包括明细科目）的名称和方向；金额；凭证编号；凭证所附原始凭证的件数；有关经办人员和主管人员的签章等。

记账凭证设计的基本步骤与原始凭证设计的基本步骤大致相同。

2.首先，需要确定使用记账凭证的种类。一个单位究竟设计什么样的记账凭证，不能一概而论，只能根据事前调查的内容和已设计的会计账务处理程序以及企业活动的特点来决定。

如果是小型企事业单位，且设计的账务处理程序记账凭证账务处理程序或日记总账账务处理程序，则可选择通用记账凭证格式； 下图为通用记账凭证的格式。

3.如果是大中型企业，且设计的账务处理程序是凭证汇总的账务处理程序（科目汇总表账务处理程序和汇总记账凭证账务处理程序），则应选择专用记账凭证（收、付、转凭证）和汇总记账凭证两种格式；

4.如果已设计的账务处理程序是利用账户汇总的处理程序，也应选择专用记账凭证格式。此外，有些特殊业务还可以以单代证，即以原始凭证代替凭证。显然，只要确定了选用记账凭证的种类，记账凭证的用途也就随之确定下来了。紧接着就是根据记账凭证的种类和用途，分别绘制凭证的样式，以确定记账凭证的内容、格式及规模大小。

5.另外，也可以用网上的一些财务记账软件，如：易记账，通过电脑来制作记账凭证。下面是电子版的记账凭证。

---