时间问题求助

wh1234567

食堂吃饭“开始营业时间”规定在编辑框1里填入例如 00:23，吃饭“结束营业时间”规定在编辑框2里填入例如 16:59（实际就是指17:00，例如23:59:59就是指0点吧？），每一班吃饭时间只有3小时，总共有7班人需要吃饭，那么请问如何轮流吃饭并插入超级编辑框里？逐行输出效果例如：第一班吃饭00:23-----03:23
第二班吃饭03:23-----06:23
第三班吃饭06:23-----09:23
......
求例子



补充内容 (2025-3-27 01:41):
轮流吃饭时间3小时只是举例，也可能是1小时44分钟

算法艺术家

  

变量名	类 型	静态	数组	备 注
索引	整数型
i	整数型
起始参数	文本型
开始时间	日期时间型
结束时间	日期时间型
结束时间文本	文本型
起始时间文本	文本型
间隔分钟数	整数型
几班吃饭的	整数型
记录开始时间	日期时间型

起始参数 ＝ “00:23”
间隔分钟数 ＝ 3 × 60
几班吃饭的 ＝ 10
开始时间 ＝ 修改时间 (取现行时间 (), , , , 到整数 (文本_取左边 (起始参数, “:”)), 到整数 (文本_取右边 (起始参数, “:”)))
记录开始时间 ＝ 开始时间
起始时间文本 ＝ 起始参数
计次循环首 (几班吃饭的, i)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
结束时间 ＝ 增减时间 (开始时间, #分钟, 间隔分钟数)
结束时间文本 ＝ 到文本 (取小时 (结束时间)) ＋ “:” ＋ 到文本 (取分钟 (结束时间))
判断 (取时间间隔 (结束时间, 记录开始时间, #日 ) ≥ 1)
超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本 ＋ “（下一日）”)
超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本)

起始时间文本 ＝ 结束时间文本
开始时间 ＝ 结束时间
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 索引, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 起始参数, 文本型<br /> .局部变量 开始时间, 日期时间型<br /> .局部变量 结束时间, 日期时间型<br /> .局部变量 结束时间文本, 文本型<br /> .局部变量 起始时间文本, 文本型<br /> .局部变量 间隔分钟数, 整数型<br /> .局部变量 几班吃饭的, 整数型<br /> .局部变量 记录开始时间, 日期时间型<br /> <br /> 起始参数 ＝ “00:23”<br /> 间隔分钟数 ＝ 3 × 60<br /> 几班吃饭的 ＝ 10<br /> 开始时间 ＝ 修改时间 (取现行时间 (), , , , 到整数 (文本_取左边 (起始参数, “:”)), 到整数 (文本_取右边 (起始参数, “:”)))<br /> 记录开始时间 ＝ 开始时间<br /> 起始时间文本 ＝ 起始参数<br /> .计次循环首 (几班吃饭的, i)<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     结束时间 ＝ 增减时间 (开始时间, #分钟, 间隔分钟数)<br />     结束时间文本 ＝ 到文本 (取小时 (结束时间)) ＋ “:” ＋ 到文本 (取分钟 (结束时间))<br />     .判断开始 (取时间间隔 (结束时间, 记录开始时间, #日) ≥ 1)<br />         超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本 ＋ “（下一日）”)<br />     .默认<br />         超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本)<br />     .判断结束<br /> <br />     起始时间文本 ＝ 结束时间文本<br />     开始时间 ＝ 结束时间<br /> .计次循环尾 ()

attracting

你是来找大佬写作业来了

星马豪

我表示没看懂你的问题

wh1234567

attracting 发表于 2025-3-27 01:34
你是来找大佬写作业来了

10岁的小孩子受老师的鼓励下想学编程方面的，问了我好多次，我给说咱论坛高手多多，这题简单的很，没想到自己不会啦，希望高手帮扶一把，呵呵呵

wh1234567

星马豪 发表于 2025-3-27 01:44
我表示没看懂你的问题

类似打螺丝倒班原理，你仔细看就明白啦

小彬QQ649871230

表示看不懂你所说的。

是可可吖

10个人估计有9个看不懂...

算法艺术家

  

变量名	类 型	静态	数组	备 注
索引	整数型
i	整数型
起始参数	文本型
开始时间	日期时间型
结束时间	日期时间型
结束时间文本	文本型
起始时间文本	文本型
间隔分钟数	整数型
几班吃饭的	整数型

起始参数 ＝ “00:23”
间隔分钟数 ＝ 3 × 60
几班吃饭的 ＝ 7
开始时间 ＝ 修改时间 (取现行时间 (), , , , 到整数 (文本_取左边 (起始参数, “:”)), 到整数 (文本_取右边 (起始参数, “:”)))
起始时间文本 ＝ 起始参数
计次循环首 (几班吃饭的, i)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
结束时间 ＝ 增减时间 (开始时间, #分钟, 间隔分钟数)
结束时间文本 ＝ 到文本 (取小时 (结束时间)) ＋ “:” ＋ 到文本 (取分钟 (结束时间))
超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本)
起始时间文本 ＝ 结束时间文本
开始时间 ＝ 结束时间
计次循环尾 ()

子程序名	返回值类型	公开	备 注
修改时间	日期时间型		输入一个时间 然后返回修改后的时间
参数名	类 型	参考	可空	数组	备 注
时间	日期时间型
修改年份	整数型
修改月份	整数型
修改日	整数型
修改小时	整数型
修改分钟	整数型
修改秒	整数型

如果真 (是否为空 (修改年份))
修改年份 ＝ 取年份 (时间)
如果真 (是否为空 (修改月份))
修改月份 ＝ 取月份 (时间)
如果真 (是否为空 (修改日))
修改日 ＝ 取日 (时间)
如果真 (是否为空 (修改小时))
修改小时 ＝ 取小时 (时间)
如果真 (是否为空 (修改分钟))
修改分钟 ＝ 取分钟 (时间)
如果真 (是否为空 (修改秒))
修改秒 ＝ 取秒 (时间)
返回 (指定时间 (修改年份, 修改月份, 修改日, 修改小时, 修改分钟, 修改秒))

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 索引, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 起始参数, 文本型<br /> .局部变量 开始时间, 日期时间型<br /> .局部变量 结束时间, 日期时间型<br /> .局部变量 结束时间文本, 文本型<br /> .局部变量 起始时间文本, 文本型<br /> .局部变量 间隔分钟数, 整数型<br /> .局部变量 几班吃饭的, 整数型<br /> <br /> 起始参数 ＝ “00:23”<br /> 间隔分钟数 ＝ 3 × 60<br /> 几班吃饭的 ＝ 7<br /> 开始时间 ＝ 修改时间 (取现行时间 (), , , , 到整数 (文本_取左边 (起始参数, “:”)), 到整数 (文本_取右边 (起始参数, “:”)))<br /> 起始时间文本 ＝ 起始参数<br /> .计次循环首 (几班吃饭的, i)<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     结束时间 ＝ 增减时间 (开始时间, #分钟, 间隔分钟数)<br />     结束时间文本 ＝ 到文本 (取小时 (结束时间)) ＋ “:” ＋ 到文本 (取分钟 (结束时间))<br />     超级列表框1.置标题 (索引, 0, “第” ＋ 到文本 (i) ＋ “班吃饭” ＋ 起始时间文本 ＋ “-----” ＋ 结束时间文本)<br />     起始时间文本 ＝ 结束时间文本<br />     开始时间 ＝ 结束时间<br /> .计次循环尾 ()<br /> .版本 2<br /> <br /> .子程序 修改时间, 日期时间型, 公开, 输入一个时间 然后返回修改后的时间<br /> .参数 时间, 日期时间型<br /> .参数 修改年份, 整数型, 可空<br /> .参数 修改月份, 整数型, 可空<br /> .参数 修改日, 整数型, 可空<br /> .参数 修改小时, 整数型, 可空<br /> .参数 修改分钟, 整数型, 可空<br /> .参数 修改秒, 整数型, 可空<br /> <br /> .如果真 (是否为空 (修改年份))<br />     修改年份 ＝ 取年份 (时间)<br /> .如果真结束<br /> .如果真 (是否为空 (修改月份))<br />     修改月份 ＝ 取月份 (时间)<br /> .如果真结束<br /> .如果真 (是否为空 (修改日))<br />     修改日 ＝ 取日 (时间)<br /> .如果真结束<br /> .如果真 (是否为空 (修改小时))<br />     修改小时 ＝ 取小时 (时间)<br /> .如果真结束<br /> .如果真 (是否为空 (修改分钟))<br />     修改分钟 ＝ 取分钟 (时间)<br /> .如果真结束<br /> .如果真 (是否为空 (修改秒))<br />     修改秒 ＝ 取秒 (时间)<br /> .如果真结束<br /> 返回 (指定时间 (修改年份, 修改月份, 修改日, 修改小时, 修改分钟, 修改秒))

补充内容 (2025-3-27 02:15):
几个班吃饭和间隔时间是相对固定的，所以结束营业时间 好像没什么意义，

wh1234567

算法艺术家 发表于 2025-3-27 02:07
[e=3].版本 2
.支持库 iext

有效果，不错，如果有8班人吃饭，推算到第二天是不是应该加上次日日期才对，例如台球厅营业时间是晚上20点到临晨4点，假如今天是2025.3.30号，那么到31号临晨才算推算一圈完毕吧