用户登录
用户注册

分享至

记账软件系统 易语言做记账软件

  • 作者: 喵喵喵3_
  • 来源: 51数据库
  • 2020-04-21

.版本 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

跳过 ()

.判断循环尾 ()

.如果真结束

列表刷新 ()

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

创建数据库 ()

.如果真结束

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

列表刷新 ()

看不懂啊

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

创建数据库 ()

.如果真结束

如果第一次运行程序就会创建一个名为sjk.ebd的数据库。

下一句是打开这个数据库。

列表刷新 ()就是跳到这个子程序,把数据填到表格中。

2018年哪款记账软件简单好用

比较软件:松鼠记账、随手记、网易有钱、圈子账本等

1.记账功能:松鼠记账=随手记=网易有钱>其他

松鼠记账的记账过程体验更好,随手记的功能最全但是繁杂凌乱,网易有钱跨平台(支付宝、微信、银行卡)数据导入做的最好;

2. 颜值:Timi时光=松鼠记账>其他

Timi时光记账简约优美,松鼠记账则是清新颜值较好;

3. 安全性:网易有钱>随手记>其他

随手记有金蝶背后作支撑,安全性可靠;网易有钱有大量从支付宝、银行等获取的数据,由太平洋财险承保,安全性同样是最好的之一。

但是由于互联网数据泄露的事件屡见不鲜,所以对于安全性这一块,还是要持有保留态度;

4.统计功能:随手记=松鼠记账>其他

随手记的由于记账功能丰富,所以相对应的报表功能也丰富,但是操作复杂。松鼠记账的饼图和折线图体现财务数据,报表功能少但是直观简洁;

5. 附加功能:挖财>其他

挖财的理财社区管理更好,理财产品分类更丰富。当然也存在大量用户吐槽一个记账软件越来越不像记账软件,这就是仁者见仁智者见智了;

综合评分(仅供参考哦):

推荐智能手机记账软件

你是什么手机系统?

建议试试财金汇个人/家庭手机记账理财软件,有android版、iphone/ipad版,还有PC版的,可以将手机的账目数据同步到电脑上,也可以将电脑上的账目数据同步到手机上,使用起来非常方便~

好用的免费手机记账软件

"一、如果手机需要下载安装软件应用,建议尝试:

1.使用手机功能表中自带的浏览器上网,直接搜索需要的软件进行下载安装(下载安卓版本格式为apk)。

2.使用电脑下载APK格式的安装包,连接数据线传输至手机,操作手机在应用程序-我的文件中找到安装包,运行后点击安装按钮。

3.下载完成后点击下载的应用,根据软件手机界面中软件安装提示点击安装即可。

二、如果出现无法安装使用,建议按照以下方法尝试:

1.建议将此软件卸载重新安装尝试。

2.手机未开启未知来源:设定-安全-未知来源打钩,然后重新安装尝试;

3.若其他第三方软件可以正常使用,只有此软件不能可能与手机系统存在兼容性问题。

4.更新下手机系统版本后安装尝试 "

简单好用的个人记账软件

U8记账网http://jz.u8see.com/这个蛮好用

记账软件

挖财是一个很不错的记账类软件,使用人群很多,你可以试试

最好的记账软件

如果你是的零售记账的话,可以使用发发记账系统,免费好用

在百度 输入 发发记账系统 搜索

转载请注明出处51数据库 » 记账软件系统 易语言做记账软件

软件
前端设计
程序设计
Java相关