通用工厂公司员工管理软件完整版,可二次开发

易语言 2020-09-01 11:22:53

通用工厂公司员工管理软件完整版,可二次开发

.计次循环首 (取数组成员数 (分割快捷信息), n1)
.如果真 (分割快捷信息 [n1] = 编辑框部门负责人.内容)
部门负责人 = 真
.如果真结束

.如果真 (分割快捷信息 [n1] = 编辑框费用项目.内容)
费用项目 = 真
.如果真结束

.计次循环尾 ()
.如果真 (部门负责人 = 假)
保存快捷信息 = 保存快捷信息 + 编辑框部门负责人.内容 + “!?+*$#@#$*+?!”
.如果真结束
.如果真 (费用项目 = 假)
保存快捷信息 = 保存快捷信息 + 编辑框费用项目.内容 + “!?+*$#@#$*+?!”
.如果真结束
写到文件 (取运行目录 () + “\ygzl\快捷信息.txt”, 到字节集 (读入快捷信息 + 保存快捷信息))
处理事件 ()
读取快捷信息 ()

.计次循环首 (取记录数 (), )
.如果真 (读 (“部门负责人”) = 编辑框部门负责人.内容 且 读 (“日期”) = 编辑框日期.内容 且 读 (“费用项目”) = 编辑框费用项目.内容)
信息框 (“ 员工工号经存在 请不要重复添加 ”, 0, “提示”)
关闭 (“各部门日常费用”)
返回 ()
.如果真结束
跳过 ()
.计次循环尾 ()