易语言自动排版计划表

.如果 (寻找文件 (取运行目录 () ＋ “\pbb\” ＋ 年份框.内容 ＋ 月份框.内容 ＋ “.pb”, ) ≠ “”)
排班表格.从文件读 (取运行目录 () ＋ “\pbb\” ＋ 年份框.内容 ＋ 月份框.内容 ＋ “.pb”)
.否则
.如果 (信息框 (“未找到 ” ＋ 到文本 (取年份 (取现行时间 ())) ＋ “ 年 ” ＋ 到文本 (取月份 (取现行时间 ())) ＋ “ 月份排班计划表！是否初始化排班表？”, #是否钮 ＋ #询问图标, “询问是否初始化排班表？”) ＝ #是钮)
_排班初始化按钮_被单击 ()
.否则

.如果结束

.如果结束
月天数 ＝ 取某月天数 (到整数 (年份框.内容), 到整数 (月份框.内容))
统计编辑框.内容 ＝ 年份框.内容 ＋ “年” ＋ 月份框.内容 ＋ “月共有：” ＋ 到文本 (月天数) ＋ “天”
状态条.置文本 (1, “当前日期：” ＋ 时间到文本 (取现行时间 (), 2) ＋ 多项选择 (取星期几 (取现行时间 ()), “ 星期日”, “ 星期一”, “ 星期二”, “ 星期三”, “ 星期四”, “ 星期五”, “ 星期六”))